[Winny]

Например:

Код:

procedure GetCount;
begin
Код процедуры
end;

Потом надо написать в разделе public вот что:

Код:

public
procedure GetCount;

Всё! Теперь можно вызывать эту процедуру из других юнитов.