C_POINTER($1;$selectedObject)
C_TEXT($variableName)
C_LONGINT($arrayPos;$selectedObjectNum)

$selectedObject:=$1

$variableName:=(tool_Getpointer ($selectedObject))

$arrayPos:=Find in array(HelpTipObjectName;$variableName)

If ($arrayPos#-1)

$selectedObjectNum:=$arrayPos
HelpTipText:=HelpTipValue{$selectedObjectNum}

End if