Как сделать объявление константы типа массив с моими записями ?

← →
chelovek (2005-07-07 10:11) [0]

Объявление записи в программе такое:
type TMyListParamSet = (psNone, psFirst, psLast); TMyParamInfo = packed record MyParamSet: TMyListParamSet; UserNameParamSet: string[30]; NameFileParamSet: string[20]; end; Констната: const UserNameBaseParams: array[0..3] of TMyParamInfo = ((?),(?),(?),(?)); Вот в этих (?) и загвоздка, если пустые скобки, компилируется нормально, а как заполнить их (в этом собственно и дело) не знаю и найти не смог (может не там искал :(). А вообще возможно такое?

← →
Digitman © (2005-07-07 10:20) [1]

const
UserNameBaseParams: array[0..1] of TMyParamInfo = (
( MyParamSet: psNone;
UserNameParamSet: "xxx";
NameFileParamSet: "yyy"),

( MyParamSet: psFirst;
UserNameParamSet: "aaa";
NameFileParamSet: "bbb")
);

← →
ЮЮ © (2005-07-07 10:25) [2]

см Record constants в хелпе:
(
(
MyParamSet: psNone;
UserNameParamSet: "psNone";
NameFileParamSet: "None"
),
(?),
(?),
(?)
);

← →
chelovek (2005-07-07 10:35) [3]

Ок! Спасибо.

> TMyListParamSet = (psNone, psFirst, psLast);

Вообще-то это еще не set, я бы обозвал это TMyListParam, и
TMyListParamSet = set of TMyListParam

← →
chelovek (2005-07-07 10:42) [5]

Как сделать объявление константы типа массив с моими записями ? Найти похожие ветки