Gleitkomma Problem

[Garrad]

Problem is leider immer noch vorhanden habe jetzt

Delphi-Quellcode:

 begin
                a:=ziehen;
                Label5.Caption:=floattostr(a);
                if a>21 then  verloren;
                if a=21 then  gegner
                end;