Get selected object name before losing focus of current object

[gmeredith17]

I've been looking for a way to find out what object on a form the user has selected. I want to control whether they can depart an embedded browse based on which field they have selected to move to with the mouse. I've tried .active() but that just returns the browse control whether the code is in the CanDepart or OnDepart event. Been searching through the many functions but to no avail.

Anyone know if this is possible and if so how?

[Stan Mathews]

Re: Get selected object name before losing focus of current object

Seems a contradiction in logic. You want to code the ondepart or candepart to test for something that happens after both of those fire. In other words, the object that they select by mouse - after they have departed the browse. They have to depart the browse to be able to select an object outside the browse.

Seems to me you would have to code the canarrive of the possible moused to objects and refer to <OBJECT>.ACTIVE_PREV() to see if the browse was the prior location.

If the form has a relatively small number of fields you might consider disabling all but the desired destination objects in the ondepart of the browse.

[gmeredith17]

Re: Get selected object name before losing focus of current object

Indeed, neither of those events work although the OnDepart is meant to be after the browse has lost focus so shouldn't really return the browse as the active object. Or is focus and active different things entirely?

Thanks though Stan I'll take a look at the CanArrive and see if it will do what I need. I was hoping for a special magic function that returned the object name of the mouse selection to make life easier. A5 must have it to know where its destination is just not available as an event or function for our use.

[Stan Mathews]

Re: Get selected object name before losing focus of current object

My previous thought was wrong.

The trace window reveals that the order of event execution when moving from one object to the next (when leaving a browse at least) is

canarrive for target object
candepart for active object
ondepart for active object
onarrive to target object

[Stan Mathews]

Re: Get selected object name before losing focus of current object

Not sure if this is any better but you can

code the onarrive for the browse
dim shared targetobj as C
targetobj = ""

code the canarrive for the desired target objects
dim shared targetobj as C
targetobj = this.name()

code the candepart for the browse
dim shared targetobj as C
if inlist(targetobj,"name1","name2","etc")
'ok
else
cancel()
'msgbox("you need to....")
end if

[gmeredith17]

Re: Get selected object name before losing focus of current object

Thanks Stan that worked a treat.

[Stan Mathews]

Re: Get selected object name before losing focus of current object

Glad to help. If there's a kludge that will do the job I can usually find it.