Hallo DPler!
Ich suche eine Möglichkeit, die CreateParams, WMSyscommand und WMActivate global für alle TForms in einer Anwendung zu ersetzen. Ziel ist es, ohne Forms.pas Änderung verschiedene TForm Anpassungen per
Unit einzubinden.
Damit möchte ich vermeiden, in jedem Form der Anwendung die Änderungen an CreateParams etc. zu erfassen, damit dies nicht vergessen wird.
Ich habe schon etwas in Richtung
Delphi-Quellcode:
TMyCustomFormHelper = class helper for TForm bzw. TCustomForm
protected
procedure CreateParams(...); override;
...
end;
versucht, aber dies geht ebenso wenig wie eine Neuzuweisung der TForm Classe im Sinne von:
Delphi-Quellcode:
TmyCustomForm = class(TCustomForm);
protected
procedure CreateParams(...); override;
end;
TForm = class(TmyCustomForm);
An sich sollte die letzte Klassenzuweisung TForm doch klarmachen, daß es von TmyCustomForm abstammt, nicht von TCustomForm. Oder?
Gruß winkel79