如何向combobox中插入一个表中的字段名?(10分)

F

flyerer

Unregistered / Unconfirmed
GUEST, unregistred user!
如何向combobox中插入一个表中的字段名?
 
var
s:TStringlist;
i:integer;
begin
s := TStrigList.Create;
for i := 0 to Table1.Fields.count-1 do
begin
s.Add(Table1.Fields.Name); //Name的属性可以不对,记不起来了
end;
comboBox.items ;= s;
 
加入字段值还是字段名?
 
var
s:TStringlist;
i:integer;
begin
s := TStrigList.Create;
Table1.GetFieldNames(s);
comboBox.items ;= s;
s.free;
 
for i := 0 to Table1.Fields.count-1 do
ComboBox1.Items.Add(Table1.Fields.FieldName);
 
顶部