Print Timage in a position

bikerator

Hi,

I have a project that need print a Timage. But I need to print in a diferent position each time.

For exemple, first time i need to print at 2cm from top and 2 from left, the second time i need to print at 5cm from top and 6 from left, ...

Ups, and is very important to pass the place in cm.

Thanks.

technisoft

bikerator wrote: »

Hi,

I have a project that need print a Timage. But I need to print in a diferent position each time.

For exemple, first time i need to print at 2cm from top and 2 from left, the second time i need to print at 5cm from top and 6 from left, ...

Ups, and is very important to pass the place in cm.

Thanks.

This code sizes an image to IVM_TARGETWIDTH (stored in database in cm) and then adjusts the height to maintain the aspect ratio.
Image width and aspect ratio are determined when the image is stored.

ratio := <ppxImage."IVM_RATIO">;
Picture1.Width := fr01cm * <ppxImage."IVM_TARGETWIDTH">;
Picture1.Height := Picture1.Width / ratio;

You should be able to adapt the code to manage positions.

gordk

also read the user manual on using the engine object.
You can write code in the obp event to set the curx and cury values,