SQL-Abfrage: Alle Werte aus einer Spalte

[Jasocul]

Einmal komplett:

Delphi-Quellcode:

  qry_Speichern.Close;
  qry_Speichern.ParamByName('SpeichernDatenbankname').AsString := edtDatenbankname.Text;
  qry_Speichern.ParamByName('SpeichernTabellenname').AsString := edtTabellenname.Text;

  with qry_Speichern do begin
    open;
    str := '';
    while not eof do begin
      str := str + ';' + Fields[0].AsString;
      next;
    end;
    if length(str) > 0 then
      delete(str,1,1);
    dbMetaDaten.Close;
    dbMetaDaten.Open;
  end;
  Memo1.Text := str;

Und "str" ist nicht gut als Variable, weil es eine gleichlautende Funktion in Delphi gibt.