wenn du kunde für kunde speichern möchtest, ist eine typ. Datei eigentlich eine gute Lösung, oder eben eine ini-datei.
ein paar Klassen-Vorschläge:
Delphi-Quellcode:
type
TArtikel = (Apfel,Papier,Eier,Buch,...(*kA was es da alles gibt*));
TKunde = class(TObject)
public
ECNummer: Integer;
zuletztGekauft: Array of TArtikel;
Warenkorb: Array of TArtikel;
procedure WarenkorbGefuellt(AKasse:TKasse);
procedure AddToWarenkorb(AArtikel:TArtikel);
end;
TKasse = class(TObject)
public
Kunden: Array of TKunde;
GekaufteArtikel: Array of TArtikel;
ErhaltenesGeld: Integer;
function GetVerfuegbareArtikel: Array of TArtikel;virtual;abstract;
end;
TSupermarkt = class(TKasse)
public
GetVerfuegbareArtikel:Array of TArtikel;override;
end;
TBank = class(TObject)
public
Clients: Array of TKasse;
function GetErhaltenesGeld:Integer;
function GetKundenzahl:Integer;
end;
... //usw.
ich hoffe, dieser Vorschlag ist so etwa in deinem sinne, wenn nicht, tuts mir leid
das Essen ist wie das Internet - Downstream ist immer angenehmer als Upstream
-
Warum missbraucht die ganze Programmierwelt Images als Paintboxen