浏览代码

* Applied patch from stephano, bug ID #26143.

git-svn-id: trunk@27776 -
michael 11 年之前
父节点
当前提交
490a8f9421
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      packages/fcl-process/src/wince/simpleipc.inc

+ 2 - 2
packages/fcl-process/src/wince/simpleipc.inc

@@ -198,7 +198,7 @@ end;
 Type
 Type
   TWinMsgClientComm = Class(TIPCClientComm)
   TWinMsgClientComm = Class(TIPCClientComm)
   Private
   Private
-    FWindowName: String;
+    FWindowName: WideString;
     FHWND : HWnd;
     FHWND : HWnd;
   Public
   Public
     Constructor Create(AOWner : TSimpleIPCClient); override;
     Constructor Create(AOWner : TSimpleIPCClient); override;
@@ -206,7 +206,7 @@ Type
     Procedure Disconnect; override;
     Procedure Disconnect; override;
     Procedure SendMessage(MsgType : TMessageType; Stream : TStream); override;
     Procedure SendMessage(MsgType : TMessageType; Stream : TStream); override;
     Function  ServerRunning : Boolean; override;
     Function  ServerRunning : Boolean; override;
-    Property WindowName : String Read FWindowName;
+    Property WindowName : WideString Read FWindowName;
   end;
   end;