Multiplikation von Integerwerten gibt Überlauf

[Xplosion]

Hi

bei folgendem Source spuckt der Compiler folgende Fehlermeldung aus:
'E2099 Überlauf bei Konvertierung oder arithmetischer Operation'

Delphi-Quellcode:

var
  nSize : Int64;
  nPotenz : Integer
  //nPotenz : Int64; <<< Funktioniert

nPotenz := 1024;

if nSize > (nPotenz) then
  AFormat := 'fsKilobyte';
if nSize > (nPotenz * nPotenz) then
  AFormat := 'fsMegabyte';
if nSize > (nPotenz * nPotenz * nPotenz) then
  AFormat := 'fsGigabyte';
if nSize > (nPotenz * nPotenz * nPotenz * nPotenz) then  <<< Fehler weil > 32Bit
  AFormat := 'fsTerabyte';
if nSize > (nPotenz * nPotenz * nPotenz * nPotenz * nPotenz) then  <<< Fehler weil > 32Bit
  AFormat := 'fsPetabyte';

Warum ist da so?

Das Geheimnis liegt in der Variablendeklaration von 'nPotenz'. Integer funktioniert nicht, Int64 schon, obwohl ich der Variable 'nPotenz' ja gar nix größers als Integer zuweisen will.

Hätte mal gern gewusst, warum kann das Ergebnis einer Multiplikation nicht größer sein als der Bereich der Variable, die für die Multiplikation benutzt wird? Ist das nur beim Delphi Compiler so?