Hallo Leute,
bin der totale Anfänger, was objektorientierte Programmierung angeht.
Delphi-Quellcode:
TSoftwarePaket =
class
private
Software: TIntArray;
public
constructor Create;
procedure Init;
function Create_Key :
String;
procedure Mitarbeiter5(Bool :boolean);
procedure ZE(Bool :boolean);
procedure BDE(Bool :boolean);
procedure PEP(Bool :boolean);
procedure ZK(Bool :boolean);
procedure AV(Bool :boolean);
procedure WebZE(Bool :boolean);
procedure AntragsV(Bool :boolean);
...
end;
So weit bin ich bisher gekommen. Die einzelnen Proceduren schreiben alle auf das TIntArray Software.
Merke allerdings im Nachinein, dass so mein TSoftwarePaket sehr unübersichtlich wird.
Ich brauche nämlich ausserdem noch die Möglichkeit die Daten aus dem TIntArray wieder auszulesen.
Würde gerne sowas wie
TSoftwarePaket.Set.Mitarbeiter5
TSoftwarePaket.Set.ZE
TSoftwarePaket.Set.BDE...
und
TSoftwarePaket.Get.Mitarbeiter5
TSoftwarePaket.Get.ZE
TSoftwarePaket.Get.BDE
Ich hoffe, ihr könnt mir folgen...
Wie löse ich das am besten?
Gruß
--fapsons--