mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-23 21:49:31 +02:00
* Applied patch from stephano, bug ID #26143.
git-svn-id: trunk@27776 -
This commit is contained in:
parent
042e6243a3
commit
490a8f9421
@ -198,7 +198,7 @@ end;
|
||||
Type
|
||||
TWinMsgClientComm = Class(TIPCClientComm)
|
||||
Private
|
||||
FWindowName: String;
|
||||
FWindowName: WideString;
|
||||
FHWND : HWnd;
|
||||
Public
|
||||
Constructor Create(AOWner : TSimpleIPCClient); override;
|
||||
@ -206,7 +206,7 @@ Type
|
||||
Procedure Disconnect; override;
|
||||
Procedure SendMessage(MsgType : TMessageType; Stream : TStream); override;
|
||||
Function ServerRunning : Boolean; override;
|
||||
Property WindowName : String Read FWindowName;
|
||||
Property WindowName : WideString Read FWindowName;
|
||||
end;
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user