从数据库中读值到下拉框中，如何匹配呢？

Question

http://blog.csdn.net/varick_zhong/article/details/12781199

Answer 1

function GetFieldDatas(TableName,NameField: string;SL: TStrings): Boolean;
var AQuery: TASQLite3Query;
begin
  Result := false;
  if Assigned(SL) then
  begin
    AQuery := OpenSQL('select * from ' + TableName);
    if Assigned(Aquery) then
    with AQuery do
    begin
      if not IsEmpty then
      begin
        SL.Clear;
        while not Eof do
        begin
          SL.Add(FieldByName(NameField).AsString);
          Next;
        end;
        Result := true;
      end;
    end;
  end;
end;

Answer 2

我这是之前写的函数，需要稍微改一下才能用，只是用来提供下思路
楼主能看懂就好从数据库中读出值来我会，关键怎么把读出来的这些值 放到 cxLookupComboBox1 这里面

Answer 3

从数据库中读出值来我会，关键怎么把读出来的这些值 放到 cxLookupComboBox1 这里面