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

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

A : Array of array of String [D5, D6, WinME]

Gayrus ©   (2002-04-13 06:59:00) 

Записывать в A[x,y] получается, а при считывании идёт ошибка. Как считать?

---

Вася Пупкин   (2002-04-14 08:16:00) [1]

Ищи ошибку в коде. Может быть, ты не учел, что дин. массивы индексируются с нуля, т.е. х,у=0..9 ?

вот это работает:
var
Form1: TForm1;
A : Array of array of String;{!!!}

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption:=A[0,0];
Label2.Caption:=A[0,1];
Label3.Caption:=A[1,0];
Label4.Caption:=A[1,1];
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
SetLength(A,10,10);
A[0,0]:="0-0";
A[0,1]:="0-1";
A[1,0]:="1-0";
A[1,1]:="1-1";
end;

---

Gayrus   (2002-04-14 07:42:00) [2]

var A : Array of array of String;{!!!} begin SetLength(A,10,10);А при считывании идет Ошибка по адрессу FFFFFFFF, всё как обычно :)

---

ctapik-net   (2002-04-13 08:40:00) [3]

Да ладно все работает. Ты длину массива устанавливаешь?
SetLength(A,10) ;
For I := 0 To High(A) Do SetLendgth(A[I],10) ;
//Получили квадратную матрицу 10х10.
S := A[k,t] ; где 0<=k,t<=9
Вот и все чего здесь трудного?

---

SPeller   (2002-04-13 07:48:00) [4]

Ты объявляешь динамический массив.
Объяви подругому A: array[i,j] of string;
где i и j максимально допустимые индексы. В общем размерность.

---

Наверх