Adressbuch, aber...

[roga]

Hallo,

wenn Du jedem Datensatz eine eindeutige ID-Nummer zuweist, ist der Zugriff auf die Daten einfacher.

Delphi-Quellcode:

  TKontakt = record 
    ID: String[6];
    Vorname: String[50]; 
    Nachname: String[50]; 
    Geb_datum: String[10]; 
    Telefon_p: String[20]; 
    Telefon_d: String[20]; 
    Mobil: String[15]; 
    EMail: String[50]; 
  end;

Du musst natürlich beim Hinzufügen neuer Daten sicher stellen, dass die neue ID noch nicht vergeben ist. (Einmal StreamFile durchlaufen und vergleichen)

Erste ID-Nr = 000001 usw.

Die ID's würde ich dann im ListView als Caption übernehmen.

Gruß RoGa