.
THIS.Visible = .F.
ENDPROC
PROCEDURE txt2.DragDrop
LPARAMETERS oSource, nXCoord, nYCoord
THIS.Value = oSource.Caption
ENDPROC
ENDDEFINE
Tracy
-Original Message-
From: Dave Crozier
Sent: Tuesday, June 20, 2006 2:59 AM
Subject: RE: Textbox Drag/Drop
Tracy,
Exactly
-Original Message-
From: Dave Crozier
Subject: Textbox Drag/Drop
To all,
I've had a mental block here and would like some feedback on the approach
you guys use when dragging textboxes when you have a doubleclick event
assigned to the very same textbox?
My problem is that once you set
] On Behalf
Of Tracy Pearson
Sent: 19 June 2006 16:11
To: profox@leafe.com
Subject: RE: Textbox Drag/Drop
-Original Message-
From: Dave Crozier
Subject: Textbox Drag/Drop
To all,
I've had a mental block here and would like some feedback on the approach
you guys use when dragging textboxes
Ah, wait.
MouseMove, if MDOWN() then start the drag at that point.
Tracy
-Original Message-
From: Dave Crozier
Subject: RE: Textbox Drag/Drop
Tracy,
That's what I've done but it is a real kludge as for this particular
application I have a comms program timer running in the background
Of Tracy Pearson
Sent: 19 June 2006 16:48
To: [EMAIL PROTECTED]
Subject: RE: Textbox Drag/Drop
Ah, wait.
MouseMove, if MDOWN() then start the drag at that point.
Tracy
___
Post Messages to: ProFox@leafe.com
Subscription Maintenance: http://leafe.com
: Textbox Drag/Drop
Ah, wait.
MouseMove, if MDOWN() then start the drag at that point.
Tracy
-Original Message-
From: Dave Crozier
Subject: RE: Textbox Drag/Drop
Tracy,
That's what I've done but it is a real kludge as for this particular
application I have a comms program timer running
Is this what you are after?
code
oFrm = CREATEOBJECT(cFrm)
oFrm.Show()
READ EVENTS
DEFINE CLASS cFrm as Form
ADD OBJECT txt1 as textbox WITH value = Hello World
ADD OBJECT txt2 as textbox WITH top = 40
PROCEDURE Destroy
CLEAR EVENTS
ENDPROC
PROCEDURE
: Textbox Drag/Drop
Is this what you are after?
code
oFrm = CREATEOBJECT(cFrm)
oFrm.Show()
READ EVENTS
DEFINE CLASS cFrm as Form
ADD OBJECT txt1 as textbox WITH value = Hello World
ADD OBJECT txt2 as textbox WITH top = 40
PROCEDURE Destroy
CLEAR EVENTS
ENDPROC
8 matches
Mail list logo