Einzelnen Beitrag anzeigen

HolgerX

Registriert seit: 10. Apr 2006
Ort: Leverkusen
972 Beiträge
 
Delphi 6 Professional
 
#2

AW: Problem Auslesen von MySQL und Ausgabe in ListViews

  Alt 25. Aug 2017, 06:21
Hmm..


Delphi-Quellcode:
//schreiben der Daten aus der Datenbank "inhouse" in die Listview
while not SQLQuery2.Eof do
 item2:=mainFrm.ListView2.Items.Add;
 item2.Caption:= SQLQuery2.FieldByName('IDIH').AsString;
 item2.SubItems.Add(SQLQuery2.FieldByName('ProduktnameIH').AsString);
 item2.SubItems.Add(SQLQuery2.FieldByName('HerstellerIH').AsString);
 item2.SubItems.Add(SQLQuery2.FieldByName('istIH').AsString);
 item2.SubItems.Add(SQLQuery2.FieldByName('sollIH').AsString);
 item2.SubItems.Add(SQLQuery2.FieldByName('MHDIH').AsString);
 item2.SubItems.Add(SQLQuery2.FieldByName('BarcodeIH').AsString);
 item2.SubItems.Add(SQLQuery2.FieldByName('KommentarIH').AsString);
 SQLQuery2.Next;
 SQLQuery2.Close;

Fehlt da nach while not SQLQuery2.Eof do nicht ein 'begin..end'
  Mit Zitat antworten Zitat