问题标签 [tobjectlist]

我有一项任务，我必须在比较前一个记录后添加新记录

前任。有层 1,2,3,... 在这个

第 1 层有这样的记录

现在我可以添加第 2 层的记录，前提是它的开始和结束在第 1 层的开始端内

我创建了一个简单的 < && > 它工作的逻辑。但是随后出现了新情况，即如果第 1 层包含顺序记录，则应首先将其视为一条记录，如下所示

由于不一定需要在 Start-End 序列中添加记录，因此第一个结束是秒 Start，我无法使用 Min Max。

请任何建议合并这些列表记录...

这不是实际记录，显示的表格只是为了便于理解而简化的部分

记录之前如何插入的一般行示例是

1. 有一条线考虑是 100m，用户将它分成 10m 括号，

2. 现在用户必须按层顺序在其上应用不同颜色的层。用户从 00 到 10 然后从 10 到 20 添加第 1 层并跳过 20 到 30，因为有困难并继续从 30 到 50 等等，所以这不像用户必须按顺序绘制第 1 层，但这是强制性的对于第 1 层，所有线表示 00 到 100m。

3. 现在附加条件是当他开始应用第 2 层时，例如。00 到 20 那么必须在第 1 层的 00 到 20 之前完成

更新

谢谢@DragandDrop，您提供的https://dotnetfiddle.net/4Q6Pyb很有帮助！

I'm using Delphi 10.1 Berlin and have a REST server.

I'm getting a "TkPointer not currently supported" when trying to pass an object that has a TObjectList property that's been populated.

If I don't populate the TObjectList property then alls fine.

I'll try and explain using the above example.

I create an object:-

Pass the Object to the REST Server. All ok.

Same as before to create the Job Object plus:-

Pass the Object to the REST Server. "TkPointer not currently supported".

This error occurs in the ClientClassesUnit1 on the Method created from the server on the line:-

Hope that makes some sense. Thanks

大家好，对不起，如果这是重复的，但我的具体问题我还没有在任何地方看到答案。当我尝试在以下行中释放运行时创建的 ObjectList 时，出现“无效指针操作”：

所以，这是我的课程：

最奇怪的是我有另一个具有完全相同行为的类，并且该方法可以正常工作。是的，我正在创建对象并立即销毁它以测试我是否正确销毁它。在另一个类中，我有另一个具有相同代码的示例，但是这次它可以正常工作

为什么？我究竟做错了什么？这个测试代码在当前代码之前运行，也许它相关？

更新：通过应用 Remy Lebeau 建议的更改，我设法将项目正确添加到列表中并处理它们，以便代码的这个特定部分没有泄漏。但是在代码的另一部分中，我有一个 ObjectList 泄漏，我不知道如何修复。

在我的类中，我有一个属性是 TObjectList 属性，我有一个方法来检查列表是否已分配，如果没有，它会创建它并将其返回给调用列表的任何人。

然后我在 for-in 循环中使用这个属性来提供一个包含我数据库中 procs 的列表

但是这部分运行后仍然会发生泄漏：

我该如何解决？

如何在 java 中合并两个对象列表，例如：我有 2 个列表 listA listB，每个列表有一个对象，例如 listA[name=abc,age=56, weight=null] listB[name=Null,age=Null,weight=70 ]

预期结果=输出[name=abc,age=56, weight=70]

我有两个列表listA和listB对象类型

ListA[name=abc, age=34, weight=0, height=0]从excel表格收集的数据

ListB[name=null, age=0, weight=70, height=6]从数据库收集的数据

现在我想将两个列表合并到一个列表中

MergedList[name=abc, age=34, weight=70, height=6]

注意：我的 obj 类有超过 15 个属性，因此使用一个一个添加每个属性getProperty()会很耗时。有没有更好的方法？

我有以下（简化的）类定义：

以下示例代码显示了我如何对TObjectList<TMyObject>( FMyObjects) 进行排序并将它们显示在TListBox.

每次Button1被点击（并且列表排序），FMyObjects[2]（Item3）和FMyObjects[3]（'Item4'）在列表中交换位置。在我的“现实世界”（绘图）应用程序中，这是不可取的。

我还在CompareValue函数调用中尝试了 Epsilon 的不同值以及匿名函数的不同实现（比较值并返回 1、-1 或 0），但似乎两者都没有区别。

我是否遗漏了某些东西（例如控制此行为的属性）或者这是“设计使然”并且无法防止？

我有一个小问题。可以将 TObjectList 中的数据输入到 TfrxUserDataSet 中吗？

我有以下问题。我需要对报告上存储在单独 TfrxDBDataSets 中的数据进行汇总汇总。为此，我创建了一个对象列表，其中包含来自所有 DataSet 的聚合数据。这实际上是以对象列表格式存储的。现在我需要将此数据重写为新数据集，在这种情况下我使用的是 TfrxUserDataSet 但我不知道如何分配数据或创建记录。我可以更改的唯一参数是我已经根据项目数据分配的字段。

在此处输入图像描述

或者也许还有其他解决方案可以在 FastReport 数据中输入对象列表？我需要将它们排成一行……例如：

1. 来自列表 1 参数的 1 个记录，1 个记录 drom 列表 2 参数
2. 来自列表 1 参数的 2 个记录，2 个记录 drom 列表 2 参数等。

但我不知道我在列表中得到了多少参数。