General information
Category:
Coding, syntax & commands
Thanks George for the tip on OBJTOCLIENT(). I have experimented with it and came up with the following code in the GotFocusEvent of the TextBox.
The code could be made more generic by walking the chain of Parent BaseClasses to get the path to the object. In this (test) case the textbox is contained in a container along with a label which is then placed on the form.
Thanks again
LOCAL lnLeft, lnTop
lcObj = 'This.Parent.Parent' && FORM
loObj = EVAL(lcObj)
* Get the left of the form, then the parent container left, then the control
* itself. I added the This.Width to position mouse pointer a end of textbox
* for no particular reason.
lnLeft = OBJTOCLIENT(loObj, 2) + This.Parent.Left + This.Left + This.Width
lnTop = OBJTOCLIENT(loObj, 1) + This.Parent.Top + This.Top
MOUSE AT lnTop, lnLeft PIXELS
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only