windows服务程序无法显示界面．在线等．

rt，这个是服务程序是在远程服务器上运行的，用远程桌面进去的话，无法显示服务程序的界面，本地电脑里测试是没有问题，求解
代码如下：
procedure ServiceController(CtrlCode: DWord); stdcall;
begin
  sspp.Controller(CtrlCode);
end;function Tsspp.GetServiceController: TServiceController;
begin
  Result := ServiceController;
end;procedure Tsspp.ServiceStart(Sender: TService; var Started: Boolean);
begin
  started:=true;
  SvcMgr.Application.CreateForm(TmainForm1,mainForm1);
  mainForm1.Hide;
end;procedure Tsspp.ServiceStop(Sender: TService; var Stopped: Boolean);
begin
  stopped:=true;
  mainForm1.Free;
end;procedure Tsspp.ServiceContinue(Sender: TService; var Continued: Boolean);
begin
  while not Terminated do
  begin
    Sleep(10);
    ServiceThread.ProcessRequests(False);
  end;
end;procedure Tsspp.ServiceExecute(Sender: TService);
begin
  while not Terminated do
  begin
    Sleep(10);
    ServiceThread.ProcessRequests(False);
  end;
end;procedure Tsspp.ServicePause(Sender: TService; var Paused: Boolean);
begin
  Paused := True;
end;procedure Tsspp.ServiceShutdown(Sender: TService);
begin
  mainForm1.Free;
  Status := csStopped;
  ReportStatus();
end;