|
Вопрос # 6 268/ вопрос открыт / |
|
Приветствую, уважаемые эксперты!
Использую такие компоненты как TdrawObject 2.3. Всё вывожу напечать следующим кодом
То есть в метафайле хранится изображение автоматически создаваемое с помощью библиотеки ТDrawObject. при сохранении его в файл всё происходит ровно, рисунок как надо, то есть тот который создали. Но при печати на виртуальном принтере происходят странные вещи: я в данном коде делаю смещение и вывожу его на принтер. То есть одно изображение будет скажем на 24 листах А4. всё зависит от того как нанесёшь объекты. В некоторых случаях он сохраняет в xps файл правильно, а иногда сохраняет и сразу удаляет его. Народ может кто подскажет в чём проблема? как её решить?
Приложение: Переключить в обычный режим- Printer.Title := application.Title + ' document';
- Printer.Copies := PrintDialog1.Copies;
- begin
- try
- Printer.BeginDoc;
- destRec := Rect(0, 0,
- (fMf.Width div screen.PixelsPerInch* fPtrPPI.cx-100),
-
- for i:=0 to kx-2 do
- begin
- for j:=0 to ky-1 do
- begin
- printer.Canvas.StretchDraw(destrec,fmf);
- printer.NewPage;
- OffsetRect(destRec,
- 0,
-
- end;
- destRec := Rect(0, 0,
- (fMf.Width div screen.PixelsPerInch* fPtrPPI.cx-100),
- (fMf.Height div screen.PixelsPerInch* fPtrPPI.cy-100));
-
- -round((printer.PageWidth-200)*(i+1)),
- 0);
- end;
- finally
- Printer.EndDoc;
- end;
-
 |
Вопрос задал: Artemka2208 (статус: Посетитель)
Вопрос отправлен: 21 сентября 2012, 21:42
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Мини-форум пуст.
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
