Динамическое имя выходного файла...

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Динамическое имя выходного файла...

Сообщение Masygreen »

В общем такая проблема ...
есть интрефейс который в цикле печатает много документов типа

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

_loop
{
RunForm('PrintExcelComp01',_oKatMC);
}
форма RTF определена так

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

.autoform 'PrintExcelComp01' (_oKatMC)
.ard
.Group '**********'
.nameinlist '**************'
.hide
проблема в том, при цикле форма создается с тем же именем что и файл исходник RTF - следовательно мы видим только результат 1 отчета
остальные не печатаются(если вставить message перед RunForm и при выводе rtf пере сохранять их под другими именами - то выводятся все отчеты из цикла) надо что то типа

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

.F _oKatMC
но на такое ругается Ошибка: Ожидалось имя выходного файла
Время ведет!
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Re: Динамическое имя выходного файла...

Сообщение Masygreen »

нашел обсуждение тынц .. в принципе подходит CopyMoveFile .. но у меня rtf, как заставить галактику не открывать файл rtf после формирования ?
Время ведет!
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Re: Динамическое имя выходного файла...

Сообщение edward_K »

в форме прототип.fexit ( например по какому то полю)
В выводе либо abortform, либо showfile('') - под рукой нет.
чтобы еще диалога с выбором форм не было - outf.nodialog ( тогда все присоединенки сформируются).
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Re: Динамическое имя выходного файла...

Сообщение Masygreen »

edward_K писал(а):в форме прототип.fexit ( например по какому то полю)
В выводе либо abortform, либо showfile('') - под рукой нет.
чтобы еще диалога с выбором форм не было - outf.nodialog ( тогда все присоединенки сформируются).
решило проблему в форме
и в интерфейсе

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

     _vFileRTF := Replace(_FileRTF,'\*****.rtf','\'+v_oKatMC+'.rtf');
     deletefile(_vFileRTF);
     CopyMoveFile(_FileRTF,_vFileRTF, false);
     ExecProgram ('start','WINWORD.EXE '+ _vFileRTF, 'Просмотр файла', pfDontWait, 0);
спасибо ...
Время ведет!
Alpiton
Посетитель
Сообщения: 40
Зарегистрирован: 18 апр 2006, 09:19

Re: Динамическое имя выходного файла...

Сообщение Alpiton »

Я использовал SetFileName:

цикл
{
frm.SetFileName
frm.Write
frm.ShowFile
}
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Re: Динамическое имя выходного файла...

Сообщение Masygreen »

Alpiton писал(а):Я использовал SetFileName:

цикл
{
frm.SetFileName
frm.Write
frm.ShowFile
}
это RTF
Время ведет!
Ответить