Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Переменное число параметров в процедуре.

Карелин Артем © (2002-09-09 15:22:00)
Итак, в Дельфи есть куча процедур, в которые можно передавать разное число параметров: inc, format......
А как такое сделать самому? Все эти процедуры без исходников.

Anatoly Podgoretsky (2002-09-09 23:01:00) [1]
Так нельзя, можно не трогать параметры только справа

Begin (2002-09-09 22:43:00) [2]
А вот в случае, если, есть некая процедура, вроде

Procedure MProc(A : byte = 0; B : byte = 0; C : byte = 0;)
....

могу ли я ее вызвать с изменением А и С, а В не трогать никак? Те както типа

MProc(A:=1;C:=1) оставив В равным 0 (я знаю, что запись не верна, это для пояснения вопроса ... :))

И если могу, то как ?

Старый Паскалист (2002-09-09 16:33:00) [3]
Пример использования array of const:

s := Sum([1, 2, 34, 99, 1]);

function Sum(Args: array of const): Integer;
var i: Integer;
begin
Result := 0;
for i := 0 to High(Args) do
begin
if Args[i].VType = vtInteger then Result := Result + Args[i].VInteger;

// if Args[i].VType = vtString{/vtObject/vtBoolean...} then ...;
end;
end;

Карелин Артем (2002-09-09 15:37:00) [4]
procedure Test(I: Integer; J: Integer = 0)

kronprince (2002-09-09 15:32:00) [5]
- еще может пригодится
Delphi help > Help topics > Index > Default parameters and overloaded routines
Delphi help > Help topics > Index > Overloading procedures and functions

kronprince (2002-09-09 15:28:00) [6]
Delphi help > Help topics > Index > Default parameters

VAleksey (2002-09-09 15:27:00) [7]
function Format(const Format: string; const Args: array of const): string;
Это описание из хелпа. Здесь нет "разного числа параметров".
Здесь только Args: array of const - динамический массив констант.

Карелин Артем (2002-09-09 15:26:00) [8]
Не хочу передавать массив. Хочу сабж, если возможно.

MBo (2002-09-09 15:25:00) [9]
array of const

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »