E2139 メッセージメソッドのインデックスが間違っています (Delphi)
エラーと警告のメッセージ(Delphi) への移動
メッセージインデックスに 0 以下の値を指定しました。
program Produce; type Base = class procedure Dynamo(VAR x : Integer); message -151; end; procedure Base.Dynamo(VAR x : Integer); begin end; begin end.
{ メッセージインデックスとして -151 を指定してはならない }
program Solve; type Base = class procedure Dynamo(VAR x : Integer); message 151; end; procedure Base.Dynamo(VAR x : Integer); begin end; begin end.
{ メッセージインデックスの値は必ず 1 以上にする }