integer und int64 Rechnungen

[-=Breeze=-]

Hallo zusammen,
ich habe ein Problem bei der Benutzung von int64

Gegeben sei eine integer und eine int64 Variable:

Code:

var x : integer;
    y : int64;
begin
   x:=122;
   y:=x*x*x*x*x*x*x*x*x*x*x*x*x*x;
   Edit1.Text:=IntToStr(y);
end;

Obwohl y eine int64 ist liefert delphi mir einen negativen Wert (-1841414144).

Auch

Code:

   y:=int64(x*x*x*x*x*x*x*x*x*x*x*x*x*x);

liefert dasselbe Ergebnis.

Ich hoffe mir kann jemand helfen.