Пример примерно требуемого:
var
array1 : array of array of TOpenDialog;
array2 : array of array of TOpenDialog;
array3 : array of array of TOpenDialog;
......etc
array10000 : array of array of TOpenDialog;
begin
for i := 1 to 10000 do SomeFunction('array'+IntToStr(i)); <=== Так, в Pascal'e - очевидно нельзя подгрузить массив... или можно??? Если можно, то как?
или тоже самое относительно функций...
for i := 1 to 10000 do
begin
arrFunctionName[i] := 'SomeFunction' + IntToStr(i) +'(array'+IntToStr(i)+ ',' + true+')');
Run(arrFunctionName[i]); <=== Но там (в теле функции) - нельзя использовать case SomeName of 1,2,3,4...10000 end;
end;
Изначально вопрос звучал, так: Авто-нумерация массивов и функций - это возможно?
Более правильно вопрос прозвучит, так: Можно ли задавать и вызывать через string название функции и массива???end;
/
