ISProfileForm.TypeName

Description

This function returns the name of the form 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

Syntax

object.TypeName()

Part	Attribute	Type	Description
`object`	Required	ISProfileForm	The `object` always implements the ISProfileForm interface

Return Value

string

Returns the name of the form type.

Example

Display some information about the form, including the name of the form type.

Dim aForm
Dim aMessage

Set aForm = Profile.Form
aMessage = "Form Info: " & vbNewLine & vbNewLine &_
  "- Caption: " & aForm.Caption & vbNewLine &_
  "- Type Name: " & aForm.TypeName & vbNewLine &_
  "- ID: " & aForm.ID & vbNewLine &_
  "- Name: " & aForm.Name_ & vbNewLine &_
  "- Height: " & aForm.Height & vbNewLine &_
  "- Width: " & aForm.Width & vbNewLine &_
  "- Top: " & aForm.Top & vbNewLine &_
  "- Left: " & aForm.Left & vbNewLine &_
  "- Short Name: " & aForm.ShortName        
  
Profile.MsgBox(aMessage)

Note: This macro should be executed in any event handler of the form control.

In Profile Client v8 on User Interface Type Name cannot be found.

Version information

Added in v7.8.0