Einzelnen Beitrag anzeigen

Benutzerbild von RWarnecke
RWarnecke

Registriert seit: 31. Dez 2004
Ort: Stuttgart
4.408 Beiträge
 
Delphi XE8 Enterprise
 
#8

AW: ZQuery liefert nichts zurück

  Alt 29. Jul 2013, 13:50
Mal ins Blaue geraten:

Müsstest Du nicht
ZQuery1.Active := True; statt ZQuery1.Open verwenden?

Ich nehme mal an, dass Open keine Ergebnismenge zurückliefert (wie ExecSQL)
ZQuery1.Open benutze ich immer dann, wenn ich eine Abfrage (SELECT) machen will. ZQuery1.ExecSQL immer dann wenn ich DELETE, UPDATE, INSERT, TRUNCATE oder DROP verwende.

Und das ist der erste Aufruf, den nich beim Programmstart mache.
Die nötigen Rechte sind vorhanden.
Welche Komponenten hast Du auf der Form. Du benötigst TZConnection, TZQuery. Unter Connection die TZConnection. Ist das eingestellt, dann sollte folgender Code funktionieren :
Delphi-Quellcode:
ZQuery1.SQL.Text := 'SELECT * FROM wcf1_user';
ZQuery1.Open;
while not ZQuery1.Eof do
begin
  Memo1.Lines.Add(ZQuery1.FieldByName('username').AsString);
  ZQuery1.Next;
end;
ZQuery1.Close;
Rolf Warnecke
App4Mission

Geändert von RWarnecke (29. Jul 2013 um 16:20 Uhr)
  Mit Zitat antworten Zitat