changeset 1812 | 3d4692e825e7 |
parent 1801 | bc0c5c21376e |
child 1869 | 490005509a7b |
--- a/hedgewars/uVisualGears.pas Fri Feb 20 11:58:58 2009 +0000 +++ b/hedgewars/uVisualGears.pas Fri Feb 20 14:12:16 2009 +0000 @@ -176,6 +176,12 @@ exit end; +if cReducedQuality then + begin + AddVisualGear:= nil; + exit + end; + New(Result); FillChar(Result^, sizeof(TVisualGear), 0); Result^.X:= int2hwFloat(X);