Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.033 c
1-1083426139
Viner
2004-05-01 19:42
2004.05.16
Возможность вставки рисунков


4-1080412188
Wontar
2004-03-27 21:29
2004.05.16
TWebBrowser


9-1072950191
mixir
2004-01-01 12:43
2004.05.16
Рисование в изометрии


1-1083047567
basken
2004-04-27 10:32
2004.05.16
Как принудительно показать хинт контрола?


14-1082531195
stud
2004-04-21 11:06
2004.05.16
удаление sp4 win2000





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский