Onactivate wird nicht ausgelöst bei Programm D5 --> D2006

[zeras]

Ich bin dabei, ein Programm von D5 auf D2006 zu portieren.
Das geht auch soweit, aber offensichtlich wird das OnActivate Ereignis des Hauptformulars nicht ausgelöst. Wenn ich einen Breakpoint setze, bleibt das Programm trotzdem nicht drin stehen.
Was mache ich falsch?

[DeddyH]

Ist das Ereignis im OI noch zugewiesen?

[zeras]

Ja, habe es erst in der neuen Version gebraucht und mit Doppelklick dann erzeugt.

[DeddyH]

Sehr merkwürdig. Ich habe gerade einmal testhalber im OnActivate meines Hauptformulars eine Message eingebaut, die sehe ich auch (D2007).

[zeras]

Irgendwie muss das mit dem Projekt zu tun haben. Ursprünglich kam das Projekt von D2. Mit dem Winlocalizer habe ich auch Probleme damit. Wenn ich TBitBtn nutze, werden diese nicht übersetzt. Wenn ich dann auf einen anderen Buttontyp umstelle, geht das.

[toms]

Bei einem neuen Project (2 Forms) funktioniert es?

[turboPASCAL]

Ist das eine Frage oder eine Feststellung ? ;)

Was möchtest du denn machen ? ggf. must du den Application-Event OnActivate nutzen
um zu erreichen das du ein Event bekommst wenn deine Form angeklickt wird.

[Satty67]

Schon mal versucht, das D5 Projekt "minimalistisch" an D2006 zu übergeben?

Also ohne *.dsm, *.dsk, *.res. Die Dateien werden ja bei Fehlen wieder neu angelegt. In der Formulardatei selber steht ja nur "onActivate = FormActivate", was selbst bei D2007 noch so ist.

[zeras]

Zitat:

Zitat von toms

Bei einem neuen Project (2 Forms) funktioniert es?

Es ist das Hauptform. Wenn ich das so in ein neues Projekt schreibe

Delphi-Quellcode:

procedure TForm17.FormActivate(Sender: TObject);
begin
  ShowMessage('OnActivate');
end;

dann kommt das Fenster.

[zeras]

Offensichtlic habe ich die Richtung gefunden:

das Hauptformular ist ein "fsMDIForm".

Danach erzeuge ich noch ein "fsMDIChild".

Wenn ich das Childformular nutze, dann kommt es nicht zum OnActivate des Hauptformulars.
Warum das so ist, kann ich aber nicht sagen.
Hat jemand eine Idee?

[Satty67]

Zitat:

Zitat von zeras

Wenn ich das Childformular nutze, dann kommt es nicht zum OnActivate des Hauptformulars.

Was heißt, wenn Du das ChildFormular nutzt? Nutzen kannst Du es doch erst nach OnActivate des Hauptformulars.

Erzeugst Du das MDIChild evtl. bereits im onCreate des MainForm (also des MDIForm)? In dem Fall würde ich das erzeugen des MDIChild in onActivate des MDIForm verlegen. Einen doppelten Aufruf kann man durch eine entsprechende Var verhindern.

Könnte mir gut vorstellen, das ein onActivate des MDIForm bei neueren Delphi-Versionen verhindert wird, wenn der Focus gleich auf ein MDIChild gelegt wird.

€:
Ok im Create geht nicht, aber automatisch erzeugen. Wenn ich das erste MDIChild automatisch erzeuge, wird bei mir weder bei Delphi 5 noch bei Delphi 2007 MDIForm.OnActivate aufgerufen!

Erzeuge ich kein MDIChild automatisch, wird bei beiden Delphi MDIForm.OnActivate aufgerufen.

Erzeuge ich das MDIChild in MDIForm.OnActivate dynamisch, dann wird aller nachfolgender Code in OnActivate nicht mehr ausgeführt (komisch)

Also für mich logisch, das bei sofort erzeugtem MDIChild, das MainForm kein OnActivate Ergeignis bekommt... und auch bei D5 und D2007 reproduzierbar.

[zeras]

So sieht mein Projektquelltext aus.

Delphi-Quellcode:

Application.Initialize;
  Application.Title := 'my programm';
  Application.CreateForm(TfmMain, fmMain);  -->"fsMDIForm"
  ..............
  ..............
  Application.CreateForm(TfmProzessdata, fmProzessdata); --> "fsMDIChild"
  ..............
  ..............

  Application.Run;

Ich habe die Zeilen jetzt in "Show" des fmMain gebracht und jetzt geht's erst mal zum Test.


Vielleicht wird wirklich in neueren Versionen gleich der Fokus auf MDIChild gelegt, wie Satty67 sagt.

[Satty67]

Ja, das Beispiel von Dir, wie es bei Dir vorher war, entspricht dem automatischen Anlegen des MDIChild. Das führt bei mir bei allen Delphi Versionen dazu (D5 + D2007), dass onActivate des MainForm nicht aufgerufen wird.

Form.OnActivate wird nach Application.OnActivate (App.Run) aufgerufen und zu dem Zeitpunkt ist das MDIChild bereits erzeugt und bekommt den Focus. Für mich damit logisch, das MainForm kein Activate Ereignis mehr bekommt.