X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_net.pas;h=72cbb9a48d6a60d8a1bfe49fefcabe3920cba925;hb=ac201b02f10ef558087d50f6b03b4519ab567558;hp=74defc3d1083f613d89e67f59da2a879a4c9acc1;hpb=88ce644db1b40111bdb380f4357fa59bdb5173be;p=d2df-sdl.git

diff --git a/src/game/g_net.pas b/src/game/g_net.pas
index 74defc3..72cbb9a 100644
--- a/src/game/g_net.pas
+++ b/src/game/g_net.pas
@@ -1,3 +1,4 @@
+{$MODE DELPHI}
 unit g_net;
 
 interface
@@ -535,7 +536,7 @@ begin
       ENET_EVENT_TYPE_DISCONNECT:
       begin
         ID := Byte(NetEvent.peer^.data^);
-        if ID > High(NetClients) then Exit;     
+        if ID > High(NetClients) then Exit;
         TC := @NetClients[ID];
         if TC = nil then Exit;
 
@@ -745,7 +746,7 @@ begin
     end;
 
     ProcessLoading();
-    
+
     e_PollInput();
 
     if e_KeyPressed(IK_ESCAPE) or e_KeyPressed(IK_SPACE) then
@@ -874,6 +875,7 @@ var
   Ptr: Pointer;
   msgStream: TMemoryStream;
 begin
+  FillChar(downloadEvent, SizeOf(downloadEvent), 0);
   msgStream := nil;
   OuterLoop := True;
   while OuterLoop do