salut
j'utilise un maimenu dans mon apllication ,ce mainmenu contient 03 volets ,chaque volet contient des sous menu, je veut désactiver le 01 et 02 volet au demarage de l'application,je utilise ce code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
procedure TForm18.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
begin
if (edit1.Text='aa')and (edit2.text='bb') then
form2.showmodal;
form2.mainmenu1.items[0].enabled:=false;
form2 .mainmenu1.items[1].enabled:=false
end;
end;
mais ça na pas marché.
merci cordialement rec82.