code to Identify type of object

[BVVPrasad]

Is there any function that returns the type of object.
For example edit box on a windows application falls under "WinEdit" Class.
So can some one help me with a function/method which returns the class of the object

[supputuri]

Hi Prasad,

msgbox ObjectType(Window("").winEdit(""))

Code:

Public ObjectType(strobjPath)
  If strobjPath.Exist Then
    strobjType = strobjPath.GetTOProperty("Class Name")
    ObjectType = strobjType
  Else
   ObjectType = strobjPath & "object does not exist."
  EndIF
End Function

Please let me know if you need any more info.

[BVVPrasad]

Hi Supputuri,

Thanks for your response. The above code returns WinEdit when I pass Dialog("Login").WinEdit("Agent Name:") as parameter to ObjectType Function.

My requirement is, I will pass the Window Name i.e "Login" and object name i.e "AgentName: " Is there any way to get what class of objects they are. Dialog for "Login" and WinEdit for "Agent Name: "

Thanks,
Prasad

[PrabhatN]

Hi Prasad,

You can try the following piece of code. But before trying make sure that all the properties are present that are being used over here. Or you can change it according to your application

Code:

Function returnObjClass(ByVal windName,ByVal objName)
      Set obj = Description.Create
      obj("name").Value = objName //make sure "name" property is present for the object
      Set allObj = Window("regexpwndtitle:="&windName).ChildObjects(obj)
      If allObj.Count > 1 Then
      msgbox "More than one Object found having this property"
      End If
      returnObjClass = allObj(0).GetROProperty("Class Name")
End Function

Then from QTP call the function as follows:

Code:

getClassName = returnObjClass("Your Window Name","Your Object Name")
msgbox getClassName

Hope it will serve to your need.

[BVVPrasad]

Thank You Very Much Prabhat. I tried your function and it solved my problem . I used "attached text" instead of "name" for the below line
obj("name").Value = objName