|
<< Click to Display Table of Contents >> Kind |
  
|
|
<< Click to Display Table of Contents >> Kind |
|
By using this function, you can identify the type of an object.
property Kind [long] TVPEObject.Kind
read; runtime only
Returns:
Possible return codes are:
ActiveX / VCL |
Value |
Enum |
Comment |
VOBJID_NULL |
16 |
Null |
does not occur |
VOBJID_LINE |
17 |
Line |
|
VOBJID_POLYLINE |
18 |
Polyline |
|
VOBJID_FRAME |
19 |
Frame |
|
VOBJID_TEXT |
20 |
Text |
|
VOBJID_PICTURE |
21 |
Picture |
|
VOBJID_BARCODE |
22 |
Barcode |
|
VOBJID_ELLIPSE |
23 |
Ellipse |
|
VOBJID_PIE |
24 |
Pie |
|
VOBJID_POLYGON |
25 |
Polygon |
|
VOBJID_RTF |
26 |
RTF |
|
VOBJID_CHART |
27 |
Chart |
|
VOBJID_UDO |
28 |
UDO |
|
VOBJID_FORMFIELD |
29 |
FormField |
|
VOBJID_RESERVED |
30 |
---------- |
does not occur |
VOBJID_DOCDATA |
31 |
DocData |
VPE document handle |
VOBJID_CTRL_FORMFIELD |
32 |
CtrlFormField |
|
VOBJID_CTRL_CHECKBOX |
33 |
CtrlCheckbox |
|
VOBJID_CTRL_RADIOBUTTON |
34 |
CtrlRadioButton |
|
VOBJID_CTRL_RADIOBUTTONGROUP |
35 |
CtrlRadioButtonGroup |
|
VOBJID_RESERVED2 |
36 |
---------- |
does not occur |
VOBJID_RESERVED3 |
37 |
---------- |
does not occur |
VOBJID_DATA_MATRIX |
38 |
DataMatrix |
|
VOBJID_MAXI_CODE |
39 |
MaxiCode |
|
VOBJID_PDF417 |
40 |
Pdf417 |
|
VOBJID_AZTEC |
41 |
Aztec |
|
VOBJID_QRCODE |
42 |
QRCode |
|
Example:
ActiveX - VB 6:
' Returns the type name of a given VPE Object-ID:
Private Function GetObjectKindName(obj As TVPEObject) As String
Select Case obj.Kind
Case VOBJID_LINE
GetObjectKindName = "Line"
Case VOBJID_POLYLINE
GetObjectKindName = "Polyline"
Case VOBJID_FRAME
GetObjectKindName = "Frame"
Case VOBJID_TEXT
GetObjectKindName = "Text"
Case VOBJID_PICTURE
GetObjectKindName = "Picture"
Case VOBJID_BARCODE
GetObjectKindName = "Barcode"
Case VOBJID_ELLIPSE
GetObjectKindName = "Ellipse"
Case VOBJID_PIE
GetObjectKindName = "Pie"
Case VOBJID_POLYGON
GetObjectKindName = "Polygon"
Case VOBJID_RTF
GetObjectKindName = "RTF"
Case VOBJID_CHART
GetObjectKindName = "Chart"
Case VOBJID_UDO
GetObjectKindName = "UDO"
Case VOBJID_FORMFIELD
GetObjectKindName = "FormField"
Case VOBJID_DOCDATA
GetObjectKindName = "Document Data"
Case VOBJID_CTRL_FORMFIELD
GetObjectKindName = "FormField Control"
Case VOBJID_CTRL_CHECKBOX
GetObjectKindName = "Checkbox Control"
Case VOBJID_CTRL_RADIOBUTTON
GetObjectKindName = "RadioButton Control"
Case VOBJID_CTRL_RADIOBUTTONGROUP
GetObjectKindName = "RadioButton Group Control"
Case VOBJID_DATA_MATRIX
GetObjectKindName = "DataMatrix Barcode"
Case VOBJID_MAXI_CODE
GetObjectKindName = "MaxiCode Barcode"
Case VOBJID_PDF417
GetObjectKindName = "PDF417 Barcode"
Case VOBJID_AZTEC
GetObjectKindName = "Aztec Barcode"
Case VOBJID_QRCODE
GetObjectKindName = "QRCode Barcode"
Case Else
GetObjectKindName = "NULL"
End Select
End Function
"dycodoc Template Processing" in the Programmer's Manual