ADOQuery meckert bei leeren Strings

[marabu]

Hi,

Active := True oder Open, immer wenn eine Ergebnismenge zurückgegeben wird.
ExecSql in allen anderen Fällen.
Nie beides gleichzeitig verwenden.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ListBox2.Clear;
 
  with AdoQuery1 do
  begin
    SQL.Text := 'select * from testtabelle order by testfeld';
    Open;
    while not Eof do
    begin
      ListBox2.Items.Add(FieldByName('testfeld').AsString);
      Next;
    end;
    Close;
  end;
end;

Freundliche Grüße