Куча однотипных параметров, или массив-параметр неопределенной длины

[Kronos913]

Задача такая:
Нужно передать в процедуру несколько string'ов как параметры
Но так чтобы их количество могло меняться при разных вызовах процедуры

Чтобы это могла быть 1 строка, а могло быть несколько, а могло быть и 0

[digitalis]

В общем случае - ничего сложного.

arrgstr : array[1..9] of string ;
.................
procedure proc(n:integer; strarg: array of string) ;
begin
  if n > 0 then
   ........
end ;

........
proc(2,argstr) ;

Ну а если строк действительно неопределённое количество (100500), да ещё и расположены в
разных местах... Странные хотелки требуют нестандартного решения, думаю я.

[Kronos913]

Ок, а как потом изнутри процедуры узнать границы массива?

[digitalis]

Изнутри - никак, это же входной параметр. Мы говорим процедуре: "Вот тебе массив строк в количестве n, а что с ними делать - сама знаешь."
Или вопрос ставится так: передали ей адрес начала массива строк, а она по какому-то правилу должна понять - сколько из них нужных ? Ну так это вопрос к алгоритму, а не к его реализации. Можно, например, конечную строку сделать какой-то особенной, в которой есть то, чего нет в "рабочих" строках.
Не зная конкретной задачи - это сотрясение воздуха.

[BDA]

Сообщение от digitalis

Изнутри - никак, это же входной параметр.

Это не так. Ваш чуть переделанный пример:

var
  argstr: array[1..9] of string;
...
procedure proc(strarg: array of string);
var
  i: Integer;
begin
  for i := 0 to High(strarg) do
    ShowMessage(strarg[i]);
end;
...
proc(argstr);

Kronos913, почитайте про динамические и открытые массивы. То есть, в любом случае передавать именно массив строк, но в нем будет от 0 до сколько нужно строк.

proc(['1', '2']);
proc([]);

[northener]

Сообщение от digitalis

Изнутри - никак, это же входной параметр.

Ну и что что входной? Если мы передаём в качестве параметра динамический массив, то у него самого есть всё что надо, чтобы определить его размер и количество элементов.
Но вам стоит освежить свою память. В вашей

Сообщение от digitalis

procedure proc(n:integer; strarg: array of string) ;

strarg это открытый массив, а не динамический.

[digitalis]

Пожалуй, да...
Но у ТС не было слов про динамический.