Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 

TMainMenu unsichtbar machen

  Alt 23. Okt 2007, 16:59
Mit folgender Procedure kann man ein Hauptmenü (TMainMenu) unsichtbar werden lassen.
Und natürlich auch wieder einblenden.
Delphi-Quellcode:
procedure SetMainMenuVisible(menu:TMainMenu; visible:Boolean);
begin
   if visible then
      SetMenu(menu.WindowHandle, menu.Handle)
   else
      SetMenu(menu.WindowHandle, 0);
end;
Andreas
  Mit Zitat antworten Zitat