ok, also so mach ichs
Delphi-Quellcode:
Datenbankname := edtDatenbankname.Text;
Tabellenname := edtTabellenname.Text;
qry_Speichern.ParamByName('SpeichernDatenbankname').AsString := Datenbankname;
qry_Speichern.ParamByName('SpeichernTabellenname').AsString := Tabellenname;
qry_Speichern.ExecSQL;
qry_Speichern.Close;
with qry_Speichern do begin
open;
while not eof do begin
str := '';
for j := 0 to Fields.Count -1 do begin
str := str + ';' + Fields[j].AsString;
end;
next;
end;
dbMetaDaten.Close;
dbMetaDaten.Open;
end;
Memo1.Text := str;
in der Abfrage steht halt das besagte
SQL-Statement.