Как передать массив из одной формы в другую

← →
maxim2 (2002-05-13 15:15) [0]

Привет всем !
Если можно с кодом

← →
Song (2002-05-13 15:55) [1]

Как-то так:

Type Mas: array of Byte;
Var Array:Mas;
Procedure DB(Arr:Mas);
Begin
// Что-то делаем с Arr
End;

DB(Array);

← →
Val (2002-05-13 16:40) [2]

если поместить описание массива в разделе public класса формы:
unit unit1; .. Form1=class (TForm) .. public mas1: array[0..10] of integer; ..

, то вызывать в другом модуле можно так:
unit unit2; .. uses unit1; .. procedure myproc; begin Form1.mas1[0]:=0; end; ..

если это просто глобальная переменная в первом модуле, то во втором нужно просто указать uses unit1; и использовать ее также как и в "родном".

Как передать массив из одной формы в другую Найти похожие ветки