hedgewars/uConsts.pas
changeset 9988 317d46a2afd2
parent 9573 49bca2fabbd3
child 9998 736015b847e3
equal deleted inserted replaced
9987:8f07b47a641b 9988:317d46a2afd2
   298     NoPointX = Low(LongInt);
   298     NoPointX = Low(LongInt);
   299     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
   299     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
   300 
   300 
   301     kSystemSoundID_Vibrate = $00000FFF;
   301     kSystemSoundID_Vibrate = $00000FFF;
   302 
   302 
       
   303     rtnTestSuccess = $00000000;
       
   304     rtnTestFailed  = $00000001;
       
   305     rtnTestLuaErr  = $00000002;
       
   306 
   303 implementation
   307 implementation
   304 
   308 
   305 end.
   309 end.