Welches Ereignis um Rückkehr zu Form zu erkennen

[Delbor]

Hi Norwegen

Zitat:

Meine Frage ist nun, wie ich sicherstellen kann, dass jedes mal, wenn auf dieses frmForm1 zurückgekehrt wird, das gleiche Ereignis ausgelöst wird.

Zitat:

OnShow wird nur nach Create aufgerufen

Und was wird bei Form1.Shw aufgerufen?

Aber machs dir einfacher - baue dein eigenes Event und rufe darin die gewünschte Prozedur auf.
Du könntest dir einen Aufzählungstypen deklarieren, dessen Elemente nach Position geordnete Namen tragen, die nach einem passenden Präfix genau so heissen wie deine Tabs (ohne Präfix) und je nach Typelement in der selben Prozedur eine andere Form createn (oder anzeigen).

Kurz, bevor du dein Event auslöst, weisst du einer Formvariablen eine gewünschte Form zu (aus einer Liste möglicher Formnamen?):
FormVar := Form1 (Form2),(Form3)... Dann feuerst du dein Event ab und übergibst ihm den gewünschten Formnamen. in deiner CreateOrShow-Prozedur kannst du zum Createn/Anzeigen nun deine übergebene Formvarible nutzen.


Das ist jetzt einfach so ein mögliches Vorgehen, vielleicht noch nicht ganz ausgereift, weil ungetestet.
Ich selbst würde mir die Arbeit sparen, für jedes Tab die richtige Form zu bestimmen und gleich zum PageControl greifen.

Gruss
Delbor

[Uwe Raabe]

Eventuell kannst du das mit einem Screen.OnActiveFormChange Event abfangen.

[norwegen60]

Zitat von himitsu:

In diesem Fall wäre eigentlich das "richtige" Event das OnChange des TabControls

Passt mir nicht so, denn dann müsste ich ja auch die Abarbeitung im Hauptform machen oder von dort im TabForm aufrufen

Zitat von himitsu:

Eigentlich arbeitet man hier mit Frames, nicht mit Forms, und schon gibt es diesbezüglich keine "Verwirrung" mehr.

Das stimmt natürlich. Frames habe ich bisher immer dann verwendet, wenn ich ähnliche "Frames" in unterschiedlichen Forms verwendet habe.

Zitat von himitsu:

Also zusätzlich auch noch TApplicationEvents.OnActivate und OnDeactivate

Das schau ich mir an

Zitat von Delbor:

Aber machs dir einfacher - baue dein eigenes Event und rufe darin die gewünschte Prozedur auf. ..

Ich hatte auf eine Standardlösung gehofft

Zitat von Uwe Raabe:

Eventuell kannst du das mit einem Screen.OnActiveFormChange Event abfangen.

Schau ich mir auch an

Danke für eure schnelle Hilfe

[himitsu]

Nja, in den Frame/Form einen EventHandler rein.

Delphi-Quellcode:

public  // oder private
  procedure DoActivate(Sender: TObject);

Und dann das ans OnChange des PageControls hängen,
aber da du mehrere TabSheets hast, hat man hierbei das gleiche Problem, wie beim Application.OnIrgendwas ... dort passt nur ein Event gleichzeitig dran (im Gegensatz zu mehreren TApplicationEvents.OnIrgendwas)



Also andersrum.

Alle Frames/Forms haben eine public Methode (in einem gemeinsamen Vorfahren), oder einfach in einem gemeinsamen Interface.
Und dann prüft im OnChange des TabControls ein Code auf dem ActiveTabSheet das eingebettete Frame/Form auf den Typ/Interface und ruft diese Methode auf.