branch | qmlfrontend |
changeset 11416 | 78d6b99ddcb0 |
parent 11415 | 05cf35103206 |
child 11418 | 091149424aa4 |
--- a/hedgewars/uFLNetProtocol.pas Thu Nov 19 23:04:53 2015 +0300 +++ b/hedgewars/uFLNetProtocol.pas Thu Nov 19 23:32:28 2015 +0300 @@ -3,6 +3,8 @@ procedure passNetData(p: pointer); cdecl; +procedure sendChatLine(msg: PChar); cdecl; + implementation uses uFLNetTypes, uFLTypes, uFLUICallback, uFLNet; @@ -202,5 +204,11 @@ handlers[TCmdData(p^).cmd.cmd](TCmdData(p^)) end; +procedure sendChatLine(msg: PChar); cdecl; +begin + sendNetLn('CHAT'); + sendNet(msg); +end; + end.