Parameter Übergabe in SQL-Abfrage

[Sharky]

Hai ihr,

ich habe das eben mal mit mySQL und den Zeos-Komponenten versucht. Da geht es:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ZConnection1.Disconnect;
  ZConnection1.Connect;
  with ZQuery1 do
  begin
    Close;
    SQL.Text   := 'SELECT * FROM test1 ORDER BY :feld';
    ParamCheck := True;
    ParamByName('feld').AsString := Edit1.Text;
    Open;
  end;
end;