2,495
社区成员
发帖
与我相关
我的任务
分享
cbb_cb.Properties.Items.Clear;
qry_BaseTemp.Close;
qry_BaseTemp.SQL.Clear;
qry_BaseTemp.SQL.Add( ' select t1.name, t2.age, t2.sex......' );
qry_BaseTemp.Open;
while not qry_BaseTemp.Eof do
begin
cbb_cb.Properties.Items.Add(VarToStr(qry_BaseTemp.FieldValues['CB']));
qry_BaseTemp.Next;
end;