用Delphi开发一个简单WindowsNTService的范例