Problem mit StrToFloatF

[Neutral General]

Ich versuche vergeblich einen Real-Wert so zu formatieren das er keine Nachkommastellen mehr hat.

Delphi-Quellcode:

if Sprite is TStrom then begin
   Leben := StrToFloat(Form1.Label7.Caption);
   Leben := Leben - 0.2;
   Form1.Label7.Caption := FloatToStrF(Leben,ffFixed,3,0);
end;

So : Dabei passiert rein gar nichts ! Im Formular hat Label7 immer noch den gleichen Wert.

Delphi-Quellcode:

if Sprite is TStrom then begin
   Leben := StrToFloat(Form1.Label7.Caption);
   Leben := Leben - 0.2;
   Form1.Label7.Caption := FloatToStrF(Leben,ffFixed,3,1);
end;

So funktioniert es, aber es ist eben noch eine Stelle nach dem Komma da ...
Das seltsame ist :

Delphi-Quellcode:

if Sprite is TStrom then begin
   Leben := StrToFloat(Form1.Label7.Caption);
   Leben := Leben - 0.6;
   Form1.Label7.Caption := FloatToStrF(Leben,ffFixed,3,0);
end;

So funktioniert es super. Hier ist das Problem aber das ich in 0.2er Schritten abziehen will ...
Sobald ich bei Leben := Leben - 0.6; weniger als 0.6 abziehe funktioniert es nicht ...