Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by oki,
9. Aug 2007
So sehe ich das auch.
Auch wenn man die heren Ziele nicht erreicht, ist es gut sie zu haben. So bleibt das Bemühen erhalten sauber zu proggen. Aber ohne Tricks geht es manchmal nicht.
Gruß oki
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by oki,
9. Aug 2007
Hi 3_of_8,
das mit der gemeinsamen Vorfahrenklasse ist sicher der übersichtlichere Weg. Ich glaube, ich hab uligerhardt's Antwort zu schnell bei Seite geschoben.
Gruß oki
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by oki,
9. Aug 2007
@uligerhardt:
Jo, aber TMyNewControl soll mehrere Eigenschaften von TMyBaseControl erben. Neben Paint, wie hier im Beispiel, weden aber einge Methoden anders behandelt. aus diesem Grund meine Frage in diese Richtung.
@jbg:
Jo, dass ist natürlich auch noch 'ne Variante. So zu sagen von hinten durch die Brust. :lol: (würde ich sagen)
@Hagen:
Den Trick mit TMethod kannte ich noch nicht. Da...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by oki,
9. Aug 2007
Grrr roter Kasten!
Dann aber ohne inheritet in meiner Variante MyCustomDraw. Paint ohne inherited? Geht da dann nicht einiges schief?
Gruß oki
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by oki,
9. Aug 2007
Jo, dass ist mal Pech. Dachte ich mir schon, war mir aber nicht sicher. Dann muß ich mir was anderes einfallen lassen.
Mach ich's halt so:
TMyBaseControl = class(TCustomControl)
private
FfirstProperty : string;
protected
procedure Paint; override;
procedure MyCustomDraw; virtual;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by oki,
9. Aug 2007
Mir ist so recht nicht der richtige Titel eingefallen und wie ich nach diesem Thema suchen soll ???????
Hier das Problem:
Ich habe eine eigene Klasse mit Eigenschaften und überschriebenen Methoden des Vorfahren. Eine weitere vererbte Klasse meiner neuen Klasse soll aber eine virtuelle Methode des alten Vorfahren mit inherited aufrufen. Wie mach ich das?
hier ein Beispiel:
...