ImageEn Forum

Profile Join Active Topics Forum FAQ

Forum membership is Free! Click Join to sign-up
Username:	Password:
Save Password
Forgot your Password?

All Forums

ImageEn Library for Delphi, C++ and .Net

ImageEn and IEvolution Support Forum

ANNOTATION

New Topic

Reply to Topic

Author

Topic

stevewagner

USA
5 Posts

Posted - Sep 18 2012 : 23:59:57

IN MY APPLICATION I NEED TO OPEN AN IMAGE FILE AND ADD ARROWS POINTING TO ELEMENTS IN THE PHOTO. THE ONLY DEMOS THAT IF FOUND THAT DEMONSTRATES THIS OFFERS NO EXAMPLE OF HOW TO MODIFY THE ARROW ITSELF, FOR EXAMPLE, THICKNESS AND COLOR OF LINE, TYPE OF ARROW HEAD AND COLOR, ETC. HOW CAN I CHANGE THE LOOK OF THE ARROW ITSELF? ANY DEMOS ON THIS?

THANK YOU

Steve Wagner
steve@instamation.com

w2m

USA
1990 Posts

Posted - Sep 19 2012 : 05:33:42

You can not change a lot but you can change some settings:

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  ImageEnVect1.ObjBrushColor[-1] := clRed;
  ImageEnVect1.ObjBrushStyle[-1] := bsSolid;
  ImageEnVect1.ObjBeginShape[-1] := iesOUTARROW;
  ImageEnVect1.ObjShapeWidth[-1] := 20;
  ImageEnVect1.ObjShapeHeight[-1] := 10;
  ImageEnVect1.MouseInteractVt := [miPutLine];
end;

The shape color is controlled by ObjBrushColor.
The paint style is controlled by ObjBrushStyle.
The dimensions of the arrow is set by ObjShapeWidth and ObjShapeHeight.

You can not change the type of the arrow.

William Miller
Adirondack Software & Graphics
Email: w2m@frontiernet.net
EBook: http://www.imageen.com/ebook/
Apprehend: http://www.frontiernet.net/~w2m/index.html

rswyman@docuxplorer.com

USA
156 Posts

Posted - Jul 29 2016 : 08:22:18

I following the topics example above and saved the image but when I reopened the arrow shape was missing. What caused this?

where using version 6.3

Thanks
Ron

rswyman@docuxplorer.com

USA
156 Posts

Posted - Jul 29 2016 : 08:36:34

I also tried adding an Ellipse, and this would not save also.

ImageEnVect1.ObjBrushColor[-1] := clRed;
ImageEnVect1.ObjPenWidth[-1] := 2;
ImageEnVect1.ObjName[-1] := 'miPutEllipse';
ImageEnVect1.MouseInteractVt := [miPutEllipse];

Thanks
Ron

w2m

USA
1990 Posts

Posted - Jul 29 2016 : 09:00:38

I can not duplicate your problems with the vectorial demo. I added a line with an arrowhead, a box and an ellipse and saved the objects to an iev file. When I open the iev file all three objects are loaded including the arrowhead.

If you do this with the vectorial demo do you get the same result? If you do not have problems with the vectorial demo, then obviously something is wrong with your project.

Bill Miller
Adirondack Software & Graphics
Email: w2m@hughes.net
EBook: http://www.imageen.com/ebook/
Custom Commercial ImageEn Development

rswyman@docuxplorer.com

USA
156 Posts

Posted - Jul 29 2016 : 09:20:02

Hi Bill,

Thanks for the reply... The demo I'm using is the Annotations demo where it saves it to the file e.g. tiff. After reviewing the help the CopyFromTImageEnVect and CopyToTImageEnVect functions support a limited number of shapes to be saved and limited features of the shapes.

I'm I correct about this? If not now could you enlighten me?

Thanks
Ron

w2m

USA
1990 Posts

Posted - Jul 29 2016 : 09:23:19

TIEImagingAnnot supports only a subset of TImageEnVect objects. For full TImageEnVect support use TIEImageEnAnnot instead (intanced in ImageEnAnnot property).

Bill Miller
Adirondack Software & Graphics
Email: w2m@hughes.net
EBook: http://www.imageen.com/ebook/
Custom Commercial ImageEn Development

rswyman@docuxplorer.com

USA
156 Posts

Posted - Jul 29 2016 : 10:29:26

That works much better, thanks!

Topic

New Topic

Reply to Topic