Вниз
Скачать: CL | DM;

Размеры страницы принтера   Найти похожие ветки 

← →
z0ne   (2004-11-17 13:32) [0]

Как получить размер полей бумаги ???
сейчас делаю так:

   W.Offset:=GetDeviceCaps(PDC,PHYSICALOFFSETX);
   W.Visible:=GetDeviceCaps(PDC,HORZRES);
   W.VisibleMM:=GetDeviceCaps(PDC,HORZSIZE);
   W.Full:=GetDeviceCaps(PDC,PHYSICALWIDTH);

и потом

   k:=W.Visible/W.VisibleMM; // pt in 1 mm
   W.FullMM:=Round(A.Full/k);
   W.OffsetMM:=Round(W.Offset/k);

при печати опираюсь на Visible и Offset....
в итоге всё вроде бы правильно, НО на некоторых принтерах происходит подрезка ПРАВОГО края.
какие ещё есть параметры для получания характеристик полей ???


← →
wicked ©   (2004-11-17 19:53) [1]

см. PageSetupDlg....


← →
z0ne   (2004-11-18 12:47) [2]

2 wicked:
И чего ???
мне надо получить значения, а не настроить...

может я конечно не правильно чего-нибудь прочитал ....
а есть ли не диалоговые вызовы для получения полей ???


← →
wicked ©   (2004-11-18 13:16) [3]

там флажок такой есть - PSD_RETURNDEFAULT... советую почитать...
кстати, у меня есть компонент такой, не помню, откуда нарыл... с моими доработками прекрасно работает и выдает то, что нужно... в него и смотреть можно, как это всё работает....


← →
z0ne   (2004-11-22 11:26) [4]

Дяденька! Дай посмотреть компонент та


← →
Суслик ©   (2004-11-22 11:48) [5]


>  k:=W.Visible/W.VisibleMM; // pt in 1 mm

зачем это?
Есть другие способы получения количества точек в мм:

DpiX := GetDeviceCaps(Printer.Handle, LOGPIXELSX); // колво точек в дюйме по горизонтали
DpiX / 25.380710659898477 // колво точек в мм по горизонтали


← →
Суслик ©   (2004-11-22 11:50) [6]

Правда, я не уверен, что в компьютерной графике количество мм в дюйме равно общепринятому.

Не уверен потому, что знаю, что 1 поинт <> 1/72 дюйма (если не ошибаюсь 72 поинта = 0.996 дюйма), хотя в компьютерной графике и полиграфии именно так и считается: 1 дюйм = 72 поинта.

Было бы интересно услышать комментации специалистов по этому вопросу.


← →
wicked ©   (2004-11-22 21:03) [7]

> z0ne [4]
адрес в анкете... если надо - пиши....


← →
z0ne   (2004-11-24 11:04) [8]

2 Суслик:
а нафига огород городить... я так тоже пробовал, но мой путь мне кажется прямее!

2 wicked:
уже пишу



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
1-1103826637
Пыч
2004-12-23 21:30
2005.01.09
Project>Resources


14-1103399463
Nous Mellon_
2004-12-18 22:51
2005.01.09
Страсти по МПх


1-1103615792
Igor_thief
2004-12-21 10:56
2005.01.09
IXMLNode


1-1103706352
Mishenka
2004-12-22 12:05
2005.01.09
Можно ли в ListBox сделать несколько Item ов не активными (типа E


9-1094180692
MonoLife
2004-09-03 07:04
2005.01.09
Игруху выставил




   Наверх