hedgewars/hwengine.pas
branchqmlfrontend
changeset 11832 8c71c5a1172f
parent 11704 83c40c1eb0e7
child 11833 a69124eb7ce7
--- a/hedgewars/hwengine.pas	Sun May 01 21:09:45 2016 +0200
+++ b/hedgewars/hwengine.pas	Tue May 17 23:18:08 2016 +0300
@@ -427,6 +427,7 @@
 procedure Game;
 begin
     initEverything(true);
+    SendIPC('TG');
     GameRoutine;
     // clean up all the memory allocated
     freeEverything(true);
@@ -548,6 +549,7 @@
         GenPreviewAlpha(Preview);
     {$ENDIF}
         WriteLnToConsole('Sending preview...');
+        SendIPC('TP');
         SendIPCRaw(@Preview, sizeof(Preview));
         SendIPCRaw(@MaxHedgehogs, sizeof(byte));
         WriteLnToConsole('Preview sent, disconnect');