Einzelnen Beitrag anzeigen

Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.251 Beiträge
 
Delphi 2006 Professional
 
#2

Re: Schleife zum Ausgaben aller Werte einer DB

  Alt 8. Feb 2005, 10:17
Hai Plague,

baue einfach eine While-Do Schleife:


Delphi-Quellcode:
Frame31.Query1.Active := false;
 Frame31.Query1.SQL.Clear;
 Frame31.Query1.SQL.Add('SELECT * FROM Benutzer');
 Frame31.Query1.Active := true;
 While Not (Frame31.Query1.Eof) do
 begin
   Frame31.ListView1.Items.Add.Caption := (Frame31.Query1.FieldByName('Benutzer').AsString);
   Frame31.ListView1.Items.Add.SubItems.Add(Frame31.Query1.FieldByName('Berechtigung').AsString);
   Frame31.Query1.Next;
 end;
[Edit] Warum schreibst Du eigentlich überall Frame31 davor?
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat