Hallo 8)
Ich habe ein Hauptformular und ein Kind-Formular. Auf dem Hauptformular befindet sich ein Menu (Menu1) (TMainMenu). Auf dem Kind-Formular befindet sich auch ein Menu (Menu2) (TMainMenu) und wird (falls Kind aktiv) in das Menu1 des Hauptformulars automatisch eingebetet.
Das Problem ist folgendes:
Auf dem Kind-Formular befindet sich ein PageControl und je nach PageControl -Seite die man dort auswählt sollten nicht alle Menue-Punkte aus dem Menu2 auf Enabled = TRUE stehen. Also am einfachsten gesagt die Menue-Punkte (TMenuItem) aus dem Menu2 müssen angesteuert werden (mal ENABLED = FALSE mal ENABLED = TRUE).
Dazu habe ich das OnChange- Ereignis von Menu2 (also auf dem Kind-Formular) benutzt.
Leider schon die einfachste Zuweisung
Code:
procedure Form2.Menu2Change(Sender: TObject; Source: TMenuItem; Rebuild: Boolean);
BEGIN
MenuItem1.Enabled := FALSE;
MenuItem1.Enabled := TRUE;
END;
bringt das Ganze zur einer
Exception.
Wohl gemerkt zu diesem Zeitpunkt ist das Menu2 schon in das Menu1 auf dem Hauptformular eingebetet...
Wer weiß Bescheid?
Gruß
Paul Jr.