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

Вниз

Размер массива   Найти похожие ветки 

 
anod ©   (2002-03-29 00:22) [0]

Пытаюсь динамически создавать массив.
var d: array of string; i,n:integer;
...
n:=3;
SetLength(s,n);
for i:= 1 to n do d[i]:=....
Примерно так. Не работает. Может я не ту функцию (SetLength) использую? или что-то ещё надо задать? Если пишу d:array [1..3] of string, то все работает.


 
lipskiy ©   (2002-03-29 00:49) [1]

Надо делать
for i:= 0 to n-1 do d[i]:=....
Динамические массивы нумеруются только с нуля и никак более.


 
anod ©   (2002-03-29 00:54) [2]

А ещё и вот здеся ругается. Я так, наугад написал.
var i:integer; dirmenu: array of TMenuItem;
begin
SetLength(dirmenu,n);
for i:= 0 to n-1 do
begin
popUpMenu1.Items.Add(dirmenu[i]);
dirmenu[i].Caption:=IntToStr(i)+" - "+d[i];
if d[i]="Empty" then dirmenu[i].enabled:=false
else dirmenu[i].enabled:=true;
end;


 
lipskiy ©   (2002-03-29 01:02) [3]

popUpMenu1.Items.Add(dirmenu[i]);
А кто dirmenu[i] создавать будет?
Добавляешь несозданный объект.


 
anod ©   (2002-03-29 01:04) [4]

Да, познавато уже. :)



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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
1-32746
IGI
2002-03-29 12:57
2002.04.11
Файлы


14-32953
Лана Розанова
2002-03-03 21:42
2002.04.11
Привет всем!!!


14-32949
IronHawk
2002-02-22 16:23
2002.04.11
Мастера Delphi ! ПРО САЙТ И ЕГО ОБИТАТЕЛЕЙ !


1-32780
fgh
2002-03-31 16:45
2002.04.11
Компоненты для работы с архивами


1-32782
Biorobot
2002-03-31 15:59
2002.04.11
Ещё разок спрошу!