Несколько печатных форм в одном интерфейсе

[Sheinina]

Есть интерфейс, в котором по запосу выбирается, что печатать. Структура такая:

Код: Выделить всё

Interface main_int;
...
HandleEvent
...
cmPrint:
   RunInterface('VyborRegim', regim);
   case regim of
     0: RunInterface('Print1');
     1: RunInterface('Print2');
     2: RunInterface('Print3');
   end;
...
end.

Interface Print1;
...
Form F1('f1', 'f1.out');
...
end.

Interface Print2;
...
Form F2('f2', 'f2.out');
...
end.

Interface Print3;
...
Form F3('f3', 'f3.out');
...
end.

И вот вочему-то не хотят формы F2 и F3 быть видимыми ...

[Hmyrii]

из этого кода сложно понять почему у тебя не видно формы
можно попробовать каждую из них сделать в свою группу
и делать SetGroup
а еще можно попробовать перед непосредственной печатью перейти на закладку "настройка отчетов" и проверить, может они там помечены инсертом как hide

[Sheinina]

Формы стали видимы, когда я перевела их на один прототип. Вроде как не слишком критично...
А в "Настройке отчетов" она их тоже не показывала...

[Sheinina]

Подскажите, пожалуйста, что это за функция. В имеющейся у меня документации я ее не нашла

[oiko]

Я делал несколько иначе

Interface main_int;
...
Form F1('f1', 'f1.out');
Form F2('f2', 'f2.out');
Form F3('f3', 'f3.out');

HandleEvent
...

cmprintdoc:
{
rundialog(mainprint,prnchoice);
case prnchoice of
0 : urprint1(); процедура печатает форму F1
1 : urprint2(); процедура печатает форму F2
2 : urprint3(); процедура печатает форму F3
end;//case
}

При выборе прототипа F1 вы никогда не увидите F2 и F3,
при выборе прототипа F2 вы никогда не увидите F1 и F3 т.к. на печать вызывается только один прототип.

[Maverick]

Каждая секция Form объявляет не просто форму, а прототип для формы. Отсюда и проблемы видимости.