![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как передать массив из одной формы в другую [D6]
maxim2 © (2002-05-13 15:15:00)Привет всем !
Если можно с кодом
Val (2002-05-13 16:40:00) [1]если поместить описание массива в разделе 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;и использовать ее также как и в "родном".
Song (2002-05-13 15:55:00) [2]Как-то так:
Type Mas: array of Byte;
Var Array:Mas;
Procedure DB(Arr:Mas);
Begin
// Что-то делаем с Arr
End;
DB(Array);