as操作符的疑惑???(30分)

S

sjloop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-20

• #1

小弟初学DELPHI，在form1中放入3个button,然后按delphi的帮助的例子写出了下面的语句：
procedure TMainForm.Button1Click(Sender: TObject);

begin
if Sender = Button1 then
AboutBox.Caption := 'About ' + Application.Title
else
AboutBox.Caption := '';
AboutBox.ShowModal;
end;

但是我只能在按button1时会showmodal,按其他button时根本没反应，请问是哪里出了问题？？？？

 

X

XWHope

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-20

• #2

确定其他button的Onclick用了Button1Click事件

 

东

东兰梦舞

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-20

• #3

可能：
其它的BUTTON的OnClick没有关联到Button1Click上

 

X

xingyanlin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-20

• #4

当然了，只有Button1才定义了事件处理！

 

K

kenxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-20

• #5

将其它的BUTTON的OnClick关联到Button1Click上即可！