hedgewars/uGame.pas
changeset 10015 4feced261c68
parent 9998 736015b847e3
parent 9950 2759212a27de
child 10105 8c5fa1d15bd5
equal deleted inserted replaced
10014:56d2f2d5aad8 10015:4feced261c68
   114                         PlayMusic;
   114                         PlayMusic;
   115                         GameType:= gmtLocal;
   115                         GameType:= gmtLocal;
   116                         AddVisualGear(0, 0, vgtTeamHealthSorter);
   116                         AddVisualGear(0, 0, vgtTeamHealthSorter);
   117                         AddVisualGear(0, 0, vgtSmoothWindBar);
   117                         AddVisualGear(0, 0, vgtSmoothWindBar);
   118                         {$IFDEF IPHONEOS}InitIPC;{$ENDIF}
   118                         {$IFDEF IPHONEOS}InitIPC;{$ENDIF}
       
   119                         {$IFNDEF PAS2C}
   119                         with mobileRecord do
   120                         with mobileRecord do
   120                             if SaveLoadingEnded <> nil then
   121                             if SaveLoadingEnded <> nil then
   121                                 SaveLoadingEnded();
   122                                 SaveLoadingEnded();
       
   123                         {$ENDIF}
   122                         end;
   124                         end;
   123                 end
   125                 end
   124         else ProcessGears
   126         else ProcessGears
   125         end;
   127         end;
   126     inc(i)
   128     inc(i)