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




Вниз

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


Фэ   (2002-03-02 21:32) [4]

Насчет array of const согласен, но мороки больше

procedure DoWithArgs(Args: array of const);
var
I: Integer;
begin
for I := Low(Args) to High(Args) do
begin
case Args[I].VType of
vtInteger: //Args[I].VInteger;
vtBoolean: //Args[I].VBoolean then
vtChar: //Args[I].VChar;
vtExtended://Args[I].VInteger;
vtString: //Args[I].VString^;
vtPointer: //Args[I].VPointer;
vtPChar: //Args[I].VPChar;
vtClass: //Args[I].VClass.ClassName;
vtObject: //Args[I].VObject.ClassName;
//..
end;
end;




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




Наверх





Память: 0.71 MB
Время: 0.029 c
1-57411           greenrul              2002-03-01 16:29  2002.03.18  
Три тупых вопроса про Grid -


1-57463           Michael C             2002-03-04 10:03  2002.03.18  
Хелп, люди...


6-57485           ken                   2001-12-29 10:55  2002.03.18  
как узнать модемный пул при подключении через dialup.


1-57390           Lipskiy               2002-03-01 16:10  2002.03.18  
Правда ли то, что используя наиболее короткие имена переменных можно уменьшить объем ехешника?


1-57413           Hewlping              2002-03-01 17:57  2002.03.18  
СРОЧНО!!!!