Hallo zusammen,
nehmen wir an, ich habe Kunden
Delphi-Quellcode:
TKunde = record
name: string;
vorname: string;
...
end;
TKunden = array of TKunde;
und Artikel
Delphi-Quellcode:
TArtikel = record
nummer: word;
Suchbegriff: string;
...
end;
TArtikelliste = array of TArtikel;
Nun hab ich noch eine Prozedur sagen wir zum speichern der Kunden
Delphi-Quellcode:
procedure KundenSpeichern;
var
f: file of TKunde
i: integer;
begin
// Datei öffnen, schließen, usw... lasse ich jetzt mal weg
for i := 0 to high (kundenliste) do
write (f, kunden[i]);
end;
Bei den Artikeln sieht die prozedur exakt gleich aus, außer das aus TKunde TArtikel wird, und entsprechend aus file of TKunde natürlich file of TArtikel.
Kann man eine Klasse deklarieren, in der noch nicht klar ist, oder es undefiniert bleibt, mit welchen Datentypen sie sich rumschlagen muß?
Ziel wäre, einen Vorfahr von Kunden und Artikel zu haben, der eine Liste hat, speichern und laden kann, usw. sonst hab ich ja allen Code, bis auf Kleinigkeiten, doppelt...
Mit gespannten Grüßen
Marco