Einzelnen Beitrag anzeigen

Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#8
  Alt 26. Sep 2002, 20:18
Hallo Jan,

fangen wir mal an, ich gehe mal davon aus, dass zu einen Personenrecord erstellt hast, dieser könnte etwa so aussehen:

Code:
type
  Karte = record
    ID       : Integer;
    Nachname : String[30];
    Vorname  : String[30];
    PLZ      : String[10];
    Ort      : String[30];
    Strasse  : String[30];
   end;
Worauf ich hinaus will ist, du solltest wie Paul Jr schon angemerkt hat jeder Karteikarte (Person) eine ID zuordnen.

Die Daten speicherst du dann ja in einem:


Code:
var
  KarteiFile : File of Karte;
Nehmen wir jetzt mal die Urlaubsdatei, du solltest jetzt jedem Eintrag mitgeben, zu welcher Person er gehört.

Also z.B.:
Code:
type
  Urlaub = record
    Person   : Integer;
    Von      : TDate;
    Bis      : TDate;
  end;
Jetzt kannst du für jede Person beliebig viele Einträge in eine Datei : File of Urlaub schreiben. Diese werden nicht sortiert, sondern einfach hintereinander geschrieben.

Wird ein Eintrag später gelöscht, setzt du dessen ID z.B. auf -1, was eine Art Löschkennzeichen ist.

Soweit alles klar?
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat