在Delphi中，您可以创建一个独立的Windows VCL表单应用程序。您还可以创建Windows服务应用程序。
是否可以将这两个组合在一个可作为独立应用程序运行的单个应用程序中，也可以作为Windows服务安装？
@H_502_4@解决方法
完全可能。诀窍是编辑.dpr以创建主窗体，当您希望作为应用程序运行时，以及服务窗体当您希望作为服务运行时。喜欢这个：
if SvComFindCommand('config') then begin
//When run with the /config switch,display the configuration dialog.
Forms.Application.Initialize;
Forms.Application.CreateForm(TfrmConfig,frmConfig);
Forms.Application.Run;
end
else begin
SvCom_NTService.Application.Initialize;
SvCom_NTService.Application.CreateForm(TscmServiceSvc,scmServiceSvc);
SvCom_NTService.Application.Run;
end;
上面的代码使用SvCom来运行服务，但使用标准TService可以实现完全相同的效果。
我写了一篇关于Delphi杂志多年前的文章。你可以在这里阅读：Many Faces Of An Application。
@H_502_4@ @H_502_4@ 原文链接：https://www.f2er.com/delphi/103644.html