Arbeitsweise dbGo ADO Query Komponente

[DeddyH]

Ich würde das zusätzlich noch das with eliminieren und die Abfrage parametrisieren.

Delphi-Quellcode:

Try
  ADOQuery1.Close;
  ADOQuery1.SQL.Text := ' Select * From Table1 Where FLD01 <> :SomeValue';
  ADOQuery1.Parameters.ParamByName('SomeValue').Value := '1';
  ADOQuery1.Open;
Except
  on E: Exception do
    ShowMessage('Es ist ein Fehler aufgetreten: ' + E.Message);
  Exit
End;