E2150 型保証配列に正しくない型があります (Delphi)
エラーと警告のメッセージ(Delphi) への移動
変数配列の中では使用できない型を使って配列を作成しようとしています。
program Produce; type Fruit = (apple, orange, pear); Data = record x : Integer; ch : Char; end; var f : Fruit; d : Data; procedure Examiner(v : array of TVarRec); begin end; begin Examiner([d]); Examiner([f]); end.
{ 配列コンストラクタの中では列挙とレコードはサポートされないので,Examiner の 2 つの呼び出しは両方とも失敗する }
program Solve; var i : Integer; r : Real; v : Variant; procedure Examiner(v : array of TVarRec); begin end; begin i := 0; r := 0; v := 0; Examiner([i, r, v]); end.
{ このコードに示したように多数のデータ型が配列コンストラクタの中で使用できる }