Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как задать массив Record при инициализации? [D7]

Mer01 © (2010-03-06 17:29:00)
Например простой массив так:
const a: array[0..n] of integer = (1,2,3,..);

Как задеть если есть такое:
type r=record s:string; i:integer; end; const a: array[0..n] of r = ???

sniknik (2010-03-06 21:24:00) [1]
> Смотрим результат, и видим, что по крайней мере на первой странице ответа на наш вопрос увы нет.
как вы смотрите? или вернее куда? зашел в первую ссылку, нашел ответ. зашел во вторую... тоже нашел. дальше смотреть не стал. ладно верю, пусть там дальше нет, но первые то две ссылки оставь. сними проклятье "увы" со всей страницы...

Игорь Шевченко (2010-03-06 20:44:00) [2]

> Смотрим результат, и видим, что по крайней мере на первой
> странице ответа на наш вопрос увы нет

Какая жалость.

Вася (2010-03-06 20:39:00) [3]

> Игорь Шевченко © (06.03.10 17:45) [3]

Смотрим результат, и видим, что по крайней мере на первой странице ответа на наш вопрос увы нет. А так конечно - да, остроумно.

> Mer01 (06.03.10 17:29)

вот например из Graphics:

const
Colors: array[0..51] of TIdentMapEntry = (
(Value: clBlack; Name: 'clBlack'),
(Value: clMaroon; Name: 'clMaroon'),
(Value: clGreen; Name: 'clGreen'),
(Value: clOlive; Name: 'clOlive'),
(Value: clNavy; Name: 'clNavy'),
(Value: clPurple; Name: 'clPurple'),
(Value: clTeal; Name: 'clTeal'),
(Value: clGray; Name: 'clGray'),
(Value: clSilver; Name: 'clSilver'),
(Value: clRed; Name: 'clRed'),
(Value: clLime; Name: 'clLime'),
(Value: clYellow; Name: 'clYellow'),
(Value: clBlue; Name: 'clBlue'),
(Value: clFuchsia; Name: 'clFuchsia'),
(Value: clAqua; Name: 'clAqua'),
(Value: clWhite; Name: 'clWhite'),

(Value: clMoneyGreen; Name: 'clMoneyGreen'),
(Value: clSkyBlue; Name: 'clSkyBlue'),
(Value: clCream; Name: 'clCream'),
(Value: clMedGray; Name: 'clMedGray'),

(Value: clActiveBorder; Name: 'clActiveBorder'),
(Value: clActiveCaption; Name: 'clActiveCaption'),
(Value: clAppWorkSpace; Name: 'clAppWorkSpace'),
(Value: clBackground; Name: 'clBackground'),
(Value: clBtnFace; Name: 'clBtnFace'),
(Value: clBtnHighlight; Name: 'clBtnHighlight'),
(Value: clBtnShadow; Name: 'clBtnShadow'),
(Value: clBtnText; Name: 'clBtnText'),
(Value: clCaptionText; Name: 'clCaptionText'),
(Value: clDefault; Name: 'clDefault'),
(Value: clGradientActiveCaption; Name: 'clGradientActiveCaption'),
(Value: clGradientInactiveCaption; Name: 'clGradientInactiveCaption'),
(Value: clGrayText; Name: 'clGrayText'),
(Value: clHighlight; Name: 'clHighlight'),
(Value: clHighlightText; Name: 'clHighlightText'),
(Value: clHotLight; Name: 'clHotLight'),
(Value: clInactiveBorder; Name: 'clInactiveBorder'),
(Value: clInactiveCaption; Name: 'clInactiveCaption'),
(Value: clInactiveCaptionText; Name: 'clInactiveCaptionText'),
(Value: clInfoBk; Name: 'clInfoBk'),
(Value: clInfoText; Name: 'clInfoText'),
(Value: clMenu; Name: 'clMenu'),
(Value: clMenuBar; Name: 'clMenuBar'),
(Value: clMenuHighlight; Name: 'clMenuHighlight'),
(Value: clMenuText; Name: 'clMenuText'),
(Value: clNone; Name: 'clNone'),
(Value: clScrollBar; Name: 'clScrollBar'),
(Value: cl3DDkShadow; Name: 'cl3DDkShadow'),
(Value: cl3DLight; Name: 'cl3DLight'),
(Value: clWindow; Name: 'clWindow'),
(Value: clWindowFrame; Name: 'clWindowFrame'),
(Value: clWindowText; Name: 'clWindowText'));

Игорь Шевченко (2010-03-06 17:45:00) [4]
http://lmgtfy.com/?q=%D0%9A%D0%B0%D0%BA+%D0%B2+Delphi+%D0%B7%D0%B0%D0%B4%D0%B0%D1%82%D1%8C+%D0%BC%D0%B0%D1%81%D1%81%D0%B8%D0%B2+Record+%D0%BF%D1%80%D0%B8+%D0%B8%D0%BD%D0%B8%D1%86%D0%B8%D0%B0%D0%BB%D0%B8%D0%B7%D0%B0%D1%86%D0%B8%D0%B8%3F

Mer01 (2010-03-06 17:40:00) [5]
У меня облегченный Delphi, справки там нет

Игорь Шевченко (2010-03-06 17:37:00) [6]
в справке синтаксис описан

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »