Query.SQL.Text := 'Select * from table1';
var
I: Integer;
begin
Combobox.Items.Clear;
for I := 0 to Query.Fields.Count - 1 do
begin
ComboBox1.Items.Add(Query.Fields[0].FieldName);
end;
end;上述代码未调试~~~~
var
I: Integer;
begin
Combobox.Items.Clear;
for I := 0 to Query.Fields.Count - 1 do
begin
ComboBox1.Items.Add(Query.Fields[0].FieldName);
end;
end;上述代码未调试~~~~
ComboBox1.Items.Assign(Table1.FieldList);