Winny, ты не то пишешь, ты написал про функции формы, которая содержится в модуле, а это не то.
Кароч, есть 2 похожих способа решения данной проблемы.
1) Запихнуть процедуру, например, в Unit1, а потом в остальных юнитах в Uses добавлять Unit1.
2) Создать текстовый документ, в него поместить процедуру, переименовать файл и сделать расширение *.inc. Затем перед тем местом где будет использоваться данная процедура (перед началом процедуры\функции пишешь {$I Имя_Файла_С_ПРОЦЕДУРОЙ.inc}. Есесьно писать это надо 1 раз в модуле.
Пример
Файл MyFunc.inc
Код:
function Sum(X, Y : Integer) : Integer;
begin
Result := X + Y;
end;
Код в модуле
Код:
unit Unit1;
...........
interface
...........
implementation
...........
{$I MyFunc.inc}
procedure TForm1.FormCreate(Sender: TObject);
begin
Caption := IntToStr(Sum(2, 3));
end;