Question

delphi中 checklistbox怎样根据数据值做出选中或没选中

数据库查询的结果逐条写入checklistbox的items后想根据数据库中不同的结果对items的checked进行选中或不选中，谢谢。

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励30（财富值+成长值）

Answer 1

增加Items时，使用AddObject方法，把当前记录的Kek值存储到内存堆(heap)中，然后把此内存地址转化为TObject对象引用，并在AddObject方法中使用。简单地说，就是让每个Item记住它们对应的数据库记录。

然后，根据数据库中不同的结果，取当前记录的Key值，到Items中找到相应的条目，然后再根据当前记录业务字段的值，修改找到条目的checked状态值。