Форум: "Основная";
Текущий архив: 2003.08.25;
Скачать: [xml.tar.bz2];
Внизможно ли в одном модуле ссылаться на переменую в другом и обратно Найти похожие ветки
← →
ossa (2003-08-14 08:01) [0]Т.е.
unit unit1;
interface
uses unit2;
var
maska:integer;
implemination
procedure TFormUnit.Button1Click(Sender: TObject);
begin
Unit2.StrDialMain();
end;
end.
unit unit2;
interface
uses unit1;
procedure StrDialMain();
implemination
procedure StrDialMain();
begin
...
end;
//что нибудь делаем с
maska
end.
как можно сделать так чтоб 1 модуль обращался к 2, а 2 к 1
← →
Романов Р.В. (2003-08-14 08:12) [1]unit unit1;
interface
var
maska:integer;
implemination
uses unit2;
procedure TFormUnit.Button1Click(Sender: TObject);
begin
Unit2.StrDialMain();
end;
end.
unit unit2;
interface
procedure StrDialMain();
implemination
uses unit1;
procedure StrDialMain();
begin
...
end;
//что нибудь делаем с
maska
end.
← →
ossa (2003-08-14 08:19) [2]Спасибо!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.08.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c