Record型初期化

type
TRec = Record
i : Integer;
s : String;
end;

const
rSet : Array[0..2] of TRec = (
(i : 0; s : ‘1番目’),
(i : 3; s : ‘2番目’),
(i : 10; s : ‘3番目’)
)