Вниз
Скачать: CL | DM;

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

← →
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


← →
Сергей М. ©   (2007-04-27 13:45) [6]


> SerMaxx   (27.04.07 13:21) [2]


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

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

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


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

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


← →
Сергей М. ©   (2007-04-27 16:26) [8]


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


не или но ?)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.03 c
15-1176878638
Pazitron_Brain
2007-04-18 10:43
2007.05.20
MiniUSB --> Com


8-1157683616
aKirill.INFO
2006-09-08 06:46
2007.05.20
Немогу понять где косяк с OpenGL


2-1178204925
RomanLN
2007-05-03 19:08
2007.05.20
как отменить нажатие кнопки закрыть?


3-1172843106
kilya
2007-03-02 16:45
2007.05.20
security.fdb . модификация


15-1177382155
Slider007
2007-04-24 06:35
2007.05.20
С днем рождения ! 24 апреля




   Наверх