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

Вниз

Передача параметров в процедуру или функцию   Найти похожие ветки 

 
Диамонд   (2007-04-19 16:15) [0]

Уважаемые мастера помогите понять каким образом мне передавать параметры в функцию или процедуру и как потом с ними работать ?

К примеру я постоянно вижу в исходниках что в некоторые процедуры передается один некий параметр, который несет в себе кучу других параметров, например:
procedure SameProc(Msg:string; Params:TSameType);
....

а потом строкой в процедуре типа
if Visible in Params then something...

Расскажите как это делать самому и что за тип параметра использовать.


 
clickmaker ©   (2007-04-19 16:18) [1]

F1 - читать про set и оператор in
а также, там много других интересных типов


 
Диамонд   (2007-04-19 16:20) [2]


> F1 - читать про set и оператор in
> а также, там много других интересных типов

Так я видел что там используют типы Cardinal помоему с множествами я работать умею...
щас поищу код и предоставлю.


 
Плохиш ©   (2007-04-19 16:27) [3]


> Диамонд   (19.04.07 16:15)  
> Уважаемые мастера помогите понять каким образом мне передавать
> параметры в функцию или процедуру и как потом с ними работать ?

Книжки разные умные читать не пробовал? А пора бы уже...


 
_Аноним   (2007-04-19 16:36) [4]

type
TSameType = (st1, st2, st3, st4);
TSameTypes = set of  TSameType;

procedure SameProc(Msg:string; Params:TSameTypes);
begin
if st2 in Params then

вызов:
SameProc(",ka,k,ak,a", [st1, st3])



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

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

Наверх




Память: 0.45 MB
Время: 0.043 c
2-1180394288
vasIZmax
2007-05-29 03:18
2007.06.17
Как нарисовать пружину?))


2-1180432550
СержК
2007-05-29 13:55
2007.06.17
Не получается удалить папку


8-1159775632
Tab
2006-10-02 11:53
2007.06.17
Рисование на Image с помощью gdi+


11-1162392613
Blackie
2006-11-01 17:50
2007.06.17
открытие файла в memo


2-1180090054
vitv
2007-05-25 14:47
2007.06.17
Пустая копия БД





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