|
@@ -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;
|
|
|
|
|
|
|
|
|