Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.019 c
14-81870
И. О. Красной Майки
2003-07-31 23:18
2003.08.25
Встреча в Москве


1-81631
ZioN
2003-08-12 15:13
2003.08.25
Повторный запуск приложнеия


1-81635
ArtAlex
2003-08-12 14:46
2003.08.25
Отслеживание действий выполняемых с другими приложениями


1-81616
hawkins
2003-08-13 08:09
2003.08.25
В TImage вместо текста появляется черная полоса


9-81520
Barlok
2003-02-21 19:31
2003.08.25
Народ помогите, по OpenGL не работает DGLUT.PAS, пожайлуста.




   Наверх