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

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
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
 miSelectZoom rectangle data		  New Topic  Reply to Topic
Author Previous Topic Topic Next Topic  

spetric

Croatia
308 Posts
Posted - Jan 30 2015 :  16:35:31  Show Profile  Reply
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

klausdoege

Germany
389 Posts
Posted - Jan 31 2015 :  03:04:17  Show Profile  Reply
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
Go to Top of Page

spetric

Croatia
308 Posts
Posted - Jan 31 2015 :  14:23:30  Show Profile  Reply
Yup, it works!

Thanks a lot Klaus.
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
Jump To: