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

Вниз

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

 
heady   (2004-03-26 19:47) [0]

Hi, All! есть ~30 точек, покрасивше (покороче) поместить их в массив X, а то писать x[1]:=123, x[1]:=432... не хочется, к примеру в фортране это делается в блоке DATA, а в сях просто через запятую... Зарание благодарен.


 
KSergey ©   (2004-03-26 20:28) [1]

могу немного напутать с синтаксисом - пользуюсь редко. Подробности и примеры - см. справка.

array a of Integer = (1, 2, 3, 4, 5, 6)

Можно и размеры задать, если надо


 
Anton ©   (2004-03-26 21:02) [2]

Да, немного по другому ;)
const a:array[1..5] of Integer = (1,2,3,4,5);


 
heady   (2004-03-26 21:07) [3]

Спасибо! а можно ли не в константах?


 
Romkin ©   (2004-03-26 21:21) [4]

Можно написать var вместо const :)))


 
Anton ©   (2004-03-26 23:28) [5]

2 heady
Это типизированная константа, ее значение можно переприсваивать.


 
DrPass ©   (2004-03-27 00:32) [6]

Не факт. По умолчанию присваивание значений типизированным константам запрещено (включается {$J+} )


 
lyeh ©   (2004-03-27 00:37) [7]

DrPass ©
>> По умолчанию присваивание значений типизированным константам запрещено (включается {$J+} )

Точно


 
Defunct ©   (2004-03-27 04:33) [8]

А лучше вообще массив вынести в текстовый файл. Проще редактирвать и нет надобности постоянно перекомпилировать программу.


 
Anatoly Podgoretsky ©   (2004-03-27 13:46) [9]

DrPass ©   (27.03.04 00:32) [6]
Не факт. Зависит от версии, не исключено также изменение настроек и включение файла параметров, при том против своей воли.


 
heady   (2004-03-28 12:24) [10]

Подскажите по аналогии - как задавать двухмерный массив?


 
Тимохов ©   (2004-03-28 12:27) [11]

точно также

const a: array [0..3,0..2] of integer = ((1,2,3), (3,3,3), (3,4,5), (4,5,6));


 
YurikGl ©   (2004-03-30 21:36) [12]

А как задавать массив record-в?

 TMyPoint = record
   I,R:extended;
            end;

const
array R60array[1..18] of TMyPoint = ?


 
VMcL ©   (2004-03-30 21:47) [13]

>>YurikGl ©  (30.03.04 21:36) [12]

R60array: array [1..18] of TMyPoint = (
 (I: 1.2; R: 2.3),
 ...
);



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

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

Наверх




Память: 0.49 MB
Время: 0.042 c
4-1076572782
Дёма
2004-02-12 10:59
2004.04.18
Версия Windows


9-1049035175
Barlok
2003-03-30 18:39
2004.04.18
Вопрос по OpenGL как налажить текстуру с внутреней стороны сферы.


6-1076568892
Kremen
2004-02-12 09:54
2004.04.18
MAC-адрес


1-1080635700
V-Isa
2004-03-30 12:35
2004.04.18
Программно подменить содержимое буфера обмена


7-1077320098
Electon
2004-02-21 02:34
2004.04.18
Использование чужой DLL