hmm. I guess you've uncovered a bug in the VCL.
Thanks for the forewarning.
Okay, this is what I was thinking of. Maybe this could
be a workaround? You could assign a custom dragcursor
to the control. This is from delphi help:
TControl.DragCursor
Indicates the image used to represent the mouse
pointer when the control is being dragged.
property DragCursor: TCursor;
Description
Use the DragCursor property to change the cursor image
presented when the control is being dragged.
Note: To learn how to make a custom cursor available
for the DragCursor property, see the Cursor property.
__________________________________________________
Here's the help from that last sentence:
TControl.Cursor
TControl See also Example
------------------------------------------------
Specifies the image used to represent the mouse
pointer when it passes into the region covered by the
control.
property Cursor: TCursor;
Description
Change the value of Cursor to provide feedback to the
user when the mouse pointer enters the control. The
value of Cursor is the index of the cursor in the list
of cursors maintained by the global variable, Screen.
In addition to the built-in cursors provided by
TScreen, applications can add custom cursors to the
list.
Example:
This example shows how to add custom cursors to an
application. It assumes that a custom cursor with the
name NewCursor has been added to the resources (.RES
file) of the application. You can add the cursor using
the image editor. (Tools | Image Editor)
The following code makes this cursor available to the
application via the constant crMyCursor, and sets it
as the global cursor to the application.
const
crMyCursor = 5;
procedure TForm1.FormCreate(Sender: TObject);
begin
Screen.Cursors[crMyCursor] := LoadCursor(HInstance,
'NewCursor');
Cursor := crMyCursor;
end;
Hope this helps!
DJS
--- Dave Sellers <[EMAIL PROTECTED]> wrote:
>
>
> David Smith wrote:
>
> >Can't you assign a custom drag object in the object
> >inspector for the component? Just do it at design
> time
> >or formShow.
> >
> >
> >
> Hi David
>
> Not as far as I can see (D7) - mind you it has been
> a looooong day!
>
> The DragObject is a var parameter of the StartDrag
> event handler - it's
> not a property of the grid object that's within
> scope to me or the
> object inspector.
>
> Dave
>
>
__________________________________
Yahoo! Mail - PC Magazine Editors' Choice 2005
http://mail.yahoo.com
------------------------ Yahoo! Groups Sponsor --------------------~-->
Get Bzzzy! (real tools to help you find a job). Welcome to the Sweet Life.
http://us.click.yahoo.com/A77XvD/vlQLAA/TtwFAA/i7folB/TM
--------------------------------------------------------------------~->
-----------------------------------------------------
Home page: http://groups.yahoo.com/group/delphi-en/
To unsubscribe: [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/delphi-en/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
