Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.25;
Скачать: CL | DM;

Вниз

можно ли в одном модуле ссылаться на переменую в другом и обратно   Найти похожие ветки 

 
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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.014 c
1-81792
korvin
2003-08-14 08:51
2003.08.25
Правильное сворачивание всех окон программы из модальной


7-81986
HardClubber
2003-06-08 17:48
2003.08.25
Написание драйвера


3-81579
paxer
2003-07-30 10:47
2003.08.25
Помогите разобраться с транзакциями!


4-82025
acsoft
2003-06-20 13:42
2003.08.25
Кто разбирался с user32.dll? Там есть функция TrackPopupMenu , о


6-81867
-= Demon =-
2003-06-18 17:29
2003.08.25
Как узнать тип соединения с Интернетом: сеть или модем