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 if
See Also