[AccessD] Generic Procedure on form controls for Drag and Drop

Darren darren at activebilling.com.au
Wed Feb 6 22:38:37 CST 2013


Hi John,
Welcome to the list. We have a webpage too. 
	http://www.databaseadvisors.com
On that Webpage is some code samples.
One in particular that shows one way to accomplish some elements of Drag and
Drop in Access.
Check it out at:
	http://www.databaseadvisors.com/downloads.asp
And look for "Drag and Drop".
Hope it's useful.
Darren
-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Bodin
Sent: Thursday, 7 February 2013 5:56 AM
To: accessd at databaseadvisors.com
Subject: [AccessD] Generic Procedure on form controls for Drag and Drop

Hello,

 

New to this list and need some guidance on a form I've developed (I posted
this on LinkedIn and got a few links with good information, but still having
issues).  

 

I have a grid of many text boxes on a form in an Access 2003 app that I fill
from a table upon opening the form as well as when the user changes a date
box. I add some generic procedure calls on the fly to each text box where I
pass the control to the generic function (for instance, I'll add a
double-click event to text box "Txt101" as "=TxtBoxDblClick([Txt101])". This
will pass the control to my function TxtBoxDblClick so I can react to it.)
This all works fine for all text boxes and I reference just one (same)
routine for each control. 

I'm trying to experiment with Drag and Drop and found some code that I can
get to work if at Design time, I add three event procedures to a text box
control (Mouse Down/Up/Move). If I do this to two different controls,
creating 3 event procedures for each at design time, I can successfully drag
and drop between the two controls. So the drag and drop code looks like it
works.

My problem is, I want to have 3 generic routines like my TxtBoxDblClick
function, that I can add on the fly to the On Mouse Down/Up/Move events and
I can't figure out the syntax and/or code to make this happen. I can add the
custom Functions no problem, but I know I need to be able to deal with the
Button, Shift, X & Y parameters somehow. I can pass the control to the
custom function, but am unable to reference the Button, Shift, X & Y
parameters. I'm guessing I'll need to create some type of class possibly? If
so, can someone provide some sample code on how to do this what the calls
would be?  Thanks for any ideas. John

 

--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com



More information about the AccessD mailing list