[DELPHI] Mainmenu invisble maken

[hydex]

Hoe kan ik het mainmenu invisible maken binnen delphi 6 ?

[jelmervos]

FormMain.MainMenu := nil of MainMenu.Visible := False

[ Voor 37% gewijzigd door jelmervos op 30-01-2004 14:37 ]

[Osiris]

Ik heb binnen 5 minuten niet kunnen vinden hoe je het hele Mainmenu1 (bijv) kunt hiden, maar het is wel mogelijk om de menu's (zoals File) invisible te maken...

Dus dit zou werken:

Delphi:

procedure TForm1.Hide1Click(Sender: TObject);
var i: integer;
begin
For i := 0 to MainMenu1.Items.Count - 1 do
MainMenu1.Items[i].Visible := False;
end;

Delphi schreef op 30 januari 2004 @ 14:36:
FormMain.MainMenu := nil of MainMenu.Visible := False

MainMenu.Visible bestaat dus niet, maar bovenstaande "workaround" werkt iig wel

[ Voor 28% gewijzigd door Osiris op 30-01-2004 14:38 ]

[LordLarry]

Delphi schreef op 30 januari 2004 @ 14:36:
FormMain.MainMenu := nil of MainMenu.Visible := False

Kleine verbetering: Het is TForm.Menu := nil; Je zet TMainMenu niet op invisible, je zorgt er voor dat het form geen menu meer heeft.

[Guillome]

code:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Menu := Nil;
end;

Simpel