如何在mainmenu的click事件中去menuitem的名字？？？(10分)

N

njuzgc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-26

• #1

procedure TMainForm.N39Click(Sender: TObject);
begin
end 之间应怎么写代码？？
谢谢！！

 

X

xcplates

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-26

• #2

procedure TForm1.hh1Click(Sender: TObject);
begin
showmessage((Sender as TMenuItem).Caption);
end;

 

N

njuzgc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-26

• #3

接受答案了.