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




Вниз

Передача параметров в функцию 


kaif   (2002-03-04 12:05) [17]

Может, передавать переменную типа TStrings ?
procedure MyProcedure(Params: TStrings);
А в нее предварительно запихивать параметры:

with Params do
begin
Values["Параметр1"]= "Вася";
Values["Возраст"]= "23";
Values["Is Приколист"]= "1";
Values["День рождения"]= "01.01.2001";
end;
MyProcedure(Params);
Так хранятся параметры в компоненте TIBDatabase.
При таком подходе только байтовый поток не передашь, но мне так кажется, в данном случае этого и не требуется.
-----------
А если совсем приспичило передавать байтовый поток, то лучше все это передать вообще как TStream. А кишки Stream-а организовать, как душе угодно.
Умные люди тут предлагали передавать экземпляр класса. Это вообще идеальное решение для такой задачи, IMHO. Я бы создал целую иерархию классов и определил бы параметр, как экземпляр класса их главного предка. В самой процедуре я бы анализировал класс переданного объекта и принимал соответствующие решения, как это все интерпретировать.




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




Наверх





Память: 0.72 MB
Время: 0.017 c
1-57445           Olfi                  2002-03-02 15:16  2002.03.18  
Как узнать высоту строки в пикселях?


4-57549           FLASH....             2002-01-18 18:45  2002.03.18  
КАК ОТЛОВИТЬ ВЫХОД С WINDOWS ????


14-57501          HDD                   2002-02-02 17:25  2002.03.18  
Помогите пожалуйста!


6-57482           HEX                   2002-01-03 20:54  2002.03.18  
Dialer компонент?


4-57565           Delphi5.01            2002-01-19 20:56  2002.03.18  
Почему форма разных размеров в Win98 и Win95.