用delphi如何编写windows 服务程序(100分)

希

希诺

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-23

• #1

我想用delphi编写windows后台服务程序，用于定时检索数据库，有没有范例？？？
我试了几次 发现只能服务安装成功，但是不知道从什么地方加入代码？？
而且经常启动之后没反应，关闭也关不掉，望各位delphi高手指导。

 

H

hpboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-23

• #2

用参数/uninstall

 

希

希诺

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-23

• #3

/uninstall我当然知道 我想知道如果哦要编写数据库定时检索程序应该在什么地方编写？？
事件是什么？？？是不是一定要用线程？？

 

Z

zm30

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-23

• #4

加一个TTimer控件，在ontimer事件中写数据库定时检索程序

 

希

希诺

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-23

• #5

感谢你们的支持，不过我问的不是那么简单

 

淡

淡淡的笑

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-23

• #6

delphi的file菜单 new.. 选择 Service or Application Service.

跟一般应用程序的区别好象是有返回一些特定的值,并且可支持 /install 和 /uninstall 服务的操作.

 

J

jasper

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-23

• #7

1New --Service Application
2 在Service1上放置 TIMER1，TADOCONNECTION ，TADOQUERY，TDataSetProvider
各一个
TIMER1。TIMER中设置你的TADORQUERY的检索数据语句，服务端就做成了
3。执行并注册
4。注册让其作为服务运行
客户
1 NEW--APPLICATION
2 窗体上放置TDCOMConnection，TCLIENTDATASET。TDCOMCONNECTION连接
服务端，CLIENTDATASET取数据

看看结果吧，可以了
OK了

 

T

tsedlinux

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-23

• #8

gz

 

C

cenjoyer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-12

• #9

那怎么控制一个服务呢？
例如：启动/关闭/得知是否运行