标签:begin end dmf DELPHI pid daemon 随机 LINUX
DELPHI开发LINUX随机启动服务
Linux 下也有类似windows 服务的功能。
Linux Daemon 就是其中的一种方式,命令行运行后
直接返回,同时在后台建立一个同样的进程。接受客户端的访问。常见的一些linux 服务基本上都是
这样工作的。例如著名apache,mysql 等。
program Project2; {$APPTYPE CONSOLE} {$R *.res} uses Posix.Unistd, Posix.SysTypes, System.SysUtils, dmp in 'dmp.pas' {dmf: TDataModule}; procedure daemon; begin dmf:=Tdmf.Create(nil); dmf.IdHTTPServer1.Active:=True; try repeat sleep(10 * 1000); until False; finally dmf.Free; end; end; var pid: pid_t; begin pid := fork; if pid = 0 then begin writeln('starting service'); daemon; end; end.
标签:begin,end,dmf,DELPHI,pid,daemon,随机,LINUX 来源: https://www.cnblogs.com/hnxxcxg/p/11458640.html
本站声明: 1. iCode9 技术分享网(下文简称本站)提供的所有内容,仅供技术学习、探讨和分享; 2. 关于本站的所有留言、评论、转载及引用,纯属内容发起人的个人观点,与本站观点和立场无关; 3. 关于本站的所有言论和文字,纯属内容发起人的个人观点,与本站观点和立场无关; 4. 本站文章均是网友提供,不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属;如您发现该文章侵犯了您的权益,可联系我们第一时间进行删除; 5. 本站为非盈利性的个人网站,所有内容不会用来进行牟利,也不会利用任何形式的广告来间接获益,纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。