Thema: Delphi Zeoslib

Einzelnen Beitrag anzeigen

Benutzerbild von Seppel
Seppel

Registriert seit: 14. Jun 2005
139 Beiträge
 
#33

Re: Zeoslib

  Alt 17. Okt 2007, 11:26
Kommen wir zu nem neuen Problem
Ich aberbeite derzeit ein Zeoslob Tutorial durch(http://www.dsdt.info/tutorials/zeoslib/?page=7)
habe aber ein Problem bei anzeigen aller Datensätze.
Ich hoffe ihr könnt mir da helfen.

Ich kopiere ambesten den code ma hier rein.

Delphi-Quellcode:
procedure TForm1.Button6Click(Sender: TObject);
begin
  dbMain.Hostname:=edServer.Text;
  dbMain.User:=edLogin.Text;
  dbMain.Password:=edPasswort.Text;
  dbMain.Database:=edDB.Text;
  dbMain.Connected:=True;

  try
  qrMain.SQL.Text:='Select * from `adressbuch` order by name;';
  qrMain.Open;

  while not qrMain.Eof do
  begin
    ListItem := lvAnzeige.Items.Add;
    ListItem.Caption:=qrMain.FieldByName('id').AsString;
    ListItem.SubItems.Add(qrMain.FieldByName('vorname').AsString);
    ListItem.SubItems.Add(qrMain.FieldByName('name').AsString);
    ListItem.SubItems.Add(qrMain.FieldByName('adresse').AsString);
    ListItem.SubItems.Add(qrMain.FieldByName('plz').AsString);
    ListItem.SubItems.Add(qrMain.FieldByName('wohnort').AsString);
    qrMain.Next;
  end;


    finally
        dbMain.Connected:=False;
        end;


end;
Das war der Code für den Button Datensätze anzeigen. Das Listview muss ja Listitem heißen oder?
Der Compiler meckert hauptsächlich beim 1vAnzeige, dabei kann es sich aber net umne Komponente handeln, weil man da ja keine Zahlen eingeben kann.
Deshalb bin ich auch so ratlos. Ich glaube es ist eine Eigenschaft, die bei mir anders heißt^^.

Den gesamten Fehler habe ich im Anhang.
Miniaturansicht angehängter Grafiken
compilermeckert_135.jpg  
Sebastian
www.seppel.de.pn
  Mit Zitat antworten Zitat