Динамическое вложение циклов

[java_91]

Здравствуйте. Подскажите пожалуйста как реализовать динамическое вложение массивов, например:
for i[index] to cout1 do
for i[index+1] to cout2 do
for i[index+2] to cout3 do
// и так далее до index+n
end;
end;
end;

Заранее большое спасибо.

[vovk]

рекурсия ?

[java_91]

да скорее всего. Спасибо что сказали как это называется

[vovk]

Да не за что))

[java_91]

Не получается что то с рекурсией =(

var
  Form1: TForm1;
  i : array [1..10] of integer ;
  n, index, k : integer;
implementation

{$R *.dfm}
procedure TForm1.recurs(Sender: TObject);
Begin
  k := k+1;
  index := index+1;
  for i[index]:=1 to n do
    Begin
    StringGrid1.Cells[index,k];
    if index <= n then
      recurs(Sender);
    end;
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
k := 0;
index := 0;
n := StrToInt(Edit1.Text);
recurs(Sender);
end;

Выдает ошибку "pas(37): For loop control variable mast be simple local variable"

[vovk]

вам стоит прочитать про процедуры и функции, и естественно про передаваемые и возвращаемые параметры.
По моему тут рекурсия не нужна, тут вполне можно узнать количество итераций, их количество как я понял зависит от количества строк и колонок StringGrid1, а их легко получить при выполнении программы.

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

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

[java_91]

условие задачи такое. есть неопределенное количество связанных таблиц.
в одной связке БД их может быть 2 а в другой 5. Надо организовать экспорт в эксель так что бы например:
Вид1

группа1

Наименование1

Наименование2

группа2

Наименование3

Вид2

группа3

Наименование4

Наименование5

Наименование6

и тд.
Но например у некоторых связок видов не предусмотрено есть только группы и наименования, а у некоторых еще добавляется и типы.
Для этого я думал реализовать как цикл в рекурсии:
for - цикл для 1 колонки (Вид)
begin
записываем название 1 колонки (вида)
если больше то опять на себя но колонка увеличивается на 1 (колонка 2 - группа)
end
P.S. Простите за корявый язык, я но я сам толком не очень понимаюб как это реализовать.

[vovk]

Честное слово ничего не понял((

[java_91]

попробую еще раз:
Надо сделать шаблон экспорта в эксель.
Шаблон экспортирует поля из связанных таблиц БД.
Например есть таблица видов, таблица групп, таблица просто названий и характеристик. Они связанны 1<-много. Надо перенести в Excel так что бы 1 колонка отображала вид. 2- группу , 3- наименование... (в моем предыдущем условии есть пример как должно выглядеть в excel).
Сама загвоздка и причина применения рекурсии в том что связанных таблиц может быть меньше или больше. Т.е. может без вида (без колонки видов в предыдущем примере, а может еще появиться промежуточная колонка типы (если еще 4 связанных таблицы будет))

[vovk]

Извини всё равно непонятно. Но если таблицы связаны, почему просто не подготовить запросы, а потом экспортировать уже результаты запросов?