Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];

Вниз

Знает ли кто-нибудь размер формата А4 в пикселах   Найти похожие ветки 

 
Галинка ©   (2004-11-29 07:12) [0]

Доброго всем времени суток!

Если кто-нибудь знает точный размер А4 в пикселях, или как его опрделить помогите моему горю. Трабла в основном в распечатке, никак не могу попасть в размер листа.
Пока код такой:

procedure TMainForm.RezImagePrint1Execute(Sender: TObject);
begin
if PrintDialog1.Execute then
 with Printer do
  begin
    Orientation := poLandscape;
    BeginDoc;
    Canvas.StretchDraw(Rect(96,96,PageWidth-96,
                                 PageHeight-96),
                       Child.Image1.Picture.Bitmap);
    EndDoc;
  end;
end;

Размер листа определяю как размер в дюймах помноженный на разрешение формы PixelsPerInch.


 
ЮЮ ©   (2004-11-29 07:25) [1]

а причем здесь разрешение формы PixelsPerInch? У канваса Printer-а свой PixelsPerInch


 
Галинка ©   (2004-11-29 08:34) [2]

А вот и дудки нет у канваса Printer-а своего PixelsPerInch


 
KSergey ©   (2004-11-29 09:16) [3]

> Галинка ©   (29.11.04 07:12)
> Если кто-нибудь знает точный размер А4 в пикселях,

Размер страницы (вернее размер запечатаеваемой области) определяется так (в установленный текущих логических единицах, это более верный термин для принтера, нежели пиксел):

Printer.PageWidth
Printer.PageHeight


 
KSergey ©   (2004-11-29 09:22) [4]

> [2] Галинка ©   (29.11.04 08:34)
> А вот и дудки нет у канваса Printer-а своего PixelsPerInch

Аналог PixelsPerInch:

запечатываемая область
GetDeviceCaps(Printer.Handle, LOGPIXELSX) - по горизонтали
GetDeviceCaps(Printer.Handle, LOGPIXELSY) - по вертикали

печать картинки советую сделать как тут (вместо StretchDraw, говорят не всегда корректно работает):
http://doc.trecom.tomsk.su/Delphi/UnofficialDevelopersFAQ/pages/printer.htm#printer3


 
Пыч ©   (2004-11-29 10:15) [5]

Чтобы узнать размер формата А4 в пикселах необходимо знать размер пикеля :)


 
DVM ©   (2004-11-29 10:49) [6]

а мне мой рост (182) в пикселах подскажите!


 
Anatoly Podgoretsky ©   (2004-11-29 10:52) [7]

Пыч ©   (29.11.04 10:15) [5]
Размер пикселя стремится к нулю.



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

Форум: "Основная";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.57 MB
Время: 0.056 c
6-1092257951
Piter
2004-08-12 00:59
2004.12.12
Посоветуйте с выбором компонента для работы с TCP


4-1099071933
cerber1
2004-10-29 21:45
2004.12.12
Работает ли мышь? Как поределить програмно?


14-1100344529
VID
2004-11-13 14:15
2004.12.12
Как сделать так...


14-1101115638
dDan
2004-11-22 12:27
2004.12.12
IRC клиент


1-1101417695
АП
2004-11-26 00:21
2004.12.12
DirectoryExists





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский