急问事件赋值语句应该如何写？(100分)

P

Passion

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-10

• #1

从Delphi刚转到BCB，连一些基本的语法都搞不清。
我动态创建了一个timer，将其Ontimer事件用一个事件处理函数timefunc来处理。这个timefunc函数我要写成一个单独的函数，不是某个类的成员函数。麻烦高手指点一下？

 

李

李衍智

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-12

• #2

timer->OnTimer = timefunc;

 

迷

迷糊

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-12

• #3

procedure Tform1.ontimer(sender:tobject);
begin
//...
end;
procedure Tform1.buttonqclick(sender:tobject);
var
ftime:ttimer;
begin
Ftimer:=ttimer.Create(nil);
ftimer.Enabled:=false;
ftimer.Interval:=30000;
ftimer.OnTimer:=ontimer;
end;

 

G

geradle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-20

• #4

首先此函数应该声明为void __fastcall function(){}
至于访问限制无关紧要。
然后
timer->OnTimer = timefunc;

 

P

pzoon

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-04

• #5

先声明一个和ONTIMER带有一样参数的函数
然后就可以把TIMER的ONTIMER事件指过去旧可以了；
Timer1->OnTimer = TimeFunc；

 

S

softprince

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-06

• #6

BCB和delphi也没多大区别

 

P

Passion

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-29

• #7

明白了，必须是某个类的成员函数，否则就不能赋值。