Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Как задать массив Record при инициализации?   Найти похожие ветки 

 
Mer01   (2010-03-06 17:29) [0]

Например простой массив так:
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 = ???


 
Игорь Шевченко ©   (2010-03-06 17:37) [1]

в справке синтаксис описан


 
Mer01   (2010-03-06 17:40) [2]

У меня облегченный Delphi, справки там нет


 
Игорь Шевченко ©   (2010-03-06 17:45) [3]

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


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


> Игорь Шевченко ©   (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 20:44) [5]


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


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


 
sniknik ©   (2010-03-06 21:24) [6]

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



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.057 c
15-1267306205
Юрий
2010-02-28 00:30
2010.08.27
С днем рождения ! 28 февраля 2010 воскресенье


11-1221339711
Dy1
2008-09-14 01:01
2010.08.27
пожалуйста скажите что не так


2-1275043106
kolian
2010-05-28 14:38
2010.08.27
запоминание и воспроизведение в окне memo


2-1266325693
Rail
2010-02-16 16:08
2010.08.27
как правильно указать путь к бд


15-1268825050
TUser
2010-03-17 14:24
2010.08.27
Сканируем в принтер!