问一个关于delphi服务的问题

shuihan20e 2013-09-04 03:44:53
用delphi的ServiceApplication写了一个服务，连接oracle，但是每次重启时，服务比数据库启动的要快，如何让这个服务等oracle启动后再启动？
网上看到有人说加依存，TDependencies，但是我试了，好像不管用

谁有解决方法？
...全文
577 20 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
20 条回复
切换为时间正序
请发表友善的回复…
发表回复
shuihan20e 2014-01-24
  • 打赏
  • 举报
 回复
引用 17 楼 lhylhy 的回复:
[quote=引用 15 楼 shuihan20e 的回复:] [quote=引用 13 楼 lhylhy 的回复:] 延迟一些再连数据库。
我就是想知道怎样延迟？[/quote]
引用 15 楼 shuihan20e 的回复:
[quote=引用 13 楼 lhylhy 的回复:] 延迟一些再连数据库。
我就是想知道怎样延迟？[/quote] sleep[/quote] 你有没有在服务里试过？根本不行，这个方法我一开始就试过了，不光要sleep,还要在execute处死循环
lhy 2014-01-24
  • 打赏
  • 举报
 回复
引用 18 楼 shuihan20e 的回复:
[quote=引用 17 楼 lhylhy 的回复:] [quote=引用 15 楼 shuihan20e 的回复:] [quote=引用 13 楼 lhylhy 的回复:] 延迟一些再连数据库。
我就是想知道怎样延迟？[/quote]
引用 15 楼 shuihan20e 的回复:
[quote=引用 13 楼 lhylhy 的回复:] 延迟一些再连数据库。
我就是想知道怎样延迟？[/quote] sleep[/quote] 你有没有在服务里试过？根本不行，这个方法我一开始就试过了，不光要sleep,还要在execute处死循环[/quote] 服务当然要死循环了。
「已注销」 2014-01-24
  • 打赏
  • 举报
 回复
只能说，这个需求很蛋疼
shuihan20e 2014-01-23
  • 打赏
  • 举报
 回复
引用 14 楼 tcmakebest 的回复:
[quote=引用 12 楼 shuihan20e 的回复:] 愿闻其详，继续啊
这么老的帖子，连接数据库失败的时候，等待一段时间后重连就好了，简直太简单了，晕[/quote] 是啊，太简单了，详细点说，在execute里吗？
shuihan20e 2014-01-23
  • 打赏
  • 举报
 回复
引用 13 楼 lhylhy 的回复:
延迟一些再连数据库。
我就是想知道怎样延迟？
lhy 2014-01-23
  • 打赏
  • 举报
 回复
引用 15 楼 shuihan20e 的回复:
[quote=引用 13 楼 lhylhy 的回复:] 延迟一些再连数据库。
我就是想知道怎样延迟？[/quote]
引用 15 楼 shuihan20e 的回复:
[quote=引用 13 楼 lhylhy 的回复:] 延迟一些再连数据库。
我就是想知道怎样延迟？[/quote] sleep
tcmakebest 2014-01-22
  • 打赏
  • 举报
 回复
引用 12 楼 shuihan20e 的回复:
愿闻其详，继续啊
这么老的帖子，连接数据库失败的时候，等待一段时间后重连就好了，简直太简单了，晕
lhy 2014-01-22
  • 打赏
  • 举报
 回复
延迟一些再连数据库。
shuihan20e 2014-01-22
  • 打赏
  • 举报
 回复
引用 10 楼 tcmakebest 的回复:
[quote=引用 9 楼 shuihan20e 的回复:] [quote=引用 6 楼 tcmakebest 的回复:] 启动先后不应该影响到正常的处理，如果数据库关闭后再开，难道服务也需要重启才能生效吗？ 这是完全可以避免的，服务应该隔一段时间自动连接数据库。
服务启动进要从数据库里读取参数，不读取到参数就不能启动，启动完成后，不再需要连接数据库了 [/quote] 脑子不要这么呆板啊，第一次读取不到，那等一分钟再读，直到成功。 每过一小时再读，如果数据库中的参数变了，就可以自动使用新的配置了。 明白？[/quote] 愿闻其详，继续啊
shuihan20e 2013-09-06
  • 打赏
  • 举报
 回复
引用 10 楼 tcmakebest 的回复:
[quote=引用 9 楼 shuihan20e 的回复:] [quote=引用 6 楼 tcmakebest 的回复:] 启动先后不应该影响到正常的处理，如果数据库关闭后再开，难道服务也需要重启才能生效吗？ 这是完全可以避免的，服务应该隔一段时间自动连接数据库。
服务启动进要从数据库里读取参数，不读取到参数就不能启动，启动完成后，不再需要连接数据库了 [/quote] 脑子不要这么呆板啊，第一次读取不到，那等一分钟再读，直到成功。 每过一小时再读，如果数据库中的参数变了，就可以自动使用新的配置了。 明白？[/quote] 请给出方法啊，在哪写代码Execute里？ 这个貌似只执行一次，要写一个死循环在里面？我试过貌似不行
tcmakebest 2013-09-05
  • 打赏
  • 举报
 回复
启动先后不应该影响到正常的处理，如果数据库关闭后再开，难道服务也需要重启才能生效吗？ 这是完全可以避免的，服务应该隔一段时间自动连接数据库。
TheMadMan 2013-09-05
  • 打赏
  • 举报
 回复
顶3楼。 另外就没有服务返回？确定服务启动了，再启动啊。
shuihan20e 2013-09-05
  • 打赏
  • 举报
 回复
win2003里没有延迟启动
tcmakebest 2013-09-05
  • 打赏
  • 举报
 回复
引用 9 楼 shuihan20e 的回复:
[quote=引用 6 楼 tcmakebest 的回复:] 启动先后不应该影响到正常的处理，如果数据库关闭后再开，难道服务也需要重启才能生效吗？ 这是完全可以避免的，服务应该隔一段时间自动连接数据库。
服务启动进要从数据库里读取参数，不读取到参数就不能启动，启动完成后，不再需要连接数据库了 [/quote] 脑子不要这么呆板啊，第一次读取不到，那等一分钟再读，直到成功。 每过一小时再读，如果数据库中的参数变了，就可以自动使用新的配置了。 明白？
shuihan20e 2013-09-05
  • 打赏
  • 举报
 回复
引用 6 楼 tcmakebest 的回复:
启动先后不应该影响到正常的处理，如果数据库关闭后再开，难道服务也需要重启才能生效吗？ 这是完全可以避免的，服务应该隔一段时间自动连接数据库。
服务启动进要从数据库里读取参数，不读取到参数就不能启动，启动完成后，不再需要连接数据库了
shuihan20e 2013-09-05
  • 打赏
  • 举报
 回复
引用 3 楼 wr960204 的回复:
服务可以设置相互的依赖关系的.你的服务可以设置成依赖数据库服务
哪设置？TDependencies，这个方法无效，加上以后，在服务管理器里也看不到依存
shuihan20e 2013-09-05
  • 打赏
  • 举报
 回复
引用 2 楼 shien00000xu 的回复:
对，延迟启动，你可以建立一个引导程序，当你所需要的服务都启动完成后，再连接数据库。
啥引导程序，一个服务检测数据库是否启动，如果启动了再启动另一个服务？这种方案能实现，但是不能用这方法
武稀松 2013-09-04
  • 打赏
  • 举报
 回复
服务可以设置相互的依赖关系的.你的服务可以设置成依赖数据库服务
shien00000xu 2013-09-04
  • 打赏
  • 举报
 回复
对，延迟启动，你可以建立一个引导程序，当你所需要的服务都启动完成后，再连接数据库。
鐵蛋 2013-09-04
  • 打赏
  • 举报
 回复
延迟启动。。
云通讯短信服务 Delphi XE10upd1 Demo by 老赵.rar
云通讯短信服务 是短信服务，注册时通过短信索取验证码的后台服务。 正好自己也在开发，也看到有人在云通讯官网问是否有Delphi demo 官方的回复是：小语种不考虑…… 作为一个能同时开发 win32/win64/andorid/ios/osx的语言开发工具，Delphi表示不服……我们不就是编译的ios文件体积大点么... 所以为delphi开发者提供一个REST client的Demo，完整功能的短信服务和主账号读取服务。可以作为参考，举一反三，云通讯上的所有功能就都能实现。 Delphi Demo代码下载（Delphi xe10 update1 开发，无需额外控件） 也可以学习一下关于REST 的头验证设定的方法。
Delphi通过WMI等方法获取硬件ID源码
几年前在CnPack论坛发贴希望大家一起测试一下的小东西, 后来看大家热情不高, 我也就淡下去了, 最近有人在问, 所以我把这份东西放出来 时间太久了, 连我自己都差点忘记了这份放在备份文件夹里的程序, 其实有三点理由大家没必要重视这份代码 1. 实际意义不大 不管是从服务客户角度(难道不允许客户换电脑吗), 还是从代码效率(我看就WMI稳定些, 但是这东西初始化速度很慢), 我觉得都没太大用处 2. 运行环境变化 Win64位环境下, WMI可能还有用, 但需要调整哪里, 我没有去研究, 当然, 话说公司的加密狗也不支持64位... 3. 没有秘密 里面实际的东西, 有经验的人光看我让大家贴的日志文本也知道是怎么回事 好吧, 这份源码还是贴出来大家看看吧, 我也几年没看了, 就不写详细说明了 GetHardWareData.dpr 通过几种方法获取硬件ID的例子 GetMachineData.dpr 当年我做的一个硬件序列号生成器, 应该是上面例子的结果加密后存成文件 DecodeMacData.dpr 解密上面的文件
delphi 版本的自动升级程序
例中将在MASTER中创建p_killspid，该程序过程是用来恢复与备份数据的一部分。 MENTOROUSER.INI为数据服务地址，曾经有网友问过我如何做服务登录的系统，此文件是个关键，具体的连接请参考代码 SQLTEXT.MDB为数据库更新用的文件，请自行修改记录，但是记录先后顺序一定要根据指令的先后顺序来添加。 mentoro.htm为存放在网站上的文件，具体内容自已改吧。（您也可以用INI文件） CHIS.INI为更新配置文件（其他的文件及内容请在盒子里看vagrant的程序）
Delphi中WebService服务
Delphi开发和调用的webservice 在用delphi编写webservice时遇到的第一问题就是如何编写，怎么写？上网查了一下，内容还是听不少的，当然通过多方资料的比较，了解到通过file--new----other----webservice可以建立并测试webservice，但是我的delphi中却没有这个选择，于是很迷茫，问了一下“大牛”程序员才知道，是因为我的vcl自带的包...
将软件代码从Delphi 7迁移升级到Delphi 10.4.1等现代化新版本的注意事项
Delphi的一个基本事实是，全世界存在使用较旧版本Delphi编写的大量应用程序软件。尤其是经典的Delphi 7，然而现在是2021年，是时候升级到Delphi 10.4.1新版本了。每天都会有人问我有关从15到20年的旧版本Delphi迁移到最新版本Delphi的问题。值得庆幸的是，Delphi使数十年来的迁移相对容易，但是，这并不意味着轻松！ 本页面旨在解决最常见的陷阱，这些陷阱可能是从2009年之前的任何版本的Delphi（包括Borland版本）过渡到现代的Embarcadero Delphi
语言基础/算法/系统设计

16,747

社区成员

33,239

社区内容

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章