Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.16;
Скачать: CL | DM;

Вниз

Объявление функции   Найти похожие ветки 

 
Frozzen   (2004-04-22 12:42) [0]

Еще раз спрашиваю
как сделать чтобы функцию можно было использовать в трех модулях
как ее объявить
чего и где написать


 
Паниковский ©   (2004-04-22 12:44) [1]

type
MyClass = class
 public
   function DoSomeThing():integer;
end;

function MyClass::DoSomeThing():integer;
begin
result := 0;
end;


 
Frozzen   (2004-04-22 12:47) [2]

и ее можно использовать в других модулях

var s: Integer;

begin
s := DoSomeThink();


 
Frozzen   (2004-04-22 12:47) [3]

или как


 
Frozzen   (2004-04-22 12:48) [4]

а без ООП


 
Algol   (2004-04-22 12:49) [5]


> function MyClass::DoSomeThing():integer;


Это Вы ваще на каком языке-то пишите ? ))


 
Гаврила   (2004-04-22 12:49) [6]

Объявить в секции Interface, пеализовать в секции Implementation
модуль с функцией упомянуть в секции Uses тех трех модулей


 
Frozzen   (2004-04-22 12:51) [7]

во ща уже яснее


 
Frozzen   (2004-04-22 12:52) [8]

тока  про implementation объясните


 
Паниковский ©   (2004-04-22 12:53) [9]

Frozzen  
а ну тогда просто пишеш глобальную функцию которая не принадлежит ни одному классу например так

type
MyClass = class

end;

function DoSomeThing():integer;/*обьявление функции */

implementation

function DoSomeThing():integer;/*сама функция */
begin
result := 0;
end;

то есть обьявляеш функцию вне класса и использовать ее можно хоть где только в uses надо включить имя файла

ЗЫ: Всем раздать лопаты !


 
Frozzen   (2004-04-22 12:54) [10]

Ой Гаврила друг
пасиба те
а то все че-то левое стегают


 
Паниковский ©   (2004-04-22 12:54) [11]

Algol

трудно между С++,Java и Delphi быстро переключатся привычки быстро менять


 
Frozzen   (2004-04-22 12:55) [12]

Всем пасибо



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

Текущий архив: 2004.05.16;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.04 c
3-1082356165
clover
2004-04-19 10:29
2004.05.16
Где можно скачать последнюю версию IBForms?


7-1080738078
Прямой
2004-03-31 17:01
2004.05.16
Очередь сообщений


3-1081418073
ev
2004-04-08 13:54
2004.05.16
Как через SQL запрос найти вложенную страку в поле БД, без учета


6-1080127550
rimd
2004-03-24 14:25
2004.05.16
idSMTP and idAntifreez


1-1083078463
.Lex
2004-04-27 19:07
2004.05.16
Как отловить Error в программе?