ok einverstanden ;O)
also so siehts bei mir aus wenn ich die Daten aus der
Db in die Combobox schmeissen möchte
Delphi-Quellcode:
procedure TDM.SqlInvoiceInvoiceTypeExecute(Sender: TObject);
var
r,c :integer;
begin
ADOQuery.SQL.Clear;
WITH ADOQuery.SQL DO Begin
ADD('SELECT description from InvoiceType');
end;
ADOQuery.Open;
//reads the complete dataset into the combobox
ADOQuery.First;
for r:= 1 to ADOQuery.RecordCount do
begin
for c := 0 to ADOQuery.FieldCount -1 do
InvoiceForm.CmBxInvoiceType.Items.Add(ADOQuery.Fields[c].Text);
ADOQuery.Next;
end;
end;