我有一个派生自 TStringList 对象的对象，我称之为“TAutoString”。 它允许您在创建列表时指定对象类型。 然后每次将新条目添加到字符串列表时，它还会创建与该字符串条目关联的对象的副本。 这使得在每个字符串中存储各种附加信息变得容易。 例如： 在对象内部，类信息存储在类变量中： ...
我想创建一个 function 用另一个替换当前图像。 问题是我要替换 64 张图片。 我创建了一个带有TImage* Sender参数的 function 但它仅在我将Sender设置为TObject*时才有效。 如何更改此 function： 进入这个 我正在使用 VCL 库。 ...
我正在解决一个需要动态调整数组大小的问题，在这个问题上需要大量操作。 我已经成功编写了两个类，t_one 和 t_two： 这两个对象的代码几乎相同，只是 Myarray1 在一种情况下是 single 数组，而在另一种情况下是 longint 数组。 将其制成单个 object 以使用变体 ar ...
我似乎无法通过搜索找到答案，所以这里...... 我知道我可以通过利用这种类型的代码将Class对象一般传递给其他类： 然后以这种方式构建： 但是，我有一个应用程序，要求我打开一个表单，并以某种方式传递泛型类型以便在该表单中使用。 我试图能够为许多不同的类类型重用此表单。 ...
我在添加一个问题TObject值到FireMonkey TListBox德尔福10.0西雅图。 将Integer变量强制转换为TObject指针时，会引发一种理解。 我尝试将演员表转换为TFmxObject ，但没有成功。 在Windows上，强制转换的工作方式像一个超级按钮，但在 ...
今天，当我不得不重写TObject的BeforeConstruction方法时，我想到了一个非常简单的问题： 为什么TObject方法AfterConstruction和BeforeConstruction具有public可见性？ 我希望他们受到protected 。 他们不是的原 ...
据我对此主题的有限了解，以下代码应该可以工作。 但是我没有预期的结果： 我的预期结果是6和HOST1，但我得到1和“”（空） 拜托，我想念的是什么？ 谢谢！ ...
它适用于32位平台。但这里不是64位的例子 谁能帮我？ 非常感谢你 ...
我想知道如何在创建的列表中获得某个对象的位置。 可以说它就像一个图形列表，您可以在其中单击对象。 可以说您右键单击一个对象，然后单击“刷新”，我如何获得该对象的位置，以便在刷新整个列表后（由于某种原因刷新了透明列表），我又回到了列表中的相同位置？ 如果列表的长度为1000个对象，则刷新后尝 ...
我目前有这个，它很糟糕： 但相反， 我想做这样的事情： 但是，在编译时，它抱怨[1,2,3,4]语法只适用于整数。 有没有办法实例化/初始化一个Tpoint数组，类似于我想要的方式？ ...
我目前正在Vista下使用CodeGear Delphi 2007。 在进行一些相当繁重的计算时，我的应用程序返回了内存不足错误。 .exe文件从150 Mb增长到惊人的2 Gb（！LOL） 关于此问题： 1）我正在将一些数组更改为arraylist但它给了我一些很难解决的问题（ ...
我怎样才能使我的代码工作？ :)我试图制定这个问题，但经过几次失败的尝试后，我认为你们会更快地发现问题，而不是阅读我的“解释”。 谢谢。 _ ...
我有一个程序，需要一个TObject类型的参数，如下所示： 我有一个Variant数组，我正在循环调用该过程，如下所示： 编译器给出错误说：“不兼容的类型：TObject和Variant”。 我该怎么做才能解决这个问题？ 更多信息：到目前为止，我一直在变量数组中传递简 ...
TObject.InstanceSize 返回 8，但 TObject 没有声明任何数据成员。 根据 TObject.ClassType 的实现，前 4 个字节可以解释为指向对象的 TClass 元数据的指针。 有人知道其他 4 个字节的开销是做什么用的吗？ 编辑：显然这是特定于 D2009。 ...