德尔福最大的错误或限制.常数整数值？

const
  minDriveFreeSpace: Int64 = 1024*1024*1024*99;

var
  minDriveFreeSpace: Int64;
begin
  minDriveFreeSpace := 1024*1024*1024*99;

[dcc32 Error] DataStoreLocator.pas(92): E2099 Overflow in conversion or arithmetic operation

您需要在右侧将至少一个值强制转换为Int64.例如,这两个在XE6上编译得非常好：

const
  minDriveFreeSpace = Int64(1024) * 1024 * 1024 * 99;

var
  minDriveFreeSpace2: Int64;
begin
  minDriveFreeSpace2 := Int64(1024)*1024*1024*99;

请注意,它可以是任何一个施放的右值.例如,这也同样有效：

const
  minDriveFreeSpace = 1024 * 1024 * 1024 * Int64(99);

这在Delphi language guide中有记录(虽然相当差) – 强调我的：

var
I: Integer;
J: Int64;
... 
I := High(Integer);
J := I + 1;

...
J := Int64(I) + 1;