87:
I can not reach the Maximum value I set. What can be the problem
// Occurs when the value of the control is about to change.
Procedure OnComChanging Integer llOldValue Integer llNewValue
	Forward Send OnComChanging llOldValue llNewValue
	Set ComToolTipText to llNewValue
End_Procedure

Procedure OnCreate
	Forward Send OnCreate
	Set ComIgnoreLargeChange to True
	Set ComMaximum to 128
	Set ComValue to 128
End_Procedure
86:
How do I use the RenderType property

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexVSThumb to |CI$1000000
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Set ComRenderType of hoAppearance1 to 1073742079
	Send Destroy to hoAppearance1
End_Procedure
85:
How can I make a spin control

// Occurs when the value of the control is changed.
Procedure OnComChange 
	Forward Send OnComChange 
	Showln "Change" (ComValue(Self))
End_Procedure

Procedure OnCreate
	Forward Send OnCreate
	Set ComThumbSize to 0
End_Procedure
84:
How can I change the tooltip's border using your EBN files with a different color

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexToolTipAppearance to |CI$100ffa0
	Set ComToolTipText to "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
End_Procedure
83:
Can I change the color for the control's border

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComAppearance to (|CI$10000f8 + OLEBump + OLESunken)
End_Procedure
82:
How do I change the control's border, using your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComAppearance to |CI$1000000
End_Procedure
81:
How can I change the visual appearance of the right button usign your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Set ComMode to OLEexHorizontal
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Variant voAppearance2
	Get ComVisualAppearance to voAppearance2
	Handle hoAppearance2
	Get Create (RefClass(cComAppearance)) to hoAppearance2
	Set pvComObject of hoAppearance2 to voAppearance2
		Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing
	Send Destroy to hoAppearance2
	Set ComBackground OLEexHSRight to |CI$1000000
	Set ComBackground OLEexHSRightP to |CI$2000000
	Set ComBackground OLEexHSRightD to |CI$1000000
	Set ComBackground OLEexHSRightH to |CI$3000000
End_Procedure
80:
How can I change the visual appearance of the thumb usign your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Set ComMode to OLEexHorizontal
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Variant voAppearance2
	Get ComVisualAppearance to voAppearance2
	Handle hoAppearance2
	Get Create (RefClass(cComAppearance)) to hoAppearance2
	Set pvComObject of hoAppearance2 to voAppearance2
		Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing
	Send Destroy to hoAppearance2
	Set ComBackground OLEexHSThumb to |CI$1000000
	Set ComBackground OLEexHSThumbP to |CI$2000000
	Set ComBackground OLEexHSThumbD to |CI$1000000
	Set ComBackground OLEexHSThumbH to |CI$3000000
End_Procedure
79:
How can I change the visual appearance of the left button usign your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Set ComMode to OLEexHorizontal
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Variant voAppearance2
	Get ComVisualAppearance to voAppearance2
	Handle hoAppearance2
	Get Create (RefClass(cComAppearance)) to hoAppearance2
	Set pvComObject of hoAppearance2 to voAppearance2
		Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing
	Send Destroy to hoAppearance2
	Set ComBackground OLEexHSLeft to |CI$1000000
	Set ComBackground OLEexHSLeftP to |CI$2000000
	Set ComBackground OLEexHSLeftD to |CI$1000000
	Set ComBackground OLEexHSLeftH to |CI$3000000
End_Procedure
78:
How can I change the visual appearance for all buttons usign your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Set ComMode to OLEexHorizontal
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Variant voAppearance2
	Get ComVisualAppearance to voAppearance2
	Handle hoAppearance2
	Get Create (RefClass(cComAppearance)) to hoAppearance2
	Set pvComObject of hoAppearance2 to voAppearance2
		Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing
	Send Destroy to hoAppearance2
	Set ComBackground OLEexSBtn to |CI$1000000
	Set ComBackground OLEexSBtnP to |CI$2000000
	Set ComBackground OLEexSBtnD to |CI$1000000
	Set ComBackground OLEexSBtnH to |CI$3000000
End_Procedure
77:
How can I change the visual appearance of the down button usign your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Variant voAppearance2
	Get ComVisualAppearance to voAppearance2
	Handle hoAppearance2
	Get Create (RefClass(cComAppearance)) to hoAppearance2
	Set pvComObject of hoAppearance2 to voAppearance2
		Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing
	Send Destroy to hoAppearance2
	Set ComBackground OLEexVSDown to |CI$1000000
	Set ComBackground OLEexVSDownP to |CI$2000000
	Set ComBackground OLEexVSDownD to |CI$1000000
	Set ComBackground OLEexVSDownH to |CI$3000000
End_Procedure
76:
How can I change the visual appearance of the thumb usign your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Variant voAppearance2
	Get ComVisualAppearance to voAppearance2
	Handle hoAppearance2
	Get Create (RefClass(cComAppearance)) to hoAppearance2
	Set pvComObject of hoAppearance2 to voAppearance2
		Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing
	Send Destroy to hoAppearance2
	Set ComBackground OLEexVSThumb to |CI$1000000
	Set ComBackground OLEexVSThumbP to |CI$2000000
	Set ComBackground OLEexVSThumbD to |CI$1000000
	Set ComBackground OLEexVSThumbH to |CI$3000000
End_Procedure
75:
How can I change the visual appearance of the up button usign your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Variant voAppearance2
	Get ComVisualAppearance to voAppearance2
	Handle hoAppearance2
	Get Create (RefClass(cComAppearance)) to hoAppearance2
	Set pvComObject of hoAppearance2 to voAppearance2
		Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing
	Send Destroy to hoAppearance2
	Set ComBackground OLEexVSUp to |CI$1000000
	Set ComBackground OLEexVSUpP to |CI$2000000
	Set ComBackground OLEexVSUpD to |CI$1000000
	Set ComBackground OLEexVSUpH to |CI$3000000
End_Procedure
74:
How can I change the visual appearance for all buttons usign your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Variant voAppearance1
	Get ComVisualAppearance to voAppearance1
	Handle hoAppearance1
	Get Create (RefClass(cComAppearance)) to hoAppearance1
	Set pvComObject of hoAppearance1 to voAppearance1
		Get ComAdd of hoAppearance1 2 "c:\exontrol\images\pushed.ebn" to Nothing
	Send Destroy to hoAppearance1
	Variant voAppearance2
	Get ComVisualAppearance to voAppearance2
	Handle hoAppearance2
	Get Create (RefClass(cComAppearance)) to hoAppearance2
	Set pvComObject of hoAppearance2 to voAppearance2
		Get ComAdd of hoAppearance2 3 "c:\exontrol\images\hot.ebn" to Nothing
	Send Destroy to hoAppearance2
	Set ComBackground OLEexSBtn to |CI$1000000
	Set ComBackground OLEexSBtnP to |CI$2000000
	Set ComBackground OLEexSBtnD to |CI$1000000
	Set ComBackground OLEexSBtnH to |CI$3000000
End_Procedure
73:
Can I indent the caption in the button or part

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb indented by 20 pixels and moved up by 5 pixels"
	Set ComCaptionAlignment OLEexThumbPart to OLELeftAlignment
	Set ComCaptionIndentX OLEexThumbPart to 20
	Set ComCaptionIndentY OLEexThumbPart to -5
End_Procedure
72:
Can I indent the caption in the button or part

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb indented by 20 pixels"
	Set ComCaptionAlignment OLEexThumbPart to OLELeftAlignment
	Set ComCaptionIndentX OLEexThumbPart to 20
End_Procedure
71:
Can i specify to ignore the large change value when getting the maximum value
Procedure OnCreate
	Forward Send OnCreate
	Set ComIgnoreLargeChange to True
End_Procedure
70:
Is there any way to specify the order of the buttons/parts

Procedure OnCreate
	Forward Send OnCreate
	Set ComOrderParts to "l,r,t"
	Set ComValue to 15
End_Procedure
69:
Does your control support owner draw feature
Procedure OnCreate
	Forward Send OnCreate
	Set ComOwnerDrawPart OLEexThumbPart to True
End_Procedure
68:
Can I assing any extra data to a button or part of the control
Procedure OnCreate
	Forward Send OnCreate
	Set ComUserData OLEexThumbPart to "This is just some extra data assigned to the control's thumb"
End_Procedure
67:
How can I specify the size of the thumb

Procedure OnCreate
	Forward Send OnCreate
	Set ComHTMLPicture "p1" to "c:\exontrol\images\zipdisk.gif"
	Set ComHTMLPicture "p2" to "c:\exontrol\images\auction.gif"
	Set ComCaption OLEexThumbPart to "<img>p1</img> thumb <img>p2</img>"
	Set ComThumbSize to 48
End_Procedure
66:
Is there any property to disable the up or down button, as a disable when there is no scroll

Procedure OnCreate
	Forward Send OnCreate
	Set ComDisableNoScroll to True
End_Procedure
65:
Is there any property to disable the up or down button, so user can't click it

Procedure OnCreate
	Forward Send OnCreate
	Set ComEnablePart OLEexRightBPart to False
End_Procedure
64:
Is there any property to disable the up or down button, so user can't click it

Procedure OnCreate
	Forward Send OnCreate
	Set ComDisableNoScroll to True
End_Procedure
63:
Can I change the tooltip's border using your EBN files

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexToolTipAppearance to |CI$1000000
	Set ComToolTipText to "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
End_Procedure
62:
Can I change the tooltip's background color

Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipText to "This is <bgcolor=FF0000>just a text</bgcolor> that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
End_Procedure
61:
Can I change the tooltip's background color

Procedure OnCreate
	Forward Send OnCreate
	Set ComBackground OLEexToolTipBackColor to (RGB(255,0,0))
	Set ComToolTipText to "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
End_Procedure
60:
Can I change the tooltip's foreground color

Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipText to "This is <fgcolor=FF0000>just a text</fgcolor> that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
End_Procedure
59:
Can I change the tooltip's foreground color

Procedure OnCreate
	Forward Send OnCreate
	Set ComBackground OLEexToolTipForeColor to (RGB(255,0,0))
	Set ComToolTipText to "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
End_Procedure
58:
Can I change the tooltip's width

Procedure OnCreate
	Forward Send OnCreate
	Send ComBeginUpdate
	Set ComToolTipWidth to 256
	Set ComToolTipText to "This is <font Tahoma;12>just a text with a different font</font> that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
	Send ComEndUpdate
End_Procedure
57:
Can I change the tooltip's font

Procedure OnCreate
	Forward Send OnCreate
	Send ComBeginUpdate
	Set ComToolTipTitle to "Title"
	Set ComToolTipText to "This is <font Tahoma;12>just a text with a different font</font> that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
	Send ComEndUpdate
End_Procedure
56:
Can I change the tooltip's font

Procedure OnCreate
	Forward Send OnCreate
	Send ComBeginUpdate
	Variant f
	Get Comcreateobject "StdFont" to f
		Set ComName to "Tahoma"
		Set ComSize to 12
	Set ComToolTipFont to f
	Set ComToolTipTitle to "Title"
	Set ComToolTipText to "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
	Send ComEndUpdate
End_Procedure
55:
Can I display a tooltip when user clicks the thumb and drags it to a new position

Procedure OnCreate
	Forward Send OnCreate
	Set ComToolTipTitle to "Title"
	Set ComToolTipText to "This is just a text that's displayed when the user clicks and drags the thumb to a new position"
	Set ComValue to 43
End_Procedure
54:
Is there any function to specify the size/width of the buttons

Procedure OnCreate
	Forward Send OnCreate
	Set ComMode to OLEexHorizontal
	Set ComBtnWidth to 32
End_Procedure
53:
Is there any function to specify the size/height of the buttons

Procedure OnCreate
	Forward Send OnCreate
	Set ComBtnHeight to 32
End_Procedure
52:
How do scroll to a specified position
Procedure OnCreate
	Forward Send OnCreate
	Set ComValue to 10
End_Procedure
51:
How do scroll to a specified position
Procedure OnCreate
	Forward Send OnCreate
	Send ComScroll OLEexScrollToPosition 10
End_Procedure
50:
How do simulate clicking the down button
Procedure OnCreate
	Forward Send OnCreate
	Send ComScroll OLEexScrollRight 0
End_Procedure
49:
I am using your control in a C++ application, and I would preffer handle messages instead events
Procedure OnCreate
	Forward Send OnCreate
	Set ComSendMessage to True
End_Procedure
48:
How can I get the value from the cursor
Procedure OnCreate
	Forward Send OnCreate
	Variant var_ValueFromPoint
	Get ComValueFromPoint -1 -1 to var_ValueFromPoint
End_Procedure
47:
Is there any function to identify the part from the cursor
Procedure OnCreate
	Forward Send OnCreate
	Variant var_PartFromPoint
	Get ComPartFromPoint -1 -1 to var_PartFromPoint
End_Procedure
46:
Is there any option to specify the value to be added or subtracted when user presses the contro's background
Procedure OnCreate
	Forward Send OnCreate
	Set ComLargeChange to 20
End_Procedure
45:
Is there any option to specify the value to be added or subtracted when user presses the up or down button
Procedure OnCreate
	Forward Send OnCreate
	Set ComSmallChange to 5
End_Procedure
44:
How do I specify the maxmimum value in the control
Procedure OnCreate
	Forward Send OnCreate
	Set ComMaximum to 95
	Set ComValue to 90
End_Procedure
43:
How do I specify the minimum value in the control
Procedure OnCreate
	Forward Send OnCreate
	Set ComMinimum to 5
	Set ComValue to 7
End_Procedure
42:
How do I change control's position
Procedure OnCreate
	Forward Send OnCreate
	Set ComValue to 43
End_Procedure
41:
How do I change the position of the thumb
Procedure OnCreate
	Forward Send OnCreate
	Set ComValue to 43
End_Procedure
40:
How do I enable or disable a button or a part of the control

Procedure OnCreate
	Forward Send OnCreate
	Set ComVisiblePart OLEexLeftB1Part to True
	Set ComEnablePart OLEexLeftB1Part to False
	Set ComCaption OLEexLeftB1Part to "<img>0</img><fgcolor=808080>extra button</fgcolor>"
End_Procedure
39:
How do show or hide buttons in the control

Procedure OnCreate
	Forward Send OnCreate
	Set ComVisiblePart OLEexLeftB1Part to True
	Set ComCaption OLEexLeftB1Part to "<img>0</img>extra button"
	Set ComVisiblePart OLEexRightB6Part to True
	Set ComCaption OLEexRightB6Part to "<img>0</img>extra button"
	Set ComVisiblePart OLEexRightB5Part to True
	Set ComCaption OLEexRightB5Part to "<img>0</img>extra button"
End_Procedure
38:
How do I arrange the control horizontally

Procedure OnCreate
	Forward Send OnCreate
	Set ComMode to OLEexHorizontal
End_Procedure
37:
How do I prevent painting the control when I perform several changes

Procedure OnCreate
	Forward Send OnCreate
	Send ComBeginUpdate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComHTMLPicture "p1" to "c:\exontrol\images\zipdisk.gif"
	Set ComHTMLPicture "p2" to "c:\exontrol\images\auction.gif"
	Set ComCaption OLEexThumbPart to "<img>p1</img> thumb <img>p2</img> ... <img>1</img> icon"
	Set ComThumbSize to 48
	Send ComEndUpdate
End_Procedure
36:
How do I add icons

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComCaption OLEexThumbPart to "<img>1</img>thumb"
End_Procedure
35:
How do I change the caption for the extra button I added
Procedure OnCreate
	Forward Send OnCreate
	Set ComVisiblePart OLEexLeftB1Part to True
	Set ComCaption OLEexLeftB1Part to "<img>0</img>extra button"
End_Procedure
34:
How can I align the caption to the right

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb right"
	Set ComCaptionAlignment OLEexThumbPart to OLERightAlignment
End_Procedure
33:
How can I align the caption to the left

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexThumbPart to "<img>0</img> thumb left"
	Set ComCaptionAlignment OLEexThumbPart to OLELeftAlignment
End_Procedure
32:
How can show the caption using a different font

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexLowerBackPart to "<img>0</img><font Tahoma;12>upper</font> part"
	Set ComCaption OLEexUpperBackPart to "<img>0</img><font ;4>lower</font> part"
	Set ComValue to 45
End_Procedure
31:
Is there any option to display icons or pictures in the parts of the control

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComHTMLPicture "p1" to "c:\exontrol\images\zipdisk.gif"
	Set ComHTMLPicture "p2" to "c:\exontrol\images\auction.gif"
	Set ComCaption OLEexThumbPart to "<img>p1</img> thumb <img>p2</img> ... <img>1</img> icon"
	Set ComThumbSize to 48
End_Procedure
30:
Is there any option to display icons or pictures in the parts of the control

Procedure OnCreate
	Forward Send OnCreate
	Set ComHTMLPicture "p1" to "c:\exontrol\images\zipdisk.gif"
	Set ComHTMLPicture "p2" to "c:\exontrol\images\auction.gif"
	Set ComCaption OLEexThumbPart to "<img>p1</img> thumb <img>p2</img>"
	Set ComThumbSize to 48
End_Procedure
29:
Is there any option to display icons or pictures in the parts of the control

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComCaption OLEexThumbPart to "<img>1</img> thumb <img>2</img>"
End_Procedure
28:
Is there any option to display icons or pictures in the parts of the control

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComCaption OLEexThumbPart to "<img>1:4</img><img>1:4</img><img>1:4</img><img>1</img>thumb"
End_Procedure
27:
Is there any option to display icons or pictures in the parts of the control

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComCaption OLEexThumbPart to "<img>1</img>thumb"
End_Procedure
26:
How can paint the caption using multiple lines

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexThumbPart to "<img>0</img>line1<br>line2"
End_Procedure
25:
How can change the background color for a portion of text

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexLowerBackPart to "<img>0</img><bgcolor=FF0000><fgcolor=0000FF>upper</fgcolor></bgcolor> part"
	Set ComCaption OLEexUpperBackPart to "<img>0</img><bgcolor=0000FF><fgcolor=FF0000>upper</fgcolor></bgcolor> part"
	Set ComValue to 45
End_Procedure
24:
How can change the foreground color for a portion of text

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexLowerBackPart to "<img>0</img><fgcolor=FF0000>upper</fgcolor> part"
	Set ComCaption OLEexUpperBackPart to "<img>0</img><fgcolor=0000FF>upper</fgcolor> part"
	Set ComValue to 45
End_Procedure
23:
How can show the caption as strikeout

Procedure OnCreate
	Forward Send OnCreate
	Variant f
	Get Comcreateobject "StdFont" to f
		Set ComName to "Tahoma"
		Set ComSize to 12
	Set ComFont to f
	Set ComCaption OLEexLowerBackPart to "<img>0</img><s>upper</s> part"
	Set ComCaption OLEexUpperBackPart to "<img>0</img><s>lower</s> part"
	Set ComValue to 45
End_Procedure
22:
How can underline a portion of the caption

Procedure OnCreate
	Forward Send OnCreate
	Variant f
	Get Comcreateobject "StdFont" to f
		Set ComName to "Tahoma"
		Set ComSize to 12
	Set ComFont to f
	Set ComCaption OLEexLowerBackPart to "<img>0</img><u>upper</u> part"
	Set ComCaption OLEexUpperBackPart to "<img>0</img><u>lower</u> part"
	Set ComValue to 45
End_Procedure
21:
How can I draw in italic a portion of the caption

Procedure OnCreate
	Forward Send OnCreate
	Variant f
	Get Comcreateobject "StdFont" to f
		Set ComName to "Tahoma"
		Set ComSize to 12
	Set ComFont to f
	Set ComCaption OLEexLowerBackPart to "<img>0</img><i>upper</i> part"
	Set ComCaption OLEexUpperBackPart to "<img>0</img><i>lower</i> part"
	Set ComValue to 45
End_Procedure
20:
How can I draw in bold a portion of the caption

Procedure OnCreate
	Forward Send OnCreate
	Variant f
	Get Comcreateobject "StdFont" to f
		Set ComName to "Tahoma"
		Set ComSize to 12
	Set ComFont to f
	Set ComCaption OLEexLowerBackPart to "<img>0</img><b>upper</b> part"
	Set ComCaption OLEexUpperBackPart to "<img>0</img><b>lower</b> part"
	Set ComValue to 45
End_Procedure
19:
How can I put a text on the background part in the lower or upper , horizontally

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexLowerBackPart to "<img>0</img>upper"
	Set ComCaption OLEexUpperBackPart to "<img>0</img>lower"
	Set ComValue to 45
End_Procedure
18:
How can I put a text on the background part in the lower or upper side

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexLowerBackPart to "upper"
	Set ComCaption OLEexUpperBackPart to "lower"
	Set ComValue to 45
End_Procedure
17:
How can I put a text on the background part, horizontally

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexBackgroundPart to "<img>0</img>background"
End_Procedure
16:
How can I put a text on the background part

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexBackgroundPart to "background"
End_Procedure
15:
How can I put a text on the thumb, horizontally

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb"
End_Procedure
14:
How can I put a text on the thumb

Procedure OnCreate
	Forward Send OnCreate
	Set ComCaption OLEexThumbPart to "thumb"
End_Procedure
13:
How can I disable the control
Procedure OnCreate
	Forward Send OnCreate
	Set ComEnabled to False
End_Procedure
12:
How do I put a picture on the center of the control

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLEMiddleCenter
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
End_Procedure
11:
How do I resize/stretch a picture on the control's background

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLEStretch
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
End_Procedure
10:
How do I put a picture on the control's center right bottom side

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLELowerRight
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
End_Procedure
9:
How do I put a picture on the control's center left bottom side

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLELowerLeft
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
End_Procedure
8:
How do I put a picture on the control's center top side

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLEUpperCenter
	Set ComValue to 50
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
End_Procedure
7:
How do I put a picture on the control's right top corner

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLEUpperRight
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
	Set ComValue to 50
End_Procedure
6:
How do I put a picture on the control's left top corner

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLEUpperLeft
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
	Set ComValue to 50
End_Procedure
5:
How do I put a picture on the control's background

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
End_Procedure
4:
How can I change the size of control's font

Procedure OnCreate
	Forward Send OnCreate
	Variant voStdFont
	Get ComFont to voStdFont
	Handle hoStdFont
	Get Create (RefClass(cComStdFont)) to hoStdFont
	Set pvComObject of hoStdFont to voStdFont
		Set ComSize of hoStdFont to 12
	Send Destroy to hoStdFont
	Set ComForeColor to (RGB(255,0,0))
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb"
End_Procedure
3:
How do I change the control's font

Procedure OnCreate
	Forward Send OnCreate
	Variant voStdFont
	Get ComFont to voStdFont
	Handle hoStdFont
	Get Create (RefClass(cComStdFont)) to hoStdFont
	Set pvComObject of hoStdFont to voStdFont
		Set ComName of hoStdFont to "Tahoma"
	Send Destroy to hoStdFont
	Set ComForeColor to (RGB(255,0,0))
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb"
End_Procedure
2:
How can I change the control's foreground color

Procedure OnCreate
	Forward Send OnCreate
	Set ComForeColor to (RGB(255,0,0))
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb"
End_Procedure
1:
How can I change the control's background color

Procedure OnCreate
	Forward Send OnCreate
	Set ComBackColor to (RGB(0,255,0))
	Set ComVisiblePart OLEexBackgroundPart to False
End_Procedure