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

Вниз

Работа с функциями, находящимеся в отдельном модуле   Найти похожие ветки 

 
Cosinus ©   (2004-08-10 14:27) [0]

Заранее извиняюсь за возможно глупый вопрос.
Допустим у меня есть отдельный модуль, в который я запихал несколько постоянно необходимых мне функций, но так как эти функции от программы к программе либо в одной и той же программе совсем слегка изменяются и дабы не плодить десяток клонов, то было принято решение написать их универсальными. Но... Универсальность в моем случае получилось громоздкой, в том смысле, что каждый вызов выглядит примерно так
My_Function(Sender:TObject,Par1,Par2,Par3,Par4,Par5,Par6)
, что делает код плохочитаемым. Нелязя ли в самом начале сделать что то типа следующего...
My_funk_1=My_Function(Send1,a,b,c,d,e,f)
My_funk_2=My_Function(Send2,g,h,i,j,k,l)

и уже потом вызывать их через My_func?
Заранее благодарен за любые советы и комментарии, Владислав.


 
jack128 ©   (2004-08-10 14:31) [1]


> My_funk_1=My_Function(Send1,a,b,c,d,e,f)
> My_funk_2=My_Function(Send2,g,h,i,j,k,l)
ничего не понял. Поставь вместо "=" - ":=" и объяви My_funk_1 как переменную и используй дальше значение этой переменной ;-)

Для сокращения числа вводимых параметров можноо использовать параметры по умолчанию. В зависимости от логики функции можно испоьзовать константный массив (array of const)



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

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

Наверх




Память: 0.47 MB
Время: 0.026 c
1-1091711728
axelrod
2004-08-05 17:15
2004.08.22
Как преобразовать звуковой файл в числовую модель?


11-1079721449
Kiber
2004-03-19 21:37
2004.08.22
Программа копирует сама себя


14-1091541507
Мастер
2004-08-03 17:58
2004.08.22
Продолжаем тему тестирования.


14-1091007987
Gero
2004-07-28 13:46
2004.08.22
Электронные книги


1-1091951641
gs
2004-08-08 11:54
2004.08.22
Создание XML файла из программы