Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.10.2008, 20:05   #1
Максим_Леонидович
Пользователь
 
Регистрация: 22.07.2008
Сообщений: 49
По умолчанию поему не работает?

Помогите найти ошибку.
Пытаюсь через RaveReport вывести отчет на печать. пользовался инсрукциями, но почему то получаю пустую страничку, а на печать ничего не выводится
Код:
procedure TForm3.Button1Click(Sender: TObject);
begin
//запрос информации для отчета
  DatMod.ADOQ_Mod.Active:=false;
  DatMod.ADOQ_Mod.SQL.Clear;
  DatMod.ADOQ_Mod.SQL.Add('SELECT *');
  DatMod.ADOQ_Mod.SQL.Add('FROM pasport_data');
  DatMod.ADOQ_Mod.SQL.Add('WHERE ID_pacient = '+Label_ID.Caption+';');
  DatMod.ADOQ_Mod.Active:=true;
//попытка вывести результат отчета в мемо
F_RepStattalon.Visible:=true;
F_RepStattalon.RvProject1.Open;
F_RepStattalon.RvProject1.SelectReport('Report3',TRUE);
F_RepStattalon.RvProject1.ReportDescToMemo(F_RepStattalon.Memo1);
//отправка отчета на принтер
F_RepStattalon.RvNDRWriter1.Execute;
F_RepStattalon.Visible:=true;
F_RepStattalon.RvRenderPrinter1.Render(F_RepStattalon.RvNDRWriter1.FileName);

end;
помогите кто пожет!!!!!!!!!

Последний раз редактировалось Максим_Леонидович; 02.10.2008 в 20:18.
Максим_Леонидович вне форума Ответить с цитированием
Старый 09.10.2008, 19:37   #2
Максим_Леонидович
Пользователь
 
Регистрация: 22.07.2008
Сообщений: 49
По умолчанию

Спасибо всем, догадался сам.
Максим_Леонидович вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Запускается но не работает Reds Работа с сетью в Delphi 1 29.09.2008 23:16
Не работает автозаполнение Yuran Работа с сетью в Delphi 7 24.05.2008 13:16
не работает Делфя Алёна Софт 6 01.03.2008 23:07
не работает! RECREATOR Общие вопросы Delphi 6 29.11.2007 12:42
Не работает try except!!! Radost БД в Delphi 17 03.06.2007 11:07