In welchem Package ist TForm drin?

[Codehunter]

Ich steh grad etwas auf dem Schlauch: In welchem Package ist bei Delphi 5 die TForm-Klasse drin? Ich möchte endlich ein OnAfterShow-Ereignis implementieren weil mir das langsam zu doof wird daß bestimmte Sachen immer ausgeführt werden bevor das Form angezeigt wird und damit der Formularaufbar unnötig lange dauert.

Ich habe das schon oft gebraucht und jedesmal drumrumgewurschtelt aber jetzt will ich mir das mal implementieren. Der Einfachheit halber gleich in den Basisroutinen der VCL.

[jfheins]

Zitat:

Zitat von Codehunter

Ich steh grad etwas auf dem Schlauch: In welchem Package ist bei Delphi 5 die TForm-Klasse drin?

Forms.pas sollte das sein

Zitat:

Der Einfachheit halber gleich in den Basisroutinen der VCL.

Ganz, ganz schlechte Idee ... leite die ein Formular ab, implementiere das Event und lege es in die Objektablage. Vorhandenen Formularen kannst du das neue Formular durch manuelles editieren der .pas und .dfm Datei unterschieben

[Codehunter]

Ist schon klar das mit der Objektablage. Das Problem dabei ist: Delphi 5 zeigt Eigenschaften und Ereignisse von TForm-Abkömmlingen nicht im Objektinspektor an. Das hab ich nämlich schon oft versucht, hat nie geklappt. Und jedesmal die Handler zur Laufzeit zuweisen, och nöööö.

Ich hab schon öfter am Basiscode rumgespielt, so manchen Backport aus neueren Delphi-Versionen vorgenommen usw.

[jbg]

Zitat:

Zitat von Codehunter

Das Problem dabei ist: Delphi 5 zeigt Eigenschaften und Ereignisse von TForm-Abkömmlingen nicht im Objektinspektor an.

Wofür brauchst du denn dafür ein Event. Eine virtuelle Methode macht das selbe. Und die kannst du über Ctrl+Space innerhalb der Klassendeklaration komplett automatisch einfügen lassen (wenn der Vorfahr sie deklariert hat).

[jaenicke]

Du kannst auch das Ereignis OnActivate benutzen und nach der Anzeige dieses Ereignis löschen. Damit hast du doch praktisch schon alles fertig...

Delphi-Quellcode:

procedure TFormX.FormActivate(Sender: TObject);
begin
  OnActivate := nil;

  ...

end;

// EDIT:
Nachteil bei einem solchen Vorgehen: Der Benutzer sieht schon das Formular und ärgert sich, dass es noch nicht reagiert. Deshalb nehme ich eher einen SplashScreen, wenn es wirklich zu lange dauert.

Und bei meinen besten Projekten benutze ich Threads, das ist zwar am aufwendigsten, aber für den Benutzer auch deutlich am besten.

[Codehunter]

Zitat:

Zitat von jaenicke

Und bei meinen besten Projekten benutze ich Threads, das ist zwar am aufwendigsten, aber für den Benutzer auch deutlich am besten.

Hab ich mich auch ein paar Mal dran versucht, hat aber jedesmal geknallt zur Runtime. Entweder war ich zu doof oder der Compiler hat einen an der Murmel, jedenfalls liefen nicht mal Beispiel-Projekte aus anderen Tutorials.

Hab mal einen Systemdienst programmiert der permanent auf der seriellen Schnittstelle lauscht. Den hätte ich auch gern in einen separaten Thread gebracht. Denn so ist das Ding jetzt permanent auf 100% CPU-Last wegen der Leseschleife. Aber das ist ein anderes Thema.