bonjour tout le monde,
j´ai un petit souci, meme si celui ci peut apparement paraitre banal, car avec delphi 7, je cree un subitem et je peux a l´aide de la methode add(), faire cela.
voici mon probleme :
avec delphi 7 je le cree comme ceci en temps reel :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
procedure TfNexumBDE.creerSubItem(Sender: TObject);
var 
    pm       : TPopupMenu;;
    mb       :TMenuItem;
    mi   :TMenuItem;
begin
  mb         := TMenuItem.Create(self);
  mb.Name    := "demo";
  mb.Caption  := "test";
  for i:=0 to 5
  begin
    mi         := TMenuItem.Create(mb);
    mi.Name    := 'demo' + InttoStr(i);
    mi.Caption  := 'test' + InttoStr(i);
	pm.Items.Add(mb);
  end;
 end.
est ce que quelqu´un pourrait me dire comment l´a cree dans delphi 2009?

merci d´avance pour votre aide.