Thema: Kundenliste

Einzelnen Beitrag anzeigen

EdAdvokat

Registriert seit: 1. Mai 2016
Ort: Berlin
419 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#1

Kundenliste

  Alt 14. Apr 2017, 17:55
Datenbank: SQLite-3 • Version: 3 • Zugriff über: ZeosLib
Hallo, Ich taste mich so langsam an Datenbankanwendungen heran und habe nach vorangegangenen Übungen nun eine Erweiterung des Programms Warenverkauf geschrieben. Ich bedanke mich hiermit nochmals für die Hilfe im Forum,vor allem bei Hobbycoder, p80286 und Haentschmann, sowie weiteren usern die mir viele Tipps und Hinweise gegeben haben. Hoffentlich enttäusche ich Euch nicht mit dem jetzigen Versuch. Ich habe eine Objectlist erstellt und will mit deren Hilfe Daten in eine SQLite-3 Tabelle speichern und natürlich auch wieder auslesen.
Das hat soweit erst einmal geklappt. Die Daten wurden erstellt und in einem Listview dargestellt. Auch die Speicherung in die Datenbank klappt soweit ganz gut. Nach dem Neustart des Programms sind die automatisch erstellten Daten wieder vorhanden.
1. Frage: ich habe eine TCustomer.create erstellt. Muss ich das irgendwo auch wieder freigeben? Die Customerlist gebe ich in Destroy frei.
2. Frage: Die Datensätze werden nicht in den gesondert erstellten TEdit-Feldern angezeigt, ausgenommen die 2 am Ende der Tabelle(mit der KDNR 67). Ich kann mir nicht erklären warum und habe keinen Ansatz, um die Ursache zu ergründen. Komischerweise wird in den TEdit's nicht der entsprechende Datensatz des ListView sondern ein ganz anderer Datensatz der Tabelle angezeigt, der tatsächlich auch existiert.
Warum erscheinen die Daten nicht in den Edit-Feldern?
Also vermutlich werden nur die "fehlerhaften Datensätze" (KDNR 67) in den TEdits angezeigt. Was mache ich falsch, oder wie muss ich vorgehen?
Es handelt sich nur um ein Übungsprogramm ohne tiefen Sinn nur für mein Verständnis, um in der Sache weiter zu kommen.
Bin ich damit auf dem richtigen Weg?
Ich wünsche allen Forumnutzern ein frohes Osterfest.
Angehängte Dateien
Dateityp: rar CustomerList.rar (3,98 MB, 18x aufgerufen)
Norbert
  Mit Zitat antworten Zitat