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

Вниз

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

 
LORD ©   (2002-12-23 23:16) [0]

Привет всем.
подскажите как задействовать процедуру
объявленную в другом модуле ,а то уменя чегото не получается
компилятор выдает сообщение :процедура не видна.

ниже пример того как я это делал.

Это код основного модуля:

unit Unit1;
interface
uses
...
...
...
type

TForm1 = class(TForm)
...
...
...
procedure viewfolder(buffer:string);
end;

var
Form1: TForm1;
...
...
...
implementation
{$R *.dfm}
uses unit2;
procedure tform1.viewfolder(buffer:string);
var
...
begin
filerx(my_buffer,my_path); //ошибка здесь :данная процедура не видна

end;
...
...
...
end;
-----------------------------------------------------------
Это код дополнительного модуля:
unit unit2;
interface
uses
...
...
...
implementation
uses unit1;
procedure filerx(buffer,path:string);
begin
....
....
....
end;
end.
-------------------------------------------------------


 
TTCustomDelphiMaster ©   (2002-12-23 23:46) [1]

Это код дополнительного модуля:
unit unit2;
interface
uses
...
...
...
procedure filerx(buffer,path:string);

implementation
uses unit1;
procedure filerx(buffer,path:string);
begin
....
....
....
end;
end.



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

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

Наверх




Память: 0.46 MB
Время: 0.013 c
1-15091
FoxM
2002-12-22 14:11
2003.01.06
проблемы с кнопкой


6-15201
ai
2002-11-06 07:55
2003.01.06
TServerSocket: как отфильтровать подключаетмых клиентов?


7-15336
SeF
2002-10-28 11:03
2003.01.06
service


3-14917
Ops
2002-12-13 14:54
2003.01.06
Сервер рвет все коннекты. Все проги валятся.


14-15227
Мазут Береговой
2002-12-13 03:51
2003.01.06
Абсолютно научный подход, много ссылок и информации...