как объявить функцию?

← →
SerMaxx (2007-04-27 12:27) [0]

Уважаемые мастера, помогите разобраться - как можно объявить функцию в Unit1, но так что бы ее можно было вызвать и в Unit2. Понятно что при этом implementation uses Unit1 для Unit2 уже описано.... но как описать и вызвать я не понимаю. Подскажите пожайлуста! заранее благодарен за помощь

← →
Сергей М. © (2007-04-27 12:39) [1]

> как описать

Вот так:

unit1;
..
interface
..
function MyFuncName(параметры_если_имеются): MyResultType;
..
implementation
..
function MyFuncName(параметры_если_имеются): MyResultType;
begin
.. тело функции ..
end;

← →
SerMaxx (2007-04-27 13:21) [2]

Я пошу прощения за непонимание....

interface
.. //здесь должен быть раздел public? или же все это описываеться без него?
function MyFuncName(параметры_если_имеются): MyResultType;
..
implementation

При таком способе объявления у меня вылезает ошибка:
[Error] Unit1.pas(67): Unsatisfied forward or external declaration: "TForm1.MyFuncName"
может я чего-то не так делаю?

← →
Reindeer Moss Eater © (2007-04-27 13:36) [3]

может я чего-то не так делаю?

Копипастить не умеешь?

← →
ASoft (2007-04-27 13:38) [4]

cм [1]

Unit2
...
uses Unit1;
implementation

...
begin
MyFuncName(параметры_если_имеются): MyResultType;
end;

end.

← →
ASoft (2007-04-27 13:41) [5]

ой, наеборот:) uses после implementation

> SerMaxx (27.04.07 13:21) [2]

Какой еще "public" ? Ты же о регулярной функции (1) ведешь речь, а не о функциональном методе класса(2) !

Разницу-то сечешь между (1) и (2) ?

Впору бросать свои эксперименты и углубляться в ООП)

← →
SerMaxx (2007-04-27 16:14) [7]

Господа огромное спасибо. а эксперименты.... не знаю не очень хочеться бросать, тем более что и программирую для себя..
Еще раз огромне спасибо за помощь!!!!

> не знаю не очень хочеться бросать

не или но ?)

как объявить функцию? Найти похожие ветки