Forum: Object-Pascal / Delphi-Language
Delphi
by Rob09,
11. Apr 2011
(Thema ist jetzt nicht mehr als offene Frage markiert)
Forum: Object-Pascal / Delphi-Language
Delphi
by Rob09,
11. Apr 2011
Zunächst mal vielen Dank an euch alle für die Hilfe!
Habe hier mal zwei mögliche Lösungen implementiert.
Dier erste benutzt ein "Kapsel-Objekt" (namens ExpKlasseRO) innerhalb der OberKlasse, auf das der Benutzer zugreifen darf. Dieses liest alle Eigenschaften vom eigentlichen UnterObjekt ohne Schreibzugriff, wobei der User das eigentliche UnterObjekt gar nicht sieht. Das ist die Lösung, die...
Forum: Object-Pascal / Delphi-Language
Delphi
by Rob09,
10. Apr 2011
Naja, falls ich weitere TMyKlasse2, TMyKlasse3, ... habe, die ebenfalls ein ReadOnly-Unterobjekt vom selben Typen haben, wäre die THilfsKlasse ja schon sinnvoll.
Forum: Object-Pascal / Delphi-Language
Delphi
by Rob09,
10. Apr 2011
Hmmm...
Wenn jetzt alerdings FUnterObjekt wiederum nicht nur Datentypen, sondern auch Objekte enthält, habe ich das gleiche Problem wieder - nur eine Ebene tiefer :gruebel:
nehme aber an, dass es prinzipiell keine Lösung gibt, die genau meinen Bedürfnissen entspricht... Oder? :glaskugel:
Forum: Object-Pascal / Delphi-Language
Delphi
by Rob09,
10. Apr 2011
Guter Denkanstoß!
Ich denke, ich werde eine THilfsKlasse einführen, die sämtliche Getter (bzw. ReadOnly-properties) und eine nicht auslesbare Referenz auf ein Objekt vom Typ TUnterKlasse (in diesem Fall FUnterObjekt) enthält. TMyKlasse bekommt dann ein FHilfsObjekt vom Typ THilfsKlasse spendiert und ich ändere die property UnterObjekt in FMyKlasse dahingehend, dass diese auf FHilfsObjekt...
Forum: Object-Pascal / Delphi-Language
Delphi
by Rob09,
10. Apr 2011
Hi!
Ich habe ein kleines Problem und würde mich sehr über etwas Hilfe freuen.
Es geht dabei um die wie folgt aufgebaute Klasse:
type
TMyKlasse = class(TObject)
private
FUnterObjekt: TUnterKlasse;