...in 4D code, something like this for defining the base object's basic components:
// Object_RegisterRootObject OBRegister_RegisterObject (Object is RootObject;1;"Object_New";"Object_ToText") C_BOOLEAN($required) C_BOOLEAN($optional) $required:=True $optional:=False OBRegister_RegisterObject (Object is RootObject;"Root.header";Is object;$required) OBRegister_RegisterObject (Object is RootObject;"Root.header";Abstract type is ObjectType;$required) OBRegister_RegisterObject (Object is RootObject;"Root.version_number";Is real;$required) OBRegister_RegisterObject (Object is RootObject;"Root.instance_name";Is text;$optional) OBRegister_RegisterObject (Object is RootObject;"Root.body";Is object;$required) There are several custom constants in there. ********************************************************************** 4D Internet Users Group (4D iNUG) FAQ: http://lists.4d.com/faqnug.html Archive: http://lists.4d.com/archives.html Options: http://lists.4d.com/mailman/options/4d_tech Unsub: mailto:4d_tech-unsubscr...@lists.4d.com **********************************************************************