Xbasic
OBJ Function
Syntax
as P = OBJ(C object_name)
Arguments
- object_name
The "name" of the object, as in :customer:button1.
Description
OBJ() returns an pointer to the object specified by Object_Address.
Example
This script returns a pointer to the current form, then lists its child objects.
dim ptr as P
ptr = obj(a_form_current)
ui_msg_box("Child Objects of this Form", ptr.child_enum() )The following script tests to see if a form called "customer" has been loaded. If not, it loads the form.
p = obj(":customer")
if (.not. is_object(p)) then
:form.view("customer")
end ifSee Also