如何在listbox中显示数据表的行???(20)

  • 主题发起人 主题发起人 shionlee
  • 开始时间 开始时间
S

shionlee

Unregistered / Unconfirmed
GUEST, unregistred user!
比如我有一个表,用dbgrid显示出来这个表,其中一个字段名是name,name下面有chen,li,yang等。如何才能在listbox中将这些名字显示出来??
 
linstbox.items.add('name');for I:=0 to query1.count-1 dobegin linstbox.items.add(query1.fieldbyname('name').asstring);end;
 
query提取数据的时候要distinct name ,然后再用搂上的添加就ok的
 
用adoquery做该表的全文搜索,得到该表名为name字段的值,给动态字符串,一一加到listbox中,具体代码实现:procedure TForm1.Button1Click(Sender: TObject); var i:integer; s:tstrings;begin s:=tstringlist.Create; adoquery1.Close; adoquery1.SQL.Clear; adoquery1.SQL.Text:='select * from a'; adoquery1.Open; adoquery1.First; while not adoquery1.Eof do begin s.Add(trim(adoquery1.Fields.Fieldbyname('name').Value)); adoquery1.Next; end; for i:=0 to s.Count-1 do begin listbox1.Items.Add(s.Strings); end; s.Free;end;
 
后退
顶部