怎么获取Windows服务程序的路径？

怎么获取Windows服务程序的路径？ Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061117121414211.html
在EXE的应用程序中我们可以用Application.ExeName来获取应用程序自身的文件名，那么在Windows服务中怎么获取Windows服务程序的路径？

用GetModuleFileName可以获取Windows服务程序的路径。

用WMI和轻松获取SERVICE的全面信息（包括路径)  
   
  单获取路径语句如下:  
   
  select   PathName   From   Win32_Service   Where   DisplayName   =   'YourService’