ImageEn for Delphi and C++ Builder ImageEn for Delphi and C++ Builder

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
 All Forums
 ImageEn Library for Delphi, C++ and .Net
 ImageEn and IEvolution Support Forum
 miSelectZoom rectangle data

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

View 
UserName:
Password:
Format  Bold Italicized Underline  Align Left Centered Align Right  Horizontal Rule  Insert Hyperlink   Browse for an image to attach to your post Browse for a zip to attach to your post Insert Code  Insert Quote Insert List
   
Message 

 

Emoji
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Black Eye [B)]
Frown [:(] Shocked [:0] Angry [:(!] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
Check here to subscribe to this topic.
   

T O P I C    R E V I E W
spetric Posted - Jan 30 2015 : 16:35:31
Hi,

How can I determine points of rectangle selection when miSelectZoom MouseInteract is on?

I've tried with SelX1, SelX2, SelY1, SelY2 both in OnViewChange and OnViewChanging but without success.

Should I use OnMouseUp event in combination with standard rectangle selection (and then call ZoomSelection method) or there is other way around?

TIA,
Siniša
2   L A T E S T    R E P L I E S    (Newest First)
spetric Posted - Jan 31 2015 : 14:23:30
Yup, it works!

Thanks a lot Klaus.
klausdoege Posted - Jan 31 2015 : 03:04:17
Hello,
try this:
procedure TForm.ImageEnVect1SelectionChanging(Sender: TObject);
begin
label1.Caption:='X1/Y1='+inttostr(ImageEnVect1.Selx1)+'/'+inttostr(ImageEnVect1.Sely1)+ ' - X2/Y2='+inttostr(ImageEnVect1.Selx2)+'/'+inttostr(ImageEnVect1.Sely2);
end;

Klaus
www.klausdoege.de