Printer.handle

[Lothar]

Hello!

As I have seen in the tprinter description (and as the compiler says when trying to compile), the handle property does not exist. I try to port a delphi application and get problems with the following tasks:

1. Using the "PASSTHROUGH"-mode (this is old, I know):
    (Test to see if the "PASSTHROUGH" escape is supported
     Escape(Printer.Handle,QUERYESCSUPPORT,...
     
     Escape(Printer.Handle,PASSTHROUGH,...

2. Using SetTextAlign:
    SetTextAlign(printer.handle,TA_RIGHT...

3. Using GetDeviceCaps:
    dpi_x:=getDeviceCaps(printer.handle,logpixelsx)
    (Is this done with XDPI,YDPI?)

But especially:
4.  SetMapmode(printer.handle,...

which I need in any case.

Thanks for help
Lothar

[antonio]

var Buffer :pchar;
SendMessage(Handle, EM_REPLACESEL, 0, LongInt(Buffer));

Compiler said this conversion pointer-longint is not portable. Should it be portable some day?
What way should we take in these cases? To wait until these items could be ported or take the way of work around them as a determinate solution?

[Vincent Snijders]

In this case:
SendMessage(Handle, EM_REPLACESEL, 0, LParam(Buffer));

Generally:
SendMessage(Handle, EM_REPLACESEL, 0, PtrInt(Buffer));

[Lothar]

Sorry, but I don't understand what this has to do with my questions.

[Vincent Snijders]

Sorry, but I don't understand what this has to do with my questions.

I think, nothing.

But I still wanted to answer the other message.

[antonio]

Sorry, but I don't understand what this has to do with my questions.

I added my questions to yours because of the similar portability issue.

Thanks, Vincent.

[lfrodrigues]

Hello,

in Windows you can include OSPrinters and do TWinPrinter(Printer).Handle in Linux I don't know any way of doing that.

[antonio]

Probably the Printers4Lazarus package is cross-platform.