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

Вниз

Как сделать функцию доступной везде?   Найти похожие ветки 

 
Vemer   (2003-10-01 13:24) [0]

Здравствуйте. Создал я вчера функцию, и она даже работает, но только в своем модуле. Чтение Help и решебника не помогло. Приведите пожалуйста реальный пример как сделать функцию доступной из всех модулей (что писать и главное где).


 
DenK_vrtz   (2003-10-01 13:25) [1]

сделать dll!


 
AlexGof   (2003-10-01 13:28) [2]

Дык модуль с функцией подключать в те модули в раздел uses в которых надо использовать ее не пробовал ?


 
Vlad   (2003-10-01 13:31) [3]

Делаешь в любом модуле функцию вне класса.
Затем в других модулях, в uses добавляешь этот. И пользуйся своей функцией сколько угодно.
Если я конечно правильно понял проблему.
P.S. Это как нибудь связано с БД ? :)


 
DenK_vrtz   (2003-10-01 13:37) [4]

млин, а я то размахнулся!
а тут не про то разговор :-)

Vlad ©, функция наверно с БД работает :-)


 
Deniz   (2003-10-01 13:46) [5]

Описать функцию в разделе interface того модуля, в котором она реализована


 
Vemer   (2003-10-01 18:23) [6]

Снова я. Извините, перепутал раздел, Форум БД просто по умолчанию у меня стоит, и функция тоже БД обрабатывает. Кстати Uses не помогает. Для меня "Сделать функцию вне класса" ни о чем не говорит. Пожалуйста напишите простой пример для меня тупого.

To Moderator: Может в общие вопросы ветку перекинуть?


 
Vlad   (2003-10-01 18:32) [7]

unit Unit1;
interface

uses ......

type
....
private
....
public
....
end;

var
......
function MyFunction(parameter: integer): boolean;
implementation

function MyFunction(parameter: integer): boolean;
begin
...
end;

------------------------------------------------------
unit Unit2

.....

implementation
uses Unit1

procedure TForm1ButtonClick(Sender: TObject);
begin
if MyFunction(...) then
end;


 
app   (2003-10-01 20:11) [8]

Vemer © (01.10.03 18:23) [6]
Сделать по умолчанию Форум Потрепаться или внимательно следить за своими сообщениями или ты хочешь что бы их удаляли?



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

Форум: "Основная";
Текущий архив: 2003.10.13;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.009 c
7-40699
Номолос
2003-07-26 09:16
2003.10.13
Как получить список всех носителей информаци?


14-40596
sagchat
2003-09-25 12:39
2003.10.13
Где можно разместить файлы?


3-40268
Aleksey V.P.
2003-09-22 10:33
2003.10.13
Null значения в поля таблицы (D5, D6, D7, ADO, dBase IV)


1-40462
gregz
2003-10-02 16:25
2003.10.13
Русификатор


1-40402
sergeant
2003-09-30 23:37
2003.10.13
Динамический таймер.





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский