Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

устанавливаю длину динамического массива и вылетаю :( [D6, Win95/98]


Страницы:   1 2

Trubis ©   (2005-07-03 22:37:00) 

есть 4 динамических массива A,B,C,D
при сокращении их на 1 (dec(X)) и "обновлении":
SetLength(A,X);
SetLength(B,X);
SetLength(C,X);
SetLength(D,X);
вылетает на третьеё строке (здесь - на массиве С)
меняю местами - фиолетово - на ТРЕТЬЕЙ СТРОКЕ вылетает
где ошибка ?


Trubis   (2005-07-04 12:20:00) [21]

Молча - в смысле как будто нажал "Закрыть" (крестик в правом верхнем углу окна)


Trubis   (2005-07-04 12:19:00) [22]

var (глобальный в Unit1)
A : array of string;
B : array of string;
C : array of string;
D : array of string;
X : integer;

FormCreate
X := 1;
SetLength(A,X);
SetLength(B,X);
SetLength(C,X);
SetLength(D,X);
A[0] := '1';
A[1] := '1';
B[0] := '1';
B[1] := '1';
C[0] := '1';
C[1] := '1';
D[0] := '1';
D[1] := '1';

Button1Click
(сокращаю массив на единичку)
X := 0;
SetLength(A,X);
SetLength(B,X);
SetLength(C,X); // программа молча вылетает
SetLength(D,X);

Если поменять местами строки, всё равно вылетит, не важно какой элемент (A,B,C или D) стоит в третьей строке. Может есть какие ограничение или тайные фичи?


Просто Джо   (2005-07-03 23:23:00) [23]

Объявление массивов, значение X и [3] - в студию.


P.N.P.   (2005-07-03 23:02:00) [24]

>Trubis   (03.07.05 22:59) [2]
Текст ошибки какой?


Trubis   (2005-07-03 22:59:00) [25]

хз :)
если б я знал, спрашивал бы
вылетает на третьей строке (здесь - на массиве С)
т.е. при установке длины массива С
почему так происходит ?
если поменять местами массивы, всё равно вылетит. но только на ТРЕТЬЕЙ строке (т.е. при установки размера ТРЕТЬЕГО массива)


P.N.P.   (2005-07-03 22:40:00) [26]

А что за ошибка-то?


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо