Ошибка при печати

Комментарии

• Evgeniy

  July 2004 отредактировано 15:24

  Было у меня такое. Это в программе у тебя что-то неправильно. Код покажи.
• Edward

  July 2004 отредактировано July 2004

  Да ничего особенного, вроде, в моем коду нет. (хотя чем черт не шутит)
  
  procedure TTovar.SpeedButton2Click(Sender: TObject);
  begin
  frReport1.LoadFromFile(path+'\trade_report1.frf');
  frReport1.ShowReport
  end;
  
  Открывается то он нормально, а вот на печать как-то через раз стал уходить.
• Evgeniy

  July 2004 отредактировано 15:24

  Что значит "печатает через раз"?
  
  1. Отчет нормально формируется, появляется окно предварительного просмотра, но при нажатии кнопки "Печать" на принтер ничего не улетает?
  2. Или же окно предварительного просмотра появляется не всегда?
  
  В первом случае виновата система - или принтер криво установлен, или провод нерабочий, или ещё чего. А во втором случае попробуй замени оператор загрузки шаблона вот на такой:
  
  frReport1.LoadFromFile('trade_report1.frf');
  
  а сам файл trade_report1.frf помести в каталог, в котором лежит EXE-шник твоей программы. В этом случае отчет загружается всегда без проблем.
• Vano

  July 2004 отредактировано 15:24

  2 Evgeniy:
  

  написал:

  frReport1.LoadFromFile('trade_report1.frf');
  
  а сам файл trade_report1.frf помести в каталог, в котором лежит EXE-шник твоей программы. В этом случае отчет загружается всегда без проблем.

  
  За такие советы я бы сразу руки отрывал, чтобы они (руки эти) в форум больше ничего не писали и такой бред не советовали ...
  
  Если во время работы ехе-ника сменится текущий каталог, то отчёты будут загружаться с проблемами, а точнее они вообще не будут загружаться !!!
  
  2 Edward:
  
  Рекомендую писать так:
  

  begin
   if frReport1.LoadFromFile(path+'\trade_report1.frf') then
    frReport1.ShowReport
   else
    MessageDlg('Невозможно открыть файл '+path+'\trade_report1.frf',mtError,[mbOk],0);
  end;
  

  
  Если у тебя переменная PATH смотрит хрен знает куда, либо такого файла нет, либо нет доступа к этому файлу, то ты как минимум получишь об этом сообщение ...
• Evgeniy

  July 2004 отредактировано 15:24

  Vano написал:

  Если во время работы ехе-ника сменится текущий каталог, то отчёты будут загружаться с проблемами, а точнее они вообще не будут загружаться !!!

  (Посыпая голову пеплом)
  
  О! Точно. Спасибо за поправку. Вообще-то я именно этого и добивался, хотел выяснить, не указывает ли переменная path куда-то не туда.
  
  Но для отладочных целей мой вариант попрощще будет
• Vano

  July 2004 отредактировано 15:24

  2 Evgeniy:
  

  написал:

  Но для отладочных целей мой вариант попрощще будет

  
  А написать полный путь до файла - это конечно НУ ОЧЕНЬ СЛОЖНЫЙ вариант )
  

  frReport1.LoadFromFile('C:\trade_report1.frf');
  
• Evgeniy

  July 2004 отредактировано 15:24

  Да, тоже неплохо.
  
  Кодекс Программиста: "1. Настоящий программист должен быть ленивым"