Как выполнить процедуру (функцию) из другого модуля

[Всеслав]

Добавил к проекту еще один модуль (именно модуль а не форму). Хочу разместить в нем все функции и некоторые процедуры которые вызываются из разных мест программы. Как это реализовать?

[Showy]

Если я вас правильно понял, то

unit MyUtils;

interface

uses SysUtils;
//объявляем методы
procedure MyProcedure1(Value: Boolean);
function  MyFunction1(Value: Integer): Boolean;

implementation

procedure MyProcedure1(Value: Boolean);
begin

end;

function MyFunction1(Value: Integer): Boolean;
begin

end;

end.

Ну и соответственно подключаем его куда нужно.

[Kotofff]

Объяви его в uses того модуля,в котором будешь использовать его функции.

unit Unit1;
interface
uses
  Windows, ... ... , MyModul;

[Neeter]

Вот пример модуля:

unit Unit5;

interface

uses Windows, ShellAPI;

procedure Exec;
//Тут можете писать и другие процедуры, которые будут доступны в формах, где включен данный модуль

implementation

//Здесь уже их код

procedure Exec;
begin
 ShellExecute(GetActiveWindow,'open', pChar('http://programmersforum.ru/'),
   NIL, NIL,SW_SHOW);
end;

//Если здесь еще писать другие процедуры или функции, не прописывая в секции interface, то они будут не доступны в формах

end.

Потом подключаете в код формы данный модуль и вызываете процедуру:

procedure TForm1.Button1Click(Sender: TObject);
begin
 Exec;
end;

P.S. Не успел)

[Всеслав]

Всем большое спасибо