This function returns the name of the control type.
| Control Type in Object Inspector | Type Name |
| TButton | TICDOButton |
| TBevel | TICDOBevel |
| TCheckBox | TICDOChechBox |
| TListControl | TICDOListControl |
| TComboBox | TICDOComboBox |
| TEdit | TICDOEdit |
| TImage | TICDOImage |
| TLabel | TICDOLabel |
| TLinker | TICDOLinker |
| TMemo | TICDOMemo |
| TRadioButton | TICDORadioButton |
| TReport | TICDOReport |
| TRichEdit | TICDORichEdit |
| TISliceImageEditor | TISliceImageEditor |
| TShape | TICDOShape |
| TWebBrowser | TICDOWebBrowser |
object.TypeName()
| Part | Attribute | Type | Description |
|---|---|---|---|
object |
Required | The object always implements the
ISControl interface |
string
Display some information about the specified control, including the name of the control type.
Dim aControl
Dim aControlInfo
Set aControl = Form.Controls_("btnDemo")
aControlInfo =_
"Caption: " & aControl.Caption & vbNewLine &_
"Width: " & aControl.Width & vbNewLine &_
"Height: " & aControl.Height & vbNewLine &_
"Hint: " & aControl.Hint & vbNewLine &_
"Left: " & aControl.Left & vbNewLine &_
"Top: " & aControl.Top & vbNewLine &_
"Tag: " & aControl.Tag & vbNewLine &_
"ShortName: " & aControl.ShortName & vbNewLine &_
"Enabled: " & aControl.Enabled & vbNewLine &_
"TypeName: " & aControl.TypeName
Profile.MsgBox(aControlInfo) In Profile Client v8 on User Interface Type Name cannot be found.