ADO Daten übergabe

[jensw_2000]

Dann also eher Sowas ?

Delphi-Quellcode:

Function irgendwas():TStrings;
begin
  
  ADOQuery1.Close; 
  ADOQuery1.SQL.Clear; 
  ADOQuery1.SQL.text:='SELECT MWST FROM TABELLE1 WHERE...'; 
  ADOQuery1.Open; 

  MeineListe.Clear;
  While not ADOQuery1.eof do
  begin
    MeineListe.add(ADOQuery1.fieldbyname('MWST').asstring;
    ADOQuery1.next;
  end;

  Result:=MeineListe;
end

;