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

Вниз

Дин массивы   Найти похожие ветки 

← →
RzCoDer ©   (2005-10-15 13:44) [0]

Такая вот проблема, есть код:


if length(gui.Windows) >= 0 then begin
for f := 0 to length(gui.Windows) do begin
 if length(gui.Windows[f].buttons) >= 0 then begin
 for i := 0 to length(gui.Windows[f].Buttons) do begin


Где GUI пакет рекорд:

TRGUI = packed record                    
Windows      : array of TRWindow;
Visible     : boolean;            
end;

TRWindow соответсвенно тоже. Ошибка AV возникает при попытке обращения к gui.Windows[f], хотя всё вроде задано, в чём может быть проблема?

P.S. TRWindow также имеет дин массивы, но они тож заданы.

---

← →
TUser ©   (2005-10-15 13:49) [1]

> if length(gui.Windows) >= 0 then begin
> for f := 0 to length(gui.Windows) do begin
>  if length(gui.Windows[f].buttons) >= 0 then begin
>  for i := 0 to length(gui.Windows[f].Buttons) do begin

Замени на
for f := 0 to length(gui.Windows) -1 do begin
for i := 0 to length(gui.Windows[f].Buttons) - 1 do begin

Дело в том, что массив длины length(A) включает в себя элементы с индексами low(A) = 0, 1, ..., high(A) = length(A)-1.

---

← →
RzCoDer ©   (2005-10-15 14:05) [2]

TUser, хе, единица была, забыл её тут впечатать,
Ну в принципе разобрался, на самом деле намудил с заданием размера массивов :( а парился ведь 3 час...

---

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

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

Наверх

Память: 0.47 MB
Время: 0.058 c