Re: Drag cursor -- Envision Support Forum

[ Show ]

Support VoyForums

[ Shrink ]

VoyForums Announcement: Programming and providing support for this service has been a labor of love since 1997. We are one of the few services online who values our users' privacy, and have never sold your information. We have even fought hard to defend your privacy in legal cases; however, we've done it with almost no financial support -- paying out of pocket to continue providing the service. Due to the issues imposed on us by advertisers, we also stopped hosting most ads on the forums many years ago. We hope you appreciate our efforts.

Show your support by donating any amount. (Note: We are still technically a for-profit company, so your contribution is not tax-deductible.) PayPal Acct: Feedback:

Donate to VoyForums (PayPal):

[ Login ] [ Contact Forum Admin ] [ Main index ] [ Post a new message ] [ Search | Check update time | Archives: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 ]

[ Next Thread | Previous Thread | Next Message | Previous Message ]

Date Posted: 15:37:52 08/25/05 Thu
Author: Brian Orme
Subject: Re: Drag cursor
In reply to: Michel 's message, "Re: Drag cursor" on 20:34:30 08/14/05 Sun

I had this problem some time ago with a conflict with the cursors and another component I was using in my application. I got round this by changing the constants in EnImgScr.pas implementation section and recompiling. As shown below.

implementation

{$R EnImgScr.R32}

uses
SysUtils, { for fmOpenRead }
ClipBrd, { for TClipBoard }
ExtDlgs, { for TOpenPictureDialog }
Dialogs, { for ofPathMustExist, ... }
EnMsg, { for msgXXXX }
EnTifGr, { for TTiffGraphic }
EnAnnota, { for TAnnotationMouseHandler }
EnRubber; { for TRubberBandMouseHandler }

const

crHandOpened = 5100;
crHandClosed = 5101;

Hope this may be of some use

Brian

[ Next Thread | Previous Thread | Next Message | Previous Message ]