53 lines
1.5 KiB
Plaintext
53 lines
1.5 KiB
Plaintext
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
|
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
*< FOXBIN2PRG: Version="1.21" SourceFile="ctl32_statusbar_fals.vcx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
|
*
|
|
*
|
|
DEFINE CLASS ctl32_statusbar AS custom
|
|
*< CLASSDATA: Baseclass="custom" Timestamp="" Scale="Pixels" Uniqueid="" />
|
|
|
|
*<DefinedPropArrayMethod>
|
|
*m: ctlclick
|
|
*m: newtooltip
|
|
*p: ctlicon
|
|
*p: ctlmessage
|
|
*a: ctlpanels[10,0]
|
|
*</DefinedPropArrayMethod>
|
|
|
|
*<PropValue>
|
|
ctlicon =
|
|
ctlmessage =
|
|
Name = "ctl32_statusbar"
|
|
*</PropValue>
|
|
|
|
PROCEDURE ctlclick
|
|
ENDPROC
|
|
|
|
PROCEDURE Init
|
|
Lparameters tnPanelCount
|
|
For I = 1 To tnPanelCount
|
|
This.ctlpanels(I) = Newobject("ctl32_statusbar_panel","ctl32_statusbar_fals")
|
|
Endfor
|
|
|
|
ENDPROC
|
|
|
|
PROCEDURE newtooltip
|
|
ENDPROC
|
|
|
|
ENDDEFINE
|
|
|
|
DEFINE CLASS ctl32_statusbar_panel AS custom
|
|
*< CLASSDATA: Baseclass="custom" Timestamp="" Scale="Pixels" Uniqueid="" />
|
|
|
|
*<DefinedPropArrayMethod>
|
|
*p: ctlcaption
|
|
*</DefinedPropArrayMethod>
|
|
|
|
*<PropValue>
|
|
ctlcaption =
|
|
Name = "ctl32_statusbar_panel"
|
|
*</PropValue>
|
|
|
|
ENDDEFINE
|