SQL Datensätze in eine Variable schreiben, ohne FieldByName.

[Gollum]

Hallo,

mit FieldCount erhälst Du die Anzahl der Spalten einer Query, die Du dann mit Fields[Zaehlvariable].AsString abfragen kannst:

Delphi-Quellcode:

var i:Integer;
    s:String;
...
...
with MyQuery do
begin
  Close;
  Text:='SELECT * FROM MyTabelle';
  Open;
  if (RecordCount>0) then
  begin
    while not Eof do
    begin 
      s:='';
      for i:=0 to FieldCount-1 do s:=s+Fields[i].AsString+';';
      ShowMessage(s);
      Next;
    end; // while
  end; // if
end; // with