Supermarktkasse

[Jelly]

Andreas Idee mit TObjectList ist an und für sich ganz gut, nur seine Umsetzung etwas unglücklich gewählt:

- TArtikel würde ich von TObject ableiten. Warum den ganzen Rotz von TComponent mit rumschleppen wenn's nicht gebraucht wird.
- Und die TArtikelCollection würd ich direkt von TObjectList ableiten. Das erspart dir die FIdCount Variable, und du kannst Collection spezifische Daten drin erfassen. TArtikelCollection ist ja nix anderes als die Kasse an sich, also könnte man da so Sachen wie Kassennummer, Kassierin usw. reinhauen. Damit hättest Du sämtliche Informationen in einem einzigen Objekt rumliegen, das intern in einer Liste die TArtikel aufgenommen hat.

Neben TObjectList gibts noch die TCollection und TCollectionItem Klassen. Damit lassen sich die ganzen Dinge auch direkt in einer Datei abspeichern, zumindest wenn man die TjsCollection nutzt.