捐赠 | 广告 | 注册 | 发布 | 上传 | 关于我们    
  沪ICP备05001939号 DELPHI盒子 | 盒子论坛 | 盒子文章 | 盒子问答悬赏 | 最新更新 | 论坛检索 | 下载中心 | 高级搜索    
  精品专区 | 繁體中文 | 奖励公告栏 | 直通车账号登陆 | 关闭GOOGLE广告 | 临时留言    
盒子资源分类
全部展开 - 全部合拢
Windows 服务程序开发向导,支持两栖服务程序,自动托盘。
关键字:Windows 服务程序开发向导 zytServiceAPP
来 自:原创
平 台:Win2K/2003/NT/XP,Vista/WIN7 下载所需:0 火柴
深浅度:中级 完成时间:2014/9/1
发布者:dorry (奖励50火柴) 发布时间:2014/10/6
编辑器:BCB2005/6/7/9/10 语  种:简体中文
分 类:IDE集成系统 下载浏览:591/10023
加入到我的收藏
下载错误报错
登陆以后才能下载
 用户名:
 密 码:
自动登陆(30天有效)
图片如果打不开,说明流量不够了,请稍候下载……
方便的Windows 服务的开发向导,集成IDE,支持设计期向导选择 服务名称、服务显示名称、服务描述,依赖服务列表选择。设计期服务列表自动选择。
普通托盘程序和windows 服务程序于一体。方便调试。   /install or  /Uninstall 自动注册或反注册windows service 程序。delphi2007 测试,编译服务Win7运行正常。
Google
 
本站原创作品,未经作者许可,严禁任何方式转载;转载作品,如果侵犯了您的权益,请联系我们
龙脉加密锁 15元起 Grid++Report 报表 申请支付@网
 相关文章
没有相关文章
相关评论
共有评论5条 当前显示最后5条评论
xuchuantao 2014/10/6 23:47:33
XE5下不可用。
dorry 2014/10/10 10:37:17
在delphiXE7下需要更改:

package ZytServiceAPP;

{.$R *.res}  //去掉此行
{$R *.otares}//IDE会自动添加,如不能请手动添加即可。

向导生成的源码有一处错误:

//      cbSize := SizeOf(FIconData);去掉此行
      cbSize := FIconData.cbSize;//改成此行内容即可

我测试 XE7 成功。delphi XEx 应该均可用。
dorry 2014/10/13 11:10:26
发现一 BUG。就是在
  if ZytApplication.IsService('ZYTModbusToSiemensPLCgate') then
  begin
    ZytApplication.ServiceName:='ZYTModbusToSiemensPLCgate';
    ZytApplication.DisplayName:='Modbus Server V1.0.0';
    ZytApplication.Description:='Modbus 到Siemens PLC网关转换 支持 OPC V1.00~V3.0'; 
    ZytApplication.initialize;
    ZytApplication.CreateForm(TfrmServerMain, frmServerMain);
    ZytApplication.Run;
  end else begin
    Application.Initialize;
    Application.CreateForm(TfrmServerMain, frmServerMain);
//Application.CreateForm(TfrmServerMain, frmServerMain); 重复了一次, 请删掉即可
    frmServerMain.Initialize(False);
    Application.Run;
  end;
shuihan20e 2015/7/16 18:35:31
delphi 7安装失败,代码不全,无法使用
dengjiyun 2017/11/14 15:40:52
XE7编译成功。桌面程序运行的时候无法退出。
我要发表评论 查看全部评论
 
  DELPHI盒子版权所有 1999-2023 V4.01 粤ICP备10103342号-1 更新RSS列表