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
 Extended cursor

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
graphman Posted - May 14 2014 : 09:32:54
Is there a way to show cursor like in the attached image?
6   L A T E S T    R E P L I E S    (Newest First)
graphman Posted - May 16 2014 : 02:19:53
OK
xequte Posted - May 16 2014 : 01:42:10
You would need to invalidate the ImageEnView to repaint it (or at least repaint the portion that previously had a a line drawn).

But spetric may be right, it might be better to use external controls to handle it so that you do not get excessive redraw.


Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
spetric Posted - May 15 2014 : 15:17:35
I think it's more convenient to use two perpendicular iekLine objects
and move them in OnMouseMove event.
graphman Posted - May 15 2014 : 12:49:18
But I see these lines at starting of program only.
Nothing happen at mouse moving.



void __fastcall TForm9::ImageEnView1DrawCanvas(TObject *Sender, TCanvas *ACanvas,
TRect &ARect)
{
TPoint pt = ImageEnView1->ScreenToClient(Mouse->CursorPos);

ACanvas->Pen->Style = psDot;

ACanvas->MoveTo(0, pt.y);
ACanvas->LineTo(ImageEnView1->Width, pt.y);

ACanvas->MoveTo(pt.x, 0);
ACanvas->LineTo(pt.x, ImageEnView1->Height);
}
//---------------------------------------------------------------------------
graphman Posted - May 15 2014 : 01:10:34
Thanks
xequte Posted - May 14 2014 : 13:44:24
Hi

Yes, you could do it quite easily by overriding the TImageEnView draw event:

http://www.imageen.com/help/TIEOnDrawCanvas.html

Get the cursor position...
pt := ImageEnView1.ScreenToClient( Mouse.CursorPos );

And then fire off two canvas.LineTo calls with the relevant pen.style

Nigel
Xequte Software
www.xequte.com
nigel@xequte.com