Zitat:
Delphi-Quellcode:
function TForm1.ZufallszahlErstellen(): Integer;
begin
Result := Trunc(Random(52) + 1);
end;
Random = Float
Random(x) = Integer
also Random liefert schon einen Integer
(da muß der Integer nicht erst nach Float konvertiert werden und dann zurück ... Trunc ist ja
nicht für Integer da und verlangt einen Float ... ergibt also erstmal eine Implizite Typumwandlung
)
Delphi-Quellcode:
function TForm1.ZufallszahlErstellen(): Integer;
begin
Result := Random(52) + 1;
end;
[edit] man sollte nix nebenbei machen -.-°