如何在DLL中使用TTimer？(70分)

P

paulannar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #1

我想在DLL中编一个定时向串口发送数据的过程<br>请问该如何使用TTimer并编写它的OnTimer？<br>谢谢了<br>

 

S

sjzzhyong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #2

和普通程序没有两样

 

P

paulannar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #3

给个例子好么？<br>谢谢了！

 

P

paulannar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #4

我不知道该怎么用，现在是这么写的<br>procedure TimerSend(PortID: LongInt); stdcall; export;<br>var<br>&nbsp; MyTimer: TTimer;<br>begin<br>&nbsp; Mytimer.Create(MyTimer);<br>&nbsp; MyTimer.Interval:= 100;<br>&nbsp; MyTimer.Enabled:= true;<br>接下来我该如何编写定时发送的部分，在一般程序里我知道用form1.timer1timer()<br>而现在呢？

 

M

Milpas

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #5

自己加一个类,然后把OnTimer放到它里边,再把Timer1.Ontimer指过去<br>type<br>TCom = class(TComponent)<br>&nbsp; iOnTimer(Sender: TObject);<br>end;<br><br>procedure TimerSend(PortID: LongInt); stdcall; export;<br>var<br>&nbsp; MyTimer: TTimer;<br>begin<br>&nbsp; Mytimer.Create(MyTimer);<br>&nbsp; MyTimer.Interval:= 100;<br>&nbsp; MyTimer.Ontimer := iOnTimer;<br>&nbsp; MyTimer.Enabled:= true;<br><br>

 

M

mdc

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #6

楼上说的没错

 

W

wrf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #7

和其它的程序没有什么两样

 

M

mygod!

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #8

楼上说的没有错，要动态创建，还要注意的就是那个ontimer事件指向的那个过程<br>的参数要和ontimer事件的参数一致.比如上面说的都是sender:Tobject;<br><br>

 

P

paulannar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #9

To Milpas:<br>你的意思我明白了<br>我是新手，能麻烦给一个详细点儿的例子么？<br>我想新建一个Unit，然后在这个DLL工程里引用它<br>这样做可以么？<br>谢谢了

 

N

Nizvoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #10

我来给你写个吧~~~~~~~

 

N

Nizvoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #11

Nizvoo@etang.com

 

P

paulannar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-24

• #12

我发了信给你，麻烦了。<br>liboyang_bj@yahoo.com.cn

 

P

paulannar

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-25

• #13

多人接受答案了。