![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
объявить процедуру [D7]
td © (2005-07-06 15:07:00)как объявить процедуру, чтобы ее можно было вызвать из другого модуля?
(консольное приложение, процедуру - в отдельном модуле, в тексте проекта - вызвать)
td (2005-07-06 15:29:00) [1]спасибо
Юрий Зотов (2005-07-06 15:24:00) [2]> td
Надо объявить ее заголовок в секции interface ее модуля, а сам этот модуль включить в предложение uses вызывающего модуля.
unit ProcUnit;
interface
procedure Proc(...);
implementation
procedure Proc(...);
begin
...
end;
end.
unit Unit1; // или project Project1;
...
uses ..., ProcUnit;
// Здесь можно вызывать Proc
end.
Ega23 (2005-07-06 15:22:00) [3]в тексте проекта - uses Unit1
unit Unit1;
interface
procedure Nothing;
implementation
procedure Nothing;
begin
end;
end.