Форум: "Начинающим";
Текущий архив: 2008.03.23;
Скачать: [xml.tar.bz2];
Вниз
Вопрос про создание TLabel. Найти похожие ветки
← →
vegarulez © (2008-02-26 15:52) [0]привет всем мастерам!
Вопрос такой:
есть код создающий TShape`ы хочу аналогично создавать Tlabel`ы
Но почему то выдаёт ошибку - Acces violation at address...type
AShape = array of TShape;
ALabel = array of TLabel;
...
private
{ Private declarations }
ledConnected: AShape;
labelConnected: ALabel;
...
for i:= 0 to (m - 1) do
begin
ledConnected[i]:= TShape.create(panel1);
with ledConnected[i] do begin
parent:= panel1;
height:= 8;
width:= 20;
top:= 15;
left:= x; inc(x,25);
brush.color:= clred;
end;
labelConnected[i]:= TLabel.create(panel1);
with labelConnected[i] do begin
parent:= panel1;
height:= 8;
width:= 20;
top:= 15;
left:= x; inc(x,25);
color:= clred;
end;
end;
Подскажите в чём проблема.
← →
MBo © (2008-02-26 16:00) [1]массиву labelConnected длина задана?
← →
vegarulez © (2008-02-27 06:11) [2]а нада ли задавать?
почему для TShape не требутся задание длинны?
← →
vegarulez © (2008-02-27 06:28) [3]
> vegarulez © (27.02.08 06:11) [2]
> а нада ли задавать?
Задал - помогло. Но объясните почему так? У Tshape же не задан размер массива?
← →
Семеныч (2008-02-27 06:41) [4]> vegarulez © (27.02.08 06:28) [3]
Этого не может быть. Где-то задана обязательно, иначе бы не работало.
← →
vegarulez © (2008-02-27 07:08) [5]
> Семеныч (27.02.08 06:41) [4]
да ты прав, не увидел:
setLength(ledConnected,maxConnections);
после чего сечас добавил
setLength(labelConnected,maxConnections);
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2008.03.23;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c
