Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi OnCreate von Form überschreiben (https://www.delphipraxis.net/63693-oncreate-von-form-ueberschreiben.html)

criminal 21. Feb 2006 17:23


OnCreate von Form überschreiben
 
Hi,
also hab' folgendes Problem:
Ich hab' 'ne Komponente erstellt, die ich von TPaintBox ableite, dann hab' ich das Create überschrieben:
constructor Create(AOwner: TComponent); override;
Im Contruktor überschreibe ich dann das OnCreate des Formulars, auf welchem die Komponente platziert wird mit:
(AOwner as TForm).OnCreate := Init;
Wie kann ich nun das OnCreate-Ereignuss von dem Form aufrufen, ehe mein eigenes neues OnCreate (Init) aufgerufen wird?

Luckie 21. Feb 2006 17:28

Re: OnCreate von Form überschreiben
 
Delphi-Referenz durchsucheninherited.

criminal 21. Feb 2006 18:01

Re: OnCreate von Form überschreiben
 
Mit inherited funktionierts nicht, keine Ahnung warum, vielleicht versucht er da etwas von TComponent aufzurufen...

SirThornberry 21. Feb 2006 18:06

Re: OnCreate von Form überschreiben
 
warum sicherst du dir nicht einfach das alte OnCreate des formulars und rufst dies dann in deinem init auf?
Delphi-Quellcode:
fOldOnCreate := (AOwner as TForm).OnCreate;
(AOwner as TForm).OnCreate := Init;
[...]
procedure [...].Init;
begin
  //do something
  fOldOnCreate(Owner);
end;

criminal 21. Feb 2006 18:13

Re: OnCreate von Form überschreiben
 
Perfekt, so geht's!
Danke


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:15 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz