还要设置KeyField,一般和listfield相同
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
需要设置的属性: DataSource, DataField,
ListSource, KeyField, ListField
原理: ListSource 的 KeyField 字段的值与 DataSource 的字段 DataField 相同时, 显示对应的 ListSource 中的 ListField 的值.
只会因 DataSource.DataSet 的记录改变而改变,
而ListSource只会影响可选择的数据集,
如果你想让 ListSource 的结果反映到 Text 属性上,可以用以下方法:DBLookupComboBox.KeyValue
:=ListSource.DataSet.FieldByName(ListSource.DataSet.KeyField).as...