114. How can I change the control's Visual appearance 
with thisform.Calendar1
	var_s = "gBFLBWIgBAEHhEJAEGg6EhCDC0HA0IdT/iyAjAAdcWf8YQAAAcKkEThQCCsiAMRhQBkMHhgABEIBsILBQHRCOp0OhvNwgGM+"
	var_s = var_s + "AUImMHmcHms3nM7ns/GUtmEIB0IIc2GQgFo0q1VrAygI"
	.VisualDesign = var_s
endwith
113. How can I align the picture on the control's background 
with thisform.Calendar1
	.Picture = thisform.Calendar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\card.png`)")
	.PictureDisplay = 2
endwith
112. Is it possible to place a picture on the control's background 
with thisform.Calendar1
	.Picture = thisform.Calendar1.ExecuteTemplate("loadpicture(`c:\exontrol\images\card.png`)")
endwith
111. Is it possible to specify the color or the visual appearance (EBN) for selected dates when the control has no focus 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(68) = 0x1000000
	.Object.Background(69) = RGB(0,0,0)
	.HideSelection = .F.
endwith
110. Is it possible to specify the color for selected dates when the control loses the focus 
with thisform.Calendar1
	.Object.Background(68) = RGB(128,128,128)
	.Object.Background(69) = RGB(0,0,0)
	.HideSelection = .F.
endwith
109. Can I change the visual appearance for the tooltip, using your EBN files 
with thisform.Calendar1
	.ToolTipDelay = 1
	.ToolTipWidth = 364
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(64) = 0x1aa80f0
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
108. Can I change the color of the control's border (EBN files) 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Appearance = 27966412
endwith
107. Is it possible to change the color for days that are not in the month 
with thisform.Calendar1
	.FirstDay = 2
	.ShowNonMonthDays = .T.
	.NonMonthDaysColor = RGB(255,0,0)
endwith
106. How can I change the foreground color for non-working days 
with thisform.Calendar1
	.FirstDay = 2
	.NonworkingDaysForeColor = RGB(255,0,0)
endwith
105. How do I change the appearance for the months 
with thisform.Calendar1
	.Object.Background(8) = RGB(0,0,128)
	.Object.Background(21) = RGB(255,255,255)
endwith
104. How can I show the more months with its full size 
with thisform.Calendar1
	.AutoSize = 1
	.MaxMonthX = 2
	.MaxMonthY = 2
endwith
103. How can I show the calendar with its full size 
with thisform.Calendar1
	.AutoSize = 1
	.MaxMonthX = 1
	.MaxMonthY = 1
endwith
102. How can I hide the separator above the Today button 
with thisform.Calendar1
	.Object.Background(13) = .BackColor
endwith
101. How do I limit the dates being displayed or selected 
with thisform.Calendar1
	.MaxMonthX = 1
	.MaxMonthY = 1
	.ShowYearScroll = .F.
	.MinDate = {^2001-1-1}
	.MaxDate = {^2001-1-31}
	.Date = {^2001-1-1}
endwith
100. How can I remove an event 
with thisform.Calendar1
	.AutoSize = .F.
	.FixedCellWidth = 36
	var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
	var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
	var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
	var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
	var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.Images(var_s)
	.Events.Add(thisform.Calendar1.Date).Image = 1
	.Events.Remove(thisform.Calendar1.Date)
endwith
99. How can I count the events 
with thisform.Calendar1
	var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
	var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
	var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
	var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
	var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.Images(var_s)
	.Events.Add(thisform.Calendar1.Date).Image = 1
	var_Count = .Events.Count
endwith
98. How can I clear all events 
with thisform.Calendar1
	var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
	var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
	var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
	var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
	var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.Images(var_s)
	.Events.Add(thisform.Calendar1.Date).Image = 1
	.Events.Clear
endwith
96. How can I assign an icon to a date 
with thisform.Calendar1
	.AutoSize = .F.
	.FixedCellWidth = 36
	var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/"
	var_s = var_s + "oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/"
	var_s = var_s + "wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx"
	var_s = var_s + "3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
	var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.Images(var_s)
	.Events.Add(thisform.Calendar1.Date).Image = 1
endwith
95. How can I enable or disable a date 
with thisform.Calendar1
	.Events.Add(thisform.Calendar1.Date).Disabled = .T.
endwith
94. How can I mark or highlight a date 
with thisform.Calendar1
	.Events.Add(thisform.Calendar1.Date).Marker = .T.
endwith
93. How can I assign a tooltip or a comment to a date 
with thisform.Calendar1
	with .Events.Add(thisform.Calendar1.Date)
		.Comment = "This is a text that shows up when the cursor hovers the date"
		.CommentTitle = "T I T L E"
	endwith
	.HideSelection = .T.
endwith
92. How can I assign any extra data to a date 
with thisform.Calendar1
	.Events.Add(thisform.Calendar1.Date).UserData = "your data"
endwith
91. How can I change the background color for a date 
with thisform.Calendar1
	.Events.Add(thisform.Calendar1.Date).BackColor = RGB(255,0,0)
endwith
90. How can I change the foreground color for a date 
with thisform.Calendar1
	.Events.Add(thisform.Calendar1.Date).ForeColor = RGB(255,0,0)
endwith
89. How can I draw a date as strikeout 
with thisform.Calendar1
	.Events.Add(thisform.Calendar1.Date).StrikeOut = .T.
endwith
88. How can I underline a date 
with thisform.Calendar1
	.Events.Add(thisform.Calendar1.Date).Underline = .T.
endwith
87. How can I make italic a date 
with thisform.Calendar1
	.Events.Add(thisform.Calendar1.Date).Italic = .T.
endwith
86. How can I bold a date 
with thisform.Calendar1
	.Events.Add(thisform.Calendar1.Date).Bold = .T.
endwith
85. How can I get the last visible date being displayed in the calendar 
with thisform.Calendar1
	.ShowNonMonthDays = .F.
	.Events.Add(thisform.Calendar1.LastVisibleDate).Comment = "This is the last visible date"
endwith
84. How can I get the first visible date being displayed in the calendar 
with thisform.Calendar1
	.ShowNonMonthDays = .F.
	.Events.Add(thisform.Calendar1.FirstVisibleDate).Comment = "This is the first visible date"
endwith
83. How can I hide the ticker that's shown for dates that have a tooltip or a comment 
with thisform.Calendar1
	.CommentBackColor = .BackColor
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
endwith
82. How can I change the visual aspect of the dates that have a comment or a tooltip assigned 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.CommentBackColor = 0x1000000
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
81. How can I change the visual aspect of the dates that have a comment or a tooltip assigned 
with thisform.Calendar1
	with .VisualAppearance
		.Add(11,"c:\exontrol\images\normal.ebn")
		.Add(1,"CP:11 4 2 -2 -2")
	endwith
	.CommentBackColor = 0x1000000
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
80. How can I change the color to highlight the dates that have a comment or a tooltip assigned 
with thisform.Calendar1
	.CommentBackColor = RGB(0,0,0)
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
79. How can I hide the days that are shown in gray, and doesn' belong to the month 
with thisform.Calendar1
	.ShowNonMonthDays = .F.
endwith
78. How can I change the color for non working days 
with thisform.Calendar1
	.NonworkingDays = 6
	.NonworkingDaysPattern = 10
	.NonworkingDaysColor = RGB(255,0,0)
endwith
77. How can I change the pattern or the style to draw the non working days 
with thisform.Calendar1
	.NonworkingDays = 6
	.NonworkingDaysPattern = 10
endwith
76. How can I show or hide the non working days 
with thisform.Calendar1
	.NonworkingDays = 0
endwith
75. How can I specify the non working days 
with thisform.Calendar1
	.NonworkingDays = 6
endwith
72. How can I specify the min and max years to scroll within 
with thisform.Calendar1
	.MinScrollYear = 2001
	.MaxScrollYear = 2010
endwith
71. How do I let the tooltip being displayed longer 
with thisform.Calendar1
	.ToolTipPopDelay = 10000
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
69. How can I change the date that gets the focus 
with thisform.Calendar1
	.Date = {^2001-1-1}
	.FocusDate = {^2001-1-2}
endwith
68. How can I select a new date 
with thisform.Calendar1
	.Date = {^2001-1-1}
	.Value = {^2001-1-2}
endwith
67. I've seen that the width of the tooltip is variable. Can I make it larger 
with thisform.Calendar1
	.ToolTipWidth = 328
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
66. How do I disable showing the tooltip for all control 
with thisform.Calendar1
	.ToolTipDelay = 0
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
65. How do I show the tooltip quicker 
with thisform.Calendar1
	.ToolTipDelay = 1
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
64. How do I call your x-script language 
with thisform.Calendar1
	.ExecuteTemplate("BackColor = RGB(255,0,0)")
endwith
63. How do I call your x-script language 
with thisform.Calendar1
	.Template = "BackColor = RGB(255,0,0)"
endwith
62. Can I change the font for the tooltip 
with thisform.Calendar1
	.ToolTipDelay = 1
	with .ToolTipFont
		.Name = "Tahoma"
		.Size = 14
	endwith
	.ToolTipWidth = 364
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
61. How can I change the caption of the Today's button 
with thisform.Calendar1
	.TodayCaption = "Azi"
endwith
59. How do I unselect a date 
with thisform.Calendar1
	.SingleSel = .F.
	.Date = {^2001-1-1}
	.SelDate = {^2001-1-2}
	.SelDate = {^2001-1-3}
	.SelDate = {^2001-1-4}
	.UnSelDate({^2001-1-3})
endwith
58. How do I get the list of selected dates 
*** SelectionChanged event - Fired when the selection is changed. ***
LPARAMETERS nop
	with thisform.Calendar1
		DEBUGOUT( .SelDate )
	endwith
57. How do I select multiple dates 
with thisform.Calendar1
	.SingleSel = .F.
	.Date = {^2001-1-1}
	.SelDate = {^2001-1-2}
	.SelDate = {^2001-1-3}
	.SelDate = {^2001-1-4}
endwith
56. How do I get the selected date 
with thisform.Calendar1
	.SelDate = .Date
endwith
55. How can I build a date expression 
with thisform.Calendar1
	.Date = .DoDate(2001,1,1)
endwith
54. How can I select a new date 
with thisform.Calendar1
	.Date = .DoDate(2001,1,1)
	.SelDate = .DoDate(2001,1,2)
endwith
53. How can I select a new date 
with thisform.Calendar1
	.Date = {^2001-1-1}
	.SelDate = {^2001-1-2}
endwith
52. How can I change the browsed date 
with thisform.Calendar1
	.Date = {^2001-1-1}
endwith
51. How can I show or hide the buttons that in the header 
with thisform.Calendar1
	.ShowYearSelector = .F.
	.ShowMonthSelector = .F.
endwith
50. How can I show or hide the buttons that scrolls the years 
with thisform.Calendar1
	.ShowYearSelector = .F.
endwith
49. How can I disable changing the month in the months selector 
with thisform.Calendar1
	.ShowMonthSelector = .F.
endwith
48. How can I change the visual aspect of the selected date, using your EBN 
with thisform.Calendar1
	.BackColor = RGB(255,255,255)
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.SelBackColor = 0x1000000
	.SelForeColor = .BackColor
endwith
47. How can I change the colors for selected dates 
with thisform.Calendar1
	.SelBackColor = RGB(0,0,0)
	.SelForeColor = RGB(255,255,255)
endwith
46. How can I change the color of the line arround a month 
with thisform.Calendar1
	.DrawBorderLine = 2
	.BorderLineColor = RGB(255,0,0)
endwith
45. How can I change the style of the line arround a month 
with thisform.Calendar1
	.DrawBorderLine = 2
endwith
44. How can I specify the number of months being displayed 
with thisform.Calendar1
	.ShowTodayButton = .F.
	.ShowYearScroll = .F.
	.MinMonthX = 2
	.MaxMonthX = 2
	.MinMonthY = 2
	.MaxMonthY = 2
endwith
43. How can I lock the control, so user can't select a new date 
with thisform.Calendar1
	.Locked = .T.
endwith
42. How do I change the first day of the week 
with thisform.Calendar1
	.FirstDay = 2
endwith
41. How do I change the name of the months 
with thisform.Calendar1
	.MonthNames = "Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec"
endwith
40. How do I change the name of the months 
with thisform.Calendar1
	.Object.MonthName(1) = "Jan"
	.Object.MonthName(2) = "Feb"
	.Object.MonthName(3) = "Mar"
	.Object.MonthName(4) = "Apr"
	.Object.MonthName(5) = "May"
	.Object.MonthName(6) = "Jun"
	.Object.MonthName(7) = "Jul"
	.Object.MonthName(8) = "Aug"
	.Object.MonthName(9) = "Sep"
	.Object.MonthName(10) = "Oct"
	.Object.MonthName(11) = "Nov"
	.Object.MonthName(12) = "Dec"
endwith
39. How do I change the name for each week day 
with thisform.Calendar1
	.AutoSize = .F.
	.FixedCellWidth = 24
	.FixedCellHeight = 16
	.WeekDays = "Su Mo Tu We Th Fr Sa"
	.HeaderForeColor = RGB(255,0,0)
	.HeaderBackColor = RGB(255,255,255)
endwith
38. How can I specify the width and height for dates being displayed in the calendar 
with thisform.Calendar1
	.AutoSize = .F.
	.FixedCellWidth = 22
	.FixedCellHeight = 16
endwith
37. How can I specify the width and height for dates being displayed in the calendar 
with thisform.Calendar1
	.AutoSize = .F.
	.FixedCellWidth = 32
	.FixedCellHeight = 24
endwith
36. How do I change the appearance for dates in the calendar 
with thisform.Calendar1
	.AppearanceDay = 1
	.BackColor = 0x8000000f
endwith
35. How do I specify the color for the grid lines 
with thisform.Calendar1
	.DrawGridLine = 1
	.GridLineColor = RGB(255,0,0)
endwith
34. How do I draw the grid lines 
with thisform.Calendar1
	.DrawGridLine = 1
endwith
33. How do I change the foreground color for the week days and week numbers header 
with thisform.Calendar1
	.HeaderForeColor = RGB(255,0,0)
	.ShowWeeks = .T.
endwith
32. How do I change the background color for the week days and week numbers header 
with thisform.Calendar1
	.HeaderBackColor = RGB(255,0,0)
	.ShowWeeks = .T.
endwith
31. How can I show or hide the 'Today' button 
with thisform.Calendar1
	.ShowTodayButton = .F.
endwith
30. How can I show or hide the scroll bar that changes the year 
with thisform.Calendar1
	.ShowYearScroll = .F.
endwith
29. How can I show or hide the header that displays the months 
with thisform.Calendar1
	.ShowMonth = .F.
endwith
28. How can I show or hide the header that displays the week days 
with thisform.Calendar1
	.ShowDays = .F.
endwith
27. How do I show or hide the weeks 
with thisform.Calendar1
	.ShowWeeks = .T.
endwith
26. How can I change the visual appearance of Today date in the calendar 
with thisform.Calendar1
	.MarkToday = .T.
	.Object.Background(14) = RGB(255,0,0)
endwith
25. How do I mark the Today date 
with thisform.Calendar1
	.MarkToday = .T.
endwith
24. How can I show the control's selection even if the control loses the focus 
with thisform.Calendar1
	.HideSelection = .F.
endwith
23. How can I hide the control's selection when the control loses the focus 
with thisform.Calendar1
	.HideSelection = .T.
endwith
22. How do I enable single selection 
with thisform.Calendar1
	.SingleSel = .T.
endwith
21. How do I enable multiple selection 
with thisform.Calendar1
	.SingleSel = .F.
endwith
20. How do I disable or enable the control 
with thisform.Calendar1
	.Enabled = .F.
endwith
19. Can I change the forecolor for the tooltip 
with thisform.Calendar1
	.ToolTipDelay = 1
	.ToolTipWidth = 364
	.Object.Background(66) = RGB(255,0,0)
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
18. Can I change the background color for the tooltip 
with thisform.Calendar1
	.ToolTipDelay = 1
	.ToolTipWidth = 364
	.Object.Background(65) = RGB(255,0,0)
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
17. Can I change the default border of the tooltip, using your EBN files 
with thisform.Calendar1
	.ToolTipDelay = 1
	.ToolTipWidth = 364
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(64) = 0x1000000
	.Events.Add(thisform.Calendar1.Date).Comment = "This is a text that shows up when the cursor hovers the date"
	.HideSelection = .T.
endwith
16. How can I change the visual appearance of the selected month, in the months selector, using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(15) = 0x1000000
	.Object.Background(16) = RGB(255,0,0)
endwith
15. How can I change the visual appearance of Today date in the calendar, using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\pushed.ebn")
	.Object.Background(14) = 0x1000000
	.Object.Background(20) = RGB(1,0,0)
	.SelForeColor = RGB(0,0,0)
	.MarkToday = .T.
endwith
14. How can I change the visual appearance of separator between calendar and 'Today' button , using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(13) = 0x1000000
endwith
13. How can I change the visual appearance of the scrolling bar for years, using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.Object.Background(12) = 0x1000000
	.Object.Background(11) = 0x2000000
endwith
12. How can I change the visual appearance of 'Today' button, using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.Object.Background(9) = 0x1000000
	.Object.Background(10) = 0x2000000
endwith
11. How can I change the visual appearance of header , using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(8) = 0x1000000
	.HeaderForeColor = RGB(255,0,0)
endwith
10. How can I change the visual appearance of header that week numbers, using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(7) = 0x1000000
	.HeaderForeColor = RGB(255,0,0)
	.ShowWeeks = .T.
endwith
9. How can I change the visual appearance of header that displays days, using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(6) = 0x1000000
endwith
8. How can I change the visual appearance of the drop down button, using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
	.Object.Background(4) = 0x1000000
	.Object.Background(5) = 0x2000000
endwith
7. How do I change the visual appearance of the left and right buttons in the calendar's header, using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(2) = 0x1000000
	.Object.Background(3) = 0x1000000
endwith
6. How do I change the visual appearance of the up and down buttons in the calendar's header, using EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Object.Background(0) = 0x1000000
	.Object.Background(1) = 0x1000000
endwith
5. How do I change the control's foreground color 
with thisform.Calendar1
	.ForeColor = RGB(255,0,0)
endwith
4. How do I change the control's background color 
with thisform.Calendar1
	.BackColor = RGB(200,200,200)
endwith
3. How can I change the control's font 
with thisform.Calendar1
	.Font.Name = "Verdana"
endwith
2. How do I change the control's border, using your EBN files 
with thisform.Calendar1
	.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
	.Appearance = 16777216
endwith
1. How do I remove the control's border 
with thisform.Calendar1
	.Appearance = 0
endwith