Форум: "Основная";
Текущий архив: 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. Я бы создал целую иерархию классов и определил бы параметр, как экземпляр класса их главного предка. В самой процедуре я бы анализировал класс переданного объекта и принимал соответствующие решения, как это все интерпретировать.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.18;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c