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

Вниз

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

← →
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; и использовать ее также как и в "родном".

---

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

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

Наверх

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