Calling convention: GetObjectName(): String
Description: Returns the name of the current object.
Parameters: None.
Returns: Current object name, or NULL when no current object is assigned.
Availability: Default.
Example:
ObjectName := GetObjectName();