hedgewars/uStore.pas
changeset 3384 7eb4707d43f0
parent 3381 f8800c44b3de
child 3390 1d4926d10a9e
--- a/hedgewars/uStore.pas	Fri Apr 30 23:39:32 2010 +0000
+++ b/hedgewars/uStore.pas	Sat May 01 05:15:16 2010 +0000
@@ -453,7 +453,9 @@
 for ai:= Low(TAmmoType) to High(TAmmoType) do
     with Ammoz[ai] do
         begin
+        TryDo(trAmmo[NameId] <> '','No default text/translation found for ammo type #' + intToStr(ord(ai)) + '!',true);
         tmpsurf:= TTF_RenderUTF8_Blended(Fontz[CheckCJKFont(trAmmo[NameId],fnt16)].Handle, Str2PChar(trAmmo[NameId]), cWhiteColorChannels);
+        TryDo(tmpsurf <> nil,'Name-texture creation for ammo type #' + intToStr(ord(ai)) + ' failed!',true);
         tmpsurf:= doSurfaceConversion(tmpsurf);
         NameTex:= Surface2Tex(tmpsurf, false);
         SDL_FreeSurface(tmpsurf)