VoyForums

[ Login ] [ Contact Forum Admin ] [ Main index ] [ Post a new message ] [ Search | Check update time | Archives: 1, [2], 3, 4, 5, 6, 7, 8, 9, 10 ]

[ Next Thread | Previous Thread | Next Message | Previous Message ]

Date Posted: 18:01:52 03/08/04 Mon
Author: Michel
Subject: Re: Rotating annotations
In reply to: Norrit 's message, "Rotating annotations" on 05:08:04 03/08/04 Mon


Hi,

Annotations are really not part of the images, so rotating the image does not rotate the annotations. Annotations should be added once the image is in the proper orientation. Another option is to burn the annotations, then they will rotate, but you will no longer be able to change them.

Best regards,

Michel



>Hi ...
>
>Problem: Image rotates but the annotations (wang and
>envision) don't .
>I use the following code:
>
>procedure TForm1.Rotate(Value: Integer);
>var
> objDibGraphic : TDibGraphic;
> objRotate : TRotateTransform;
>begin
> objRotate := TRotateTransform.Create;
> objDibGraphic := TDibGraphic.Create;
> try
> objDibGraphic.Assign(ImageScrollBox1.Graphic);
>
> objRotate.Angle := Value mod 360;
> objRotate.ApplyOnDest(objDibGraphic,
>ImageScrollBox1.Graphic);
> finally
> FreeAndNil(objDibGraphic);
> FreeAndNil(objRotate);
> end;
> ImageScrollBox1.Redraw(True);
>end;
>
>Any solutions for this problem ???
>
>MvG
>Peter

[ Next Thread | Previous Thread | Next Message | Previous Message ]

Replies:

[ Contact Forum Admin ]

Forum timezone: GMT-5
VF Version: 3.00b, ConfDB:
Before posting please read our privacy policy.
VoyForums(tm) is a Free Service from Voyager Info-Systems.
Copyright © 1998-2019 Voyager Info-Systems. All Rights Reserved.