Printing a image - TFPMemoryImage images  - Not BitMap
lazarus / 39-Graphics

----------------------------------------------------------------------
nicolas_lazarus · 2010-09-03 13:17

Hi all !

I'm working in web application, so I have to use FPImage to get some
jpg pictures.

The problem is that i am working with TFPMemoryImage and i need to
send a Bitmap to the printer.



Code: [Select]
  begin
    Printer.BeginDoc;
    Printer.Title:=job_name;
    Printer.Canvas.StretchDraw(Rect(0, 0, Printer.PageWidth,
Printer.PageHeight),imageToPrint);
    Printer.EndDoc;
  end;


I cannot use imageToPrint like TFPMemoryImage,  because the
Printer.Canvas.StrechDraw expect a graphic component.

So, what can I do ?

Thanks in advance.
Nico.

----------------------------------------------------------------------
felipemdc · 2010-09-03 21:03

How do you have a printer object without the LCL and the
Printers4Lazarus package?

----------------------------------------------------------------------
nicolas_lazarus · 2010-09-09 18:44

Hi !

We are using printer with LCL and the Printers4Lazarus .

What sholud we use ?

Regards,

----------------------------------------------------------------------
mas steindorff · 2010-09-10 00:49

did you try
var imageToPrint: TBitmap;

imageToPrint :=TFPMemoryImage.Create (100,100); or some thing like
this

http://wiki.freepascal.org/fcl-image

shows the a TFPCustomImage can be init with a TFPMemoryImage.create()
and a TBitmap is derived from some common classes 

http://lazarus-ccr.sourceforge.net/docs/lcl/graphics/tbitmap.html

Inheritance
TBitmap
  
 TBitmap is the data of an image, and can be loaded from a file,
stream or resource in .bmp or .xpm format

|
TFPImageBitmap
  
 A class of Bitmap using the FPImage reader and writer (ie customised
for FreePascal)

|
TCustomBitmap
  
 TCustomBitMap - the base class for TBitmap