Aah cool, so gehts (in Berlin).
Hab im MainMenu1.OnChange gesetzt und da drin geschrieben:
Delphi-Quellcode:
procedure TForm1.MainMenu1Change(Sender: TObject; Source: TMenuItem;
Rebuild: Boolean);
begin
SendMessage(MainMenu1.WindowHandle, CM_MENUCHANGED, 0, 0);
DrawMenuBar(MainMenu1.WindowHandle);
end;
Jetzt geht es ohne weiteres Herumgetrickse...
Danke für Eure Hilfe!!