Integerüberlauf bei Cardinalmultiplikation?

[Alex_ITA01]

Hallo erstmal,
bei mir geht folgender Source

Delphi-Quellcode:

Function   CmC:   Cardinal;
Var   c1:   Cardinal;
      c2:   Cardinal;
Begin
   c1         := 1000000000;
   c2         := 4;
   Result   := c1 * c2
End;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage('Ergebnis: ' + FloatToStrF(CmC,ffFixed,15,8));
end;

Liegt es an deinem System? Ich glaube Cardinal ist nicht immer gleich laut OnlineHilfe von Delphi?!

MFG Alex

edit: hab grad die OnlineHilfe gelesen und da steht: Diese Typen sollten immer verwendet werden... Sorry mein Fehler.Aber wie gesagt, bei mir gehts...

MFG Alex