Главная страница
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.033 c
1-1083513197
Zelius
2004-05-02 19:53
2004.05.16
Почему не работают хинты?


4-1080324764
DelphiN!
2004-03-26 21:12
2004.05.16
Как считать информацию из буфера обмена Windows?


4-1079947689
Rem
2004-03-22 12:28
2004.05.16
Что такое OLE_HANDLE?


1-1083052555
WondeRu
2004-04-27 11:55
2004.05.16
Как отловить сообщение от OutputDebugString?


3-1082441582
Demiurg
2004-04-20 10:13
2004.05.16
Копирование таблицы