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

Использование KOLPrinters   Найти похожие ветки 

 
<Falcon>   (2005-01-26 12:12) [0]

Как можно с помощью KOLPrinters (не используя диалог PageSetup) менять ориентацию страницы? Строка:

Printer.Orientation := poLandscape;

эфекта не возымела. Не охота писать через API...

D7, WinXP, Kol2.05


 
<Falcon>   (2005-01-27 11:52) [1]

При просмотре этого свойства во время отладки (Printer.Orientation) Делфя выдает:
function to by called TPrinter.GetOrientation was eliminated by linker


 
Boguslaw   (2005-01-28 01:47) [2]

From KOLPrinters help:

type TPageSetupOptions = Set of TPageSetupOption;
Options:

psdMargins : allow user to select margins
psdOrientation : allow user to select page orientation
psdSamplePage : draw contents of the sample page
psdPaperControl : allow paper size control
psdPrinterControl : allow user to select printer
psdHundredthsOfMillimeters : set scale to hundredths of millimeters for margins and paper size,on return indicate selected scale
psdThousandthsOfInches : set scale to thousandths of inches for margins and paper size,on return indicate selected scale
psdUseMargins,psdUseMinMargins : use suggested margins
psdWarning : generate warning when there is no default printer
psdHelp : add help button to dialog, application must process HELPMSGSTRING message
psdReturnDC : returns DC of selected printer if required

function NewPageSetupDialog( AOwner: PControl; Options: TPageSetupOptions ): PPageSetupDlg;
Global function for page setup dialog

Did You add psdPaperControl into TPageSetupOptions ?


 
<Falcon>   (2005-01-28 16:50) [3]


> Как можно с помощью KOLPrinters (не используя диалог PageSetup).....


 
thaddy   (2005-01-28 19:11) [4]

You can fill the *structure* programmatically, is what Boguslav means. i.e. without calling the dialog itself


 
Boguslaw   (2005-01-29 19:18) [5]

Sorry,

I misunderstand what did You mean.
I don"t know what You are trying to do (one line is not enought ;-) , but
after

Printer.Orientation := poLandscape;

use eigther Printer.GetHandle or use Printer.Canvas . This cause  printer DC rebuild (device context) with modified orientation.


 
Boguslaw   (2005-01-29 19:21) [6]

Use Canvas or Handle property of TPrinter, even when not using it - just

somehandle := Printer.Handle;

Test if TPrinter.RE_Print(RichEdit : PControl) is working ,please ?


 
<Falcon>   (2005-01-31 14:10) [7]

Спасибо, теперь понял в чем была ошибка.



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

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



Память: 0.46 MB
Время: 0.027 c
14-1124430978
syte_ser78
2005-08-19 09:56
2005.09.18
Харьковчане, ау!!!


1-1124700897
SpyBoy
2005-08-22 12:54
2005.09.18
размер каталога вместе с содержимым


2-1123700068
Vir
2005-08-10 22:54
2005.09.18
Hint


2-1123752758
Русланка
2005-08-11 13:32
2005.09.18
Как преобразовать число потери нулей впереди


14-1124442990
Vlad Oshin
2005-08-19 13:16
2005.09.18
В свете последних МР, PM пятницы и лампочки на потолке.




   Наверх