Ф-я с переменным количеством параметров..

[BARNEY]

или так

function a(v:array of variant):string;

implementation

  function a;
  var i:byte;
    begin
      for i:=low(v) to high(v) do
       result:=result+v[i];
    end;

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
caption:=a(['sdfsf']);
caption:=a(['sdfsf','wqeqwe','uu']);
end;

[Lucky777]

Вот ф-я:
int OL_Min(int paramCount, ...)
{
int *p=&paramCount;
int min;
min=*(++p);
for(int i=1; i<paramCount; i++)
if(min>*(i+p))
min=*(i+p);
return min;
}
Она находит минимум среди целых чисел, но мне нужно чтоб среди вещественных,
но переделать не получается, выходит бред. Может есть какието идеи?

[Lucky777]

А если, перегружать, как вы говорите, то я не могу понять как это реализовать...
Подскажите, пожалуйста...

[Alex11223]

http://en.wikipedia.org/wiki/Stdarg.h stdarg вот примеры, но по-моему к этому случаю оно не очень подходит (хотя я не очень понял что вы хотите сделать). "часто используют в функциях с произвольным количеством переменных (к примеру, printf, scanf)."

А перегружать несложно, в сообщении #5 вообщем-то все описано. Или http://programmersclub.ru/13/ подробнее и с примером.

[Lucky777]

Я хочу написать библиотеку функций, где хочу и определить функцию нахождения минимума. Тоесть при вызове задается кол-во значений, среди которых нужно найти минимум, а потом задаются сами значения. Но я же не знаю какие значения будут переданы...

[Lucky777]

И перегрузка не подойдет.. Потомучто нельзя перегрузить ф-ю для всех возможных вариантов задания значений

[Lucky777]

Как мне быть...?

[Lucky777]

Тоесть пользователь один раз вызовет так: min(3, 4,1,6)
потом: min(4, 8, 3, 2, 0) и так далее... Как можно поступить в такой ситуации?

[Lucky777]

Или то что я хочу нельзя сделать?

[Lucky777]

double OL_Min(int paramCount, ...)
{
int *p=&paramCount;
p++;
double *pp=(double *)p;
double min=*pp;
for(; paramCount!=0; paramCount--, pp++)
{
if(min>*pp)
min=*pp;
}
return min;
}
У меня получилось, всем спасибо за ответы!