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

← →
Карелин Артем (2002-09-09 15:22) [0]

Итак, в Дельфи есть куча процедур, в которые можно передавать разное число параметров: inc, format......
А как такое сделать самому? Все эти процедуры без исходников.

← →
MBo (2002-09-09 15:25) [1]

array of const

← →
Карелин Артем (2002-09-09 15:26) [2]

Не хочу передавать массив. Хочу сабж, если возможно.

← →
VAleksey (2002-09-09 15:27) [3]

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

← →
kronprince (2002-09-09 15:28) [4]

Delphi help > Help topics > Index > Default parameters

← →
kronprince (2002-09-09 15:32) [5]

- еще может пригодится
Delphi help > Help topics > Index > Default parameters and overloaded routines
Delphi help > Help topics > Index > Overloading procedures and functions

← →
Карелин Артем (2002-09-09 15:37) [6]

procedure Test(I: Integer; J: Integer = 0)

← →
Старый Паскалист (2002-09-09 16:33) [7]

Пример использования 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;

← →
Begin (2002-09-09 22:43) [8]

А вот в случае, если, есть некая процедура, вроде

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

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

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

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

← →
Anatoly Podgoretsky (2002-09-09 23:01) [9]

Так нельзя, можно не трогать параметры только справа

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