Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Печать и предпросмотр в Rave 
:(
    Опции темы
PingWiN0x20
  Дата 20.7.2008, 01:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 21
Регистрация: 9.2.2008

Репутация: нет
Всего: нет
Всем привет!
Пару дней всего работаю с Rave... Появился вопросец....

Нужно распечатать отчет Rave.... Для этого я вызываю процедуру Execute проекта:

Код

RaveProject.Execute;


Появляется окно:

user posted image

И вот тут-то проблема! Заказчика это не устраивает. Требует, чтобы при нажатии на кнопку "Печать" отчет выводился на принтер сразу, без всяких окошек!
Подскажите, плиз, как можно распечатать отчет, чтобы это окошко не появлялось???  smile 

И как врубить предпросмотр страницы без всяких левых окошек?

Это сообщение отредактировал(а) PingWiN0x20 - 20.7.2008, 01:11
PM MAIL   Вверх
PingWiN0x20
Дата 21.7.2008, 14:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 21
Регистрация: 9.2.2008

Репутация: нет
Всего: нет
Разобрался.... Приведу пример с предпросмотром...

Код

procedure TReportMoney.DoPreviewClick(Sender: TObject);
var
   Project: TRvProject;
   NDR:     TRvNDRWriter;
   Preview: TRvRenderPreview;

const
  REPORT_TEMP_FILE = 'temp.rav';
  REPORT_FILE           = 'Report.rav';

begin

     if FileExists(REPORT_TEMP_FILE) then
        DeleteFile(REPORT_TEMP_FILE);

     NDR := TRvNDRWriter.Create(nil);
     NDR.FileName := REPORT_TEMP_FILE;

     Project := TRvProject.Create(nil);
     Project.ProjectFile := REPORT_FILE;
     Project.Engine := NDR;
     Project.Open;
     { ..... делаем что-то в отчете ..... }
     Project.Execute;
     Project.Close;

     Preview := TRvRenderPreview.Create(nil);
     Preview.ScrollBox := FormPreview.ScrollBox1;
     Preview.Render(REPORT_TEMP_FILE);
     FormPreview.ShowModal;

     Preview.Free;
     Project.Free;
     NDR.Free;

     DeleteFile(REPORT_TEMP_FILE);

end;


Обязательно уничтожайте все созданные объекты, иначе наткнетесь на ошибку - не удастся перезаписать временный файл.

Печать происходит аналогичным образом, только вместо TRvRenderPreview создается TRvRenderPrinter.

Удачи!

Это сообщение отредактировал(а) PingWiN0x20 - 21.7.2008, 14:12
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0838 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.