Form-Ableitungen

**rbest**

Hallo Kollegen,
irgendwas mache ich falsch bei meinen Klassendeklarationen. Im OnActivate bringt Delphi dauernd ein inherited. Meine Forms leite ich wie folgt ab: form_base -> form_norm -> frmET_Main

markieren

Delphi-Quellcode:

			  TFormNorm = class(TFormBase)

    _StatusBar: TStatusBar;

    procedure FormActivate(Sender: TObject);

    procedure FormCreate(Sender: TObject);

2. Ableitung:
TfrmET_Main = class(TFormNorm) Besten Dank für die Hilfe

**Christian Seehase**

Moin rbest,

Zitat von rbest:

Im OnActivate bringt Delphi dauernd ein inherited.

was willst Du uns damit sagen?

**rbest**

Hätt ich das auch sagen sollen?

Ein Kollege hier behauptet, meine Klasse sei faul, denn OnActivate sei nur ein Zeiger und darf deswegen im Ereignis kein inherited enthalten.

Na klar darf es das, es wäre ja sonst kein richtiges OOP mehr.

kleines Beispiel:
Erstelle dir ein Form mit irgendeinem Code im OnActivate. Jetzt klickst du mal auf File\New\Others, wählst deinen Projektnamen und dein Form.
Inherited muss angeklickt sein!
Jetzt hast du 2 identische Forms in deinem Projekt. Form2 (die Ableitung) hat aber ein inherited im OnActivate, d.h. es läuft erst der Code aus Form1 bevor der aus Form2 läuft.

Form-Ableitungen

Form-Ableitungen

Re: Form-Ableitungen

Re: Form-Ableitungen

Re: Form-Ableitungen

Forumregeln

Christian Seehase (Co-Admin) Registriert seit: 29. Mai 2002 Ort: Hamburg 11.117 Beiträge Delphi 11 Alexandria	#2 Re: Form-Ableitungen 28. Apr 2004, 20:10 Moin rbest, Zitat von rbest: Im OnActivate bringt Delphi dauernd ein inherited. was willst Du uns damit sagen? Tschüss Chris Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel. Der Klügere gibt solange nach bis er der Dumme ist
	Zitat

rbest Registriert seit: 14. Nov 2003 Ort: Tannheim 71 Beiträge Delphi 7 Professional	#3 Re: Form-Ableitungen 29. Apr 2004, 08:04 Hätt ich das auch sagen sollen? Ein Kollege hier behauptet, meine Klasse sei faul, denn OnActivate sei nur ein Zeiger und darf deswegen im Ereignis kein inherited enthalten. Wenn nur alle so wären wie ich - sein sollte.
	Zitat