diff -r 258945553b18 -r 15a483b2558a hedgewars/uUtils.pas --- a/hedgewars/uUtils.pas Thu Dec 02 20:29:46 2010 -0500 +++ b/hedgewars/uUtils.pas Thu Dec 02 20:40:30 2010 -0500 @@ -8,6 +8,7 @@ procedure SplitByChar(var a, b: ansistring; c: char); function EnumToStr(const en : TGearType) : shortstring; overload; +function EnumToStr(const en : TVisualGearType) : shortstring; overload; function EnumToStr(const en : TSound) : shortstring; overload; function EnumToStr(const en : TAmmoType) : shortstring; overload; function EnumToStr(const en : THogEffect) : shortstring; overload; @@ -83,6 +84,10 @@ begin EnumToStr:= GetEnumName(TypeInfo(TGearType), ord(en)) end; +function EnumToStr(const en : TVisualGearType) : shortstring; overload; +begin +EnumToStr:= GetEnumName(TypeInfo(TVisualGearType), ord(en)) +end; function EnumToStr(const en : TSound) : shortstring; overload; begin @@ -340,4 +345,4 @@ {$ENDIF} end; -end. \ No newline at end of file +end.