Welcome Guest! To enable all features, please Login or Register.

Notification

Icon
Error

Options
View
Last Go to last post Unread Go to first unread post
#1 Posted : Wednesday, June 20, 2007 1:25:04 AM(UTC)

lizio  
lizio

Groups: Registered
Posts: 3


hi,
i'm using LeadTools 13 (document) for Delphi6.
I've seen the Examples of LeadAnnotation, using AnnToolbar for highliting rectangles on a tiff Image.
Now, i need to do the same with Delphi code, using X, Y, Width and Height.
How should I do?
Thanks.
Andrea.
 

Try the latest version of LEADTOOLS for free for 60 days by downloading the evaluation: https://www.leadtools.com/downloads

Wanna join the discussion? Login to your LEADTOOLS Support accountor Register a new forum account.

#2 Posted : Wednesday, June 20, 2007 5:59:04 AM(UTC)

GregR  
GregR

Groups: Registered, Tech Support, Administrators
Posts: 764


Could you clarify exactly what you're wanting to do?  Are you saying that you've already been able to implement annotations with our Automation and the mouse-driven paradigm and now all you want to do is add them completely programmatically?

I'll gladly give a sample or point you in the right direction, I'm just not completely sure what your goals are.
 
#3 Posted : Wednesday, June 20, 2007 6:04:17 AM(UTC)

lizio  
lizio

Groups: Registered
Posts: 3


Hi,
I need to highlight a rectangle on an Tiff Image, using
LeadAnnotation, and I need to do it only with delphi code, no mouse or user interaction.
And i don't know how to do it..
 
#4 Posted : Wednesday, June 20, 2007 6:19:55 AM(UTC)

GregR  
GregR

Groups: Registered, Tech Support, Administrators
Posts: 764


You will need to first create the Annotation object with the AnnCreate function, then use the handle returned and modify the necessary properties.  Here's the basic idea:

var
x0, y0 : integer;
hHiliteObject L_HANDLE;
.
.
.
hHiliteObject:= LEADAnn1.AnnCreate (ANNOBJECT_HILITE, True, True);
LEADAnn1.AnnRectTop [hHiliteObject]:= 50;
LEADAnn1.AnnRectLeft [hHiliteObject]:= 50;
LEADAnn1.AnnRectWidth [hHiliteObject]:= 150;
LEADAnn1.AnnRectHeight [hHiliteObject]:= 100;

I would also read the documentation on these functions as well as the article "Implementing Annotations" so you can see all of the other functions you can use to manipulate Annotations programmatically.
 
#5 Posted : Wednesday, June 20, 2007 7:29:08 AM(UTC)

lizio  
lizio

Groups: Registered
Posts: 3


ok, now it works...
thank you very much.
Andrea.
 
You cannot post new topics in this forum.
You cannot reply to topics in this forum.
You cannot delete your posts in this forum.
You cannot edit your posts in this forum.
You cannot create polls in this forum.
You cannot vote in polls in this forum.

Powered by YAF.NET | YAF.NET © 2003-2020, Yet Another Forum.NET
This page was generated in 0.046 seconds.