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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 02.06.2009, 13:26   #1
фЁдОр
Форумчанин
 
Аватар для фЁдОр
 
Регистрация: 06.09.2007
Сообщений: 908
По умолчанию проблема с печатью. непонятная ошибка.

Приветствую!
появилась такая проблема-в программе указывается диапазон печати документов, если указывается небольшой диапазон(примерно до 50 листов), то печать идет нормально, но если диапазон около 200 листов то на принтере вылазиет шибка: 49 err 4750b1e turn off then on. принтер HP 2055.
код, которым я печатаю:
Код:
procedure TForm1.BitBtn2Click(Sender: TObject);
var
 i, j, nomer: integer;
begin
 j:=StrToInt(Edit2.Text);
 nomer:=StrToInt(Edit1.Text);
 ReportQ.QRLabel67.Caption:=DateToStr(form1.DateTimePicker1.Date);
 ReportQ.QRLabel66.Caption:=DateToStr(form1.DateTimePicker1.Date);
 ReportQ.QRLabel65.Caption:=Edit3.Text;

 ReportQ.QRLabel68.Caption:=DateToStr(form1.DateTimePicker1.Date+StrToInt(Edit3.Text));
 
 //if PrintDialog1.Execute then
 //begin

 //диапазон указывается с Edit1 по Edit2
  for i:=StrToInt(Edit1.Text) to j do
  begin
   ReportQ.QRLabel69.Caption:=IntToStr(nomer);
   ReportQ.QRLabel70.Caption:=IntToStr(nomer);
   nomer:=nomer+1;
   ReportQ.QuickRep1.Print;
   sleep(2000);//это я уже пробовал и задержку ставить, но ничего не изменилось
  end;
 //end;
end;
так же странно, в перечне ошибок на принтер hp не указана эта ошибка

Последний раз редактировалось фЁдОр; 02.06.2009 в 13:28.
фЁдОр вне форума Ответить с цитированием
Старый 02.06.2009, 13:29   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Я обычно в таких случаях печатаю в файл или в виртуальный принтер (Я лично PDFFactory пользую), а уж потом стандартными средствами посылаю на принтер дабы убедиться что глючит моя прога или в целом система...
Если печать таким образом проходит то ясеня пень что прогу нжно дорабатывать.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 02.06.2009, 15:48   #3
фЁдОр
Форумчанин
 
Аватар для фЁдОр
 
Регистрация: 06.09.2007
Сообщений: 908
По умолчанию

спасибо Виталь. сейчас потестил на другом принтере. все нормально. видимо все же тот не спровляется с таким объемом данных.
фЁдОр вне форума Ответить с цитированием
Старый 02.06.2009, 17:06   #4
soleil@mmc
SQL-коддинг
Участник клуба
 
Регистрация: 16.01.2009
Сообщений: 1,192
По умолчанию

может винде на тот принтер дровишки новые подсунуть (если таковые есть)?!
soleil@mmc вне форума Ответить с цитированием
Старый 03.06.2009, 09:31   #5
фЁдОр
Форумчанин
 
Аватар для фЁдОр
 
Регистрация: 06.09.2007
Сообщений: 908
По умолчанию

Цитата:
Сообщение от soleil@mmc Посмотреть сообщение
может винде на тот принтер дровишки новые подсунуть (если таковые есть)?!
soleil@mmc, насколько я понял, модель новая у HP, поэтому думаю врят ли будут новые дрова, тут наверно просто памяти не хватает у принтера.
фЁдОр вне форума Ответить с цитированием
Старый 03.06.2009, 11:11   #6
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
фЁдОр
А этот принтер? В принципе печатает из других прог? Или тоже лажает?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 03.06.2009, 12:18   #7
фЁдОр
Форумчанин
 
Аватар для фЁдОр
 
Регистрация: 06.09.2007
Сообщений: 908
По умолчанию

нет, он печает с других прог, но большой объем тока с той программы.
фЁдОр вне форума Ответить с цитированием
Старый 03.06.2009, 12:28   #8
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
но большой объем тока с той программы.
Пробуй тогда посылать из своей проги по частям.
Чет слабо я верю что в обьеме дело...
Или можно эти части в разные задания раскидать.
Скажем три запроса, в цикле посылай результат запроса, и тот же запрос, но для следующих записей.

Но вообще я бы всетки еще раз прогу перешерстил...
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 03.06.2009, 13:35   #9
фЁдОр
Форумчанин
 
Аватар для фЁдОр
 
Регистрация: 06.09.2007
Сообщений: 908
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Чет слабо я верю что в обьеме дело...
ну я же не выдумываю...
Цитата:
Пробуй тогда посылать из своей проги по частям
чета пока не имею представления. можно прокоментировать
фЁдОр вне форума Ответить с цитированием
Старый 03.06.2009, 15:26   #10
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
можно прокоментировать
Ну вот смотри: Допустим есть БД в которой счетчик ID
тогда первая порция скажем до 20 записи (всего допустим их 100)
Код:
SELECT * from... where id<=20
Получили набор, его печатаем.
Следующий цикл
Код:
SELECT * from... where (id>20)and(id<=40)
Печатаем... и т.д.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Непонятная ошибка. program123 Общие вопросы Delphi 12 12.04.2009 23:07
БД Магазин... Непонятная ошибка... Arkuz БД в Delphi 7 01.12.2008 22:19
Непонятная ошибка Juri Помощь студентам 6 07.11.2008 19:28
Непонятная ошибка RealSHELS Общие вопросы Delphi 16 24.10.2008 20:49
Непонятная ошибка Slash Общие вопросы Delphi 6 19.06.2007 14:45