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

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

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

Процедура/функция с переменным набором параметров. [D5]

Дельфятник. © (2002-11-26 15:41:00)
Есть ли в Delphi возможность задавать значения некоторых формальных параметров, чтобы можно было вызывать эту процедуру с разным списком фактических параметров? И если есть, то как должен выглядеть заголовок такой процедуры?

Дельфятник (2002-11-29 16:30:00) [1]
Оказывается, в качестве значения по умолчанию можно подставить типизированную константу, значение которой можно менять в программе, при директиве {$J+}, которая установлена по умолчанию. А этот как раз то, что мне надо.
Спасибо всем.

SottNick (2002-11-27 08:03:00) [2]
>>Жаль только, что в качестве значения по умолчанию нельзя подставить программную переменную...
а зачем, раз она глобальная (она глобальная?), передавать ее в процедуру вообще? пусть процедура ее сама берет

var c:integer;
procedure Pop(a:Integer;b:Integer=-10000);
begin
if b=-10000
then
b:=c;
end;

Fantasist (2002-11-27 07:30:00) [3]

> Спасибо, icWasya! Это то, что надо

Вот это да! В начале спрашивают про "разный список фактических параметров", а потом оказывается, что параметры по умолчанию это то, чтот нужно. :) До самого последнего постинга я думал, что человек под "можно как в С++ сделать" понимал: void funct(int i, ...)

Дельфятник (2002-11-26 16:29:00) [4]
Спасибо, icWasya! Это то, что надо.
Жаль только, что в качестве значения по умолчанию нельзя подставить программную переменную...

icWasya (2002-11-26 16:19:00) [5]
ну не совсем нельзя

можно написать так

procedure Pop(a:Integer;Ok:Boolean=false);

а вызывать так

Pop(10);

или

Pop(15,true);

Дельфятник. (2002-11-26 15:48:00) [6]
Спасибо всем. Просто я думал, что в Delphi это можно как в С++ сделать, а оказалось, что нельзя. Ну да ладно.

MBo (2002-11-26 15:44:00) [7]
1. overload
2. array of const

Smithson (2002-11-26 15:44:00) [8]
Array of Integer - неограниченное количество интегеров
Array of String - неограниченное количество строк
ну и т.д.
А вот разные параметры - по-моему, можно сделать Array of Variant.

Marcus (2002-11-26 15:44:00) [9]
Типичный пример - функция Format из SysUtils

function Format(const Format: string; const Args: array of const): string;

Наверх

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