X1012 範囲外の定数式です（Delphi）

エラーと警告のメッセージ（Delphi） への移動

このエラー メッセージが発生するのは、定数が有効な範囲を外れているとコンパイラが判断できる場合です。たとえば、MaxInt より大きい値を整数型変数に代入すると、このエラーがトリガされます。

部分範囲型の例

このエラーは、たとえば、部分範囲型の変数に定数を代入する場合に発生するおそれがあります。

次のサンプル コードでは、このエラー メッセージがトリガされます。

program Produce;
var
  Digit: 1..9;
begin
  Digit := 0;
end.

この問題を解決するには、次のように、代入する値を範囲に含める必要があります。

program Solve;
var
  Digit: 0..9;
begin
  Digit := 0;
end.

あるいは、次のように、代入する値が有効な範囲に収まるように代入文を変更します。

program Solve;
var
  Digit: 1..9;
begin
  Digit := 1;
end.