Zitat von
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;
Schau mal wie Du ziehen deklarier hast:
function ziehen:integer;
Und, gibt ziehen nun eine Gleitkommazahl zurück?
Grüße
Klaus