请问如何建立一个delphi程序,在NT下能作为一个服务,在98下作为一个普通的程序(300分)

程序进入系统判断9x还是nt,如果9x就作为一个普通的程序,如果是nt就先检测系统中有没有这个服务程序,
如果没有就把自己作为一个服务程序?
请问如何建立一个delphi程序,在NT下能作为一个服务,在98下作为一个普通的程序

具体做法如下：
1。将程序的主体独立成组件，如DLL/COM/DCOM/Corba/Web Service
2。做两套启动程序，此程序不涉及任何功能（具体功能都在上面的主体组件中完成）
　　但是，这两套程序都提供相应的接口，并调用主体组件完成具体的功能。
　　其中一套启动程序以NT Service应用程序的方式提供，
　　一大以98下的普通EXE的方式提供。
3。在发布你的应用程序的时候，如果用Install Shield，则做相应脚本
　　即判断如果相应系统为98，则安装EXE加主体程序。
　　如果是NT，则安装NT Service程序加主体程序。
完成你所说的功能了。。。

楼上说的也是一种方法。

在同一个程序里不能实现吗？