有个小问题，请大家帮帮忙！(10分)

Z

zeroyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #1

我调用"Image1.Canvas.TextOut(x,y,Label1.Caption)"在新工程里能正常运行，却在另一个
非新工程（这个工程里需要此方法）里加入了此方法的全部代码，无任何反应（都在Image1
的MouseDown事件中），但在Button的Click事件里又能正常运行。现在的问题是我是要在
Image1的MouseDown事件里。通过调用"Button1.click"不行。请问为何出现此现象？要怎样
才能在Image1的MouseDown事件中正常调用！

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #2

在Image1的MouseDown事件中:
Button1Click(nil);

 

Z

zeroyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #3

To>>卷兄，还是不行，刚试了。

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #4

procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Button1Click(nil);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Image1.Canvas.TextOut(30,30,'卷起千堆雪tyn');
end;

 

Z

zeroyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #5

是啊！没错！试过了， 就是不行！但新建一工程就行，而且不须经过Button周转！

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #6

莫名其妙.

 

Z

zeroyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #7

我也是有点莫明其妙，是不是电脑病毒作怪？

 

H

huazai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #8

可能是delphi的BUG?

 

Z

zeroyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-28

• #9

多人接受答案了。