Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c
3-1127894734
axx
2005-09-28 12:05
2005.11.06
FireBird SQL синтаксис


1-1129528210
Карелин Артем
2005-10-17 09:50
2005.11.06
Как сохранить/считать свойства потомка TObject в строку?


2-1129119864
Kel
2005-10-12 16:24
2005.11.06
Есть разница между комбинированием констант


10-1106911438
Sancho
2005-01-28 14:23
2005.11.06
Как дебагить сервер приложений


14-1129355243
Машка
2005-10-15 09:47
2005.11.06
Как стать мастерицей Delphi?




   Наверх