Type | Description | |||
ID as Long | A Long expression that indicates the index of the skin being added or replaced. The value must be between 1 and 126, so Appearance collection should holds no more than 126 elements. | |||
Skin as Variant |
The Skin parameter of the Add method can a STRING as explained bellow, a BYTE[]
/ safe arrays of VT_I1 or VT_UI1 expression that indicates the
content of the EBN file. You can use
the BYTE[] / safe arrays of VT_I1 or VT_UI1 option when using the EBN file
directly in the resources of the project. For instance, the VB6 provides the
LoadResData to get the safe array o bytes for specified resource, while in
VB/NET or C# the internal class Resources provides definitions for all files
being inserted. ( ResourceManager.GetObject("ebn", resourceCulture) )
If the Skin parameter points to a string expression, it can be one of the following:
|
Return | Description | |||
Boolean | A Boolean expression that indicates whether the new skin was added or replaced. |
The identifier you choose for the skin is very important to be used in the background properties like explained bellow. Shortly, the color properties uses 4 bytes ( DWORD, double WORD, and so on ) to hold a RGB value. More than that, the first byte ( most significant byte in the color ) is used only to specify system color. if the first bit in the byte is 1, the rest of bits indicates the index of the system color being used. So, we use the last 7 bits in the high significant byte of the color to indicates the identifier of the skin being used. So, since the 7 bits can cover 127 values, excluding 0, we have 126 possibilities to store an identifier in that byte. This way, a DWORD expression indicates the background color stored in RRGGBB format and the index of the skin ( ID parameter ) in the last 7 bits in the high significant byte of the color. For instance, the BackColor = BackColor Or &H2000000 indicates that we apply the skin with the index 2 using the old color, to the object that BackColor is applied.
The skin method may change the visual appearance for the following parts in the control:
For instance, the following VB sample changes the visual appearance for the selected date. The SelBackColor property indicates the selection background color. Shortly, we need to add a skin to the Appearance object using the Add method, and we need to set the last 7 bits in the SelBackColor property to indicates the index of the skin that we want to use. The sample applies the "" to the selected date(s):
With Calendar1 With .VisualAppearance .Add &H23, "D:\Temp\ExCalendar.Help\seldate.ebn" End With .SelBackColor = &H23000000 End With
The following C++ sample changes the visual appearance for selected date:
m_calendar.GetVisualAppearance().Add( 0x23, COleVariant("D:\\Temp\\ExCalendar.Help\\seldate.ebn")); m_calendar.SetSelBackColor( 0x23000000 );
The following VB.NET sample changes the visual appearance for selected date:
With AxCalendar1 With .VisualAppearance .Add(&H23, "D:\Temp\ExCalendar.Help\seldate.ebn") End With .Template = "SelBackColor = 587202560" End With
where the 587202560 value in hexa representation is &H23000000
The following C# sample changes the visual appearance for selected date:
axCalendar1.VisualAppearance.Add(0x23, "D:\\Temp\\ExCalendar.Help\\seldate.ebn"); axCalendar1.Template = "SelBackColor = 587202560";
where the 587202560 value in hexa representation is 0x23000000
The following VFP sample changes the visual appearance for selected date:
With thisform.Calendar1 With .VisualAppearance .Add(35, "D:\Temp\ExCalendar.Help\seldate.ebn") EndWith .SelBackColor = 587202560 EndWith
where the 587202560 value in hexa representation is 0x23000000, 35 is 0x23 in hexa
The screen shot was generated using the following template:
VisualAppearance { Add( 1, "gBFLBCJwBAEHhEJAEGg4BV4Fg6AABACAxWgKBADQKAAyDIKsEQGGIZRhhGIwAgaFIXQKMUIxVAcLQxCgCYRhYABRiUAoJkjkMYhSDOFgzARHcxRPDgARrDyZQAkOQ5FDGFo+ShFQxTRC9CQpHaEYqkeA3fgmTYXTxJM7yfQVFxlCwTIwFGQqJgmVpPABYERyWKoSzJMyERpGCyIDqqbJXVxFYj3DCscw/KIYaqlGS5Ni+IZ2TLNMz4BAdEQfKSEaAgOToboaE5GB5GeRRbT1HYtKDEcQhepIbpaH5YQjkMBibBNZ4pAavcroeK7FqeI5ua7ach5fisB5EAARYREGrcEqPGZ5ShjGJ1MK0CxzIwDboBPbNdwXP56cIAAx8IJbD0GJQGoIQ1jgGAbhmTZXGsLZ7AsTpKDEVolG0QAaJyA4bleZgCiEJpjHmSJaGENgLgwRpTgUCAhAMEIElCSZ+EUAxkCQKB2huJR0BgRQPkAPZuFOCpSGgewckOUACBSBYhFgXgagYYZIGIHoGmGeB2CCCJiCiFghgmYhIiIJoFmEEZtEwAAilKFB9JWUooi2DRjHiWg4g6Y4onYOYPmOSQCD6EBkEkDhGhCJIJBYSYRmOCJIFKCxhmMBIuCwZQpFIU4VGWCReFqFYlkkZjpGWaYGGCGJlnmFhihmJhJh4F4Hg+eY0kULILFmPhxhwJwplYdIdmcOZmHaHongmbh+h8aAJnKAofmgOgGHKGxPnmLgXiIDISli+BonoOtEGkKhWhGJZpEoYoWiYaZKG6HomioCh2iGJ5pAoIoKgUaIDDCOgvCqKoyiuKxrAqPuCisSpGjWLJrGqZo4i6ax6naOoviuSo2iaBRmkmNJQC+DALB6SYyCyKw2kyM5sjsRpOjSLUIFaNRtgsUpajWbY7GaSowlAOguG0NQMCMEpkjmLhbh6ao6G6S4im6OpunuNpwjybwrlacY9m8S5inaOZuAsFJ/DYDBjCMAJAjAHAPAaQRwgwEwKkGcI8CcDJDnCbBHA2RJxAwUwSkCb5bgifw3AyMwzByR4xlwfwikgchMgMJpInIfIXCiSpyiyNwpkucpMkMLpHnGGoiG0OAMnMQw4k6M4cm8PpPHR2BCk+dA9AcRJRnQbQnEWUp0g0MxKk6cxVgYbQ5eSUxUlWNRdF8WpWHWTRjF6Vp1n0dxglidgthcYZZnYTYjGaVZ1BoIJoDWTYNj8cZcDcLZXHSXZ3D2M4dovQ3gbG8P0Xw8ANjnAKL8eAfAHDlFsM0U4WRbBtHiFwM4FxjDyA4H8Eoxw5CcEeCsZI8huDPBiM0eQ/B3g1GeHMTgbwIB/eYPkX40h6D9BuFEao9QuhvCmNceonRDhdGwPYTonw2jZDuB0V4cxtj1A67AOInA+j/EGOAPAXgXiJHGPgPwTxGjlDyB4L7zB9AeDOKUc4+g/CPEKNETw5wcjPHYPsPw1xcjvH2N8B4ux4j8A+CcYo8h+gfB+NUeYfRPhPiiPsToGR4B0E6D8T74A/DfGePEfo/h/jvHoP8T44x/iACgAYAQQAEANAAOAHgBQ/DPGQHUBwoR4gDDBA4QQEAnAJCCFgEYBRwCkAwIIaAZgHBBFwD0AwoQCAdEIDAPwBhdAxHkDsA4ZATiFBgKICoQhsBZAWOELgMRCjQGUBgIYOA2gNDCMQGghwoDeA6MMTAVQEiHDQO0D4MUXDEBQIkCI4gaBJEQLEFwJAiDIEqBMMQhAniKCiDoFQRQMCrAoOIBYowPhDF4HcYouBdgXBEPQMIjAIiOBeMYLAxQMijBIGcRoURTA2CMIg144w+BtEWNENAeBHgRikGMXgdqgjuB6EcbA8wPjjHIIAR40gDBCCQDkBoIBSBEEKJEGQHgdTVHsDwQ4lBHiSBkEIJISQsgpBKOQTgmRJDSDUEwJIuQegnDKAQTglApB+CiMpboI0kj0A+HIUwVRlCpCyCscodBYiVFkM4LASwkhlBaGUYgtxLhSG0F4JYmQ9guHKEujggxqB6GYDkRYMQTA0GSJkCYLgxjMGyJUGYpgyDPE0FMIwagmgJFaDQcwvBqiYGmAgPYjw4j5BuGYfg3hOATEcHEJwWRhg5HOCQdAnBpimDsE4XI3QdCnEIO0TwMxfBumqPoHwRxmD3E+DMcQfQnjZHyD8c58xPjUAVKYHQDQghoCKAQUIVAPTnEyPUHohxoD6A+LQIwiRogqBSEUdAtQMiiFoG4RlfwahHDSAUD4pAqB6EkFIDQSwkDoEXRxLAfgpC6C2EsFIdQYimAoM4S40wtBlCaKkUoNxThUHMJ4KYig+hOHSP0HopRqCojeNEfoUQ1A9CMKkuApQqDaEmFMdQZQoCpGqEYVQVQdCtCoKoYoVRVg1C8KIV41AxCMGoEUMIrAqiOFkFYLQzQsjrCKGkVoVRXCzBIOQUAUwIhqBSK4JArhdAiFUO0Lg6xeh1FeAgUwtxKDSAEQEA=" ) Add( 2, "gBFLBCJwBAEHhEJAEGg4Ba4Fg6AABACAxWgKBADQKAAyDIKsEQGGIZRhhGIwAgaFIXQKMUIxVAcLQxCgCYRhYABRiUAoJkjkMYhSDOFgzARHcxRPDgARrDyZQAkOQ5FDGFo+ShFQxTRC9CQpHaEYqkeA3fgmTYXTxJM7yfQVFxlCwTIwFGQqJgmVpPABYERyWKoSzJMyERpGCyIDqqbJXQiBUYCHTkOxzD6oRhqaSZLi2L4hXbMcyzPgMByRB6pIRoCA5OhuRoTUYHUZ5Ha0By/JyMLxqOgYbpaH5YQjkUBibBITy7SzMKYzGK7FqeI5ua7ach5fBMYwHUQABJhEQdHwWdYkSZKGK4ZSwbQLHKjAL3cCtdreFquawJM77CIXD0GILEWNqJGaBx9HiRRwHGHAwACT4KDaaxRGENYdMUN4Gmab46BGHRticZZ1jeRJqlSLZ+hsb5eHWW5XDEAwcAcUZMGgGRGECOBiBsRwFAgEBAkQ1Yyu8QJZAkCgQheOAAG8FxgGEFA/ACd59E4KxJiGbBzA8QAIh4KYKCKKI2CyC5ijiRgugyIwIk4NoNGOCJSDqDZjjiZgqgkB42ioQApEeURIl4M5MGOXJnDmZIpDIS4TGUCQ+FKE4lEkRhVhSZRpGYWIWmUeR2FqF4lKmRoRAUKQCDGGIPFOFJlhoZo5iobIbmaaZGG2HJnAmUhyh0Z4Jl4eodieSZmH2HpmkmCgqgwT56BScw4k4OgegmIgoioNoMiOaI6EaDokikChOhaJRpgoUoaiWaY6GaCohWiDgqigDwTgSYYpGoeoaiiKpqiqNopiuapKkKLosGsSpOjaLIrgqVo5i2aoKgKIoKCoA48l8N5sCsEpDjEbILB6SoxiySwmk2MpsmsRpQjSbJ7FaUo1i0SwWj6CgoEoFJtDcTZbH6YY4C4K4WmSOZuDuJpmjqLoLi6bo7G8C4ynKO5vDuRpijaUA6g6BQ6k2MxunyP4vlufwCkAcBMAMBpAnAfAXAiQpwiwNwJkOcJMEMDo/m+Cx0n8OhNhMZwYkaMYcG8HpHHIDBzCKR7sgcJJJnIbInCWSpygyMwqkacRbmjw4NHMYw07MXJfDqThzkyYw+k6c58ncQJQnQLQXEGUZ0E0IxGk2cwbAKBQ5g0UxbFCVI1B0TxWlUdfmFqVZ1j0ZxcledZtgcXZYnYDYTGKVJ0lWBoFDkDQzFMbJbjaXY/HKXB3E2Qx2lydx9lcPEXo7wtjuHmL8d4nADD9FuO0GoARiBoE0FwH4ExiBxC4G8DIxx4h8EeB0ZIcgOCfU+PMDgpwajLHmHwZ4FRhDQFOAETwaA6BdBOEcaQ9QOg/CqNMOonQnsVHqN0R4YRsj1H6K8Mo2w7CdBeEAP4m3WCdG8Pcfo9xAjhHwF4F4gxxj4OoI0cg+RPBfE6OUPQHg3ijHOPgDo2RcBlEyJ4X4sx2B7C8O8XI7x9h/AeL2DYHwPjNHkP0D4JxqjzH6H8J4tRuibCMEESo+B/B/EuOkfY/hvjPHWP0f4Hxzj0H+GAAY/xABPH0AIIAGAFgAG+KMXYGwBgYDIEAXEsAQB0AiIICATgDjBCwCUAooBSAXEGFAMwDggiIB6AYcA/AOiBGcOwNYDAgiNPCDwEwhQICuXkNgKYCxwhkBgIUaAxgNBDBwG0BgoRiA1EODAbwFAdmBBgIYEgPxEAxAECEIgWBEgRHEBwJIiBogqBIEQXAnQJhiEIEwRQUQfApGKBgQg7hjCQGABgKIZgWjFFQLkC44h6BhEWLERwMAjBIGKBkMYRAziNCiJoGwRhMDbA0OIcYuwNACHwGAI4OB1gdBGLQPIjwIjuB2McbA9QPijHIH8SAUgDBCCQAkBoIByA8EKI6aIZwFjBD6CMMgfBHCSAkE4JISQsgjBKOQUgmBJDSDNWgXIPQTClAIJ0SgMg/BInmJgFwhRyCnEqDIUQVQlDZCyCscoXBYiVGkMoLASwchtBaGUYgtBLhSG8F0ZYmQqUWCwLgC4cwDBhGYCkRIMRzA0GSJgWYLgyBMGSJUGZhRniaCmDoNQTQMirBoOYEYuwMgiGwFwZouRdg3BMPQcInAJiODeM4LIxQcinBIOcToUxTB2CcIkboOhzh8HaJuaIYxFhBDeD0M4vB7CfAmO4PoTxsjzB+OccoABPjUAMIIKAOgGhAFQEUAooQaAeD5PMRQLBCitAeKIGgQhEhRC0CkIo6BOgZFENQNQjAoi6B6EcNIBQOCkCoH4SI0gNAkosBgWAFg6CmsgKoLISx0h1BiKUWgzhMBTCUGUJoaRig3FOFQbQngpiaD2E4dIYxdgYBELgLA1AdCLCiCoGoSRUlwFGNQbQlQpiqDKE8VQVQjZlAUK0Kg6hehVFQM0UoMQVABD8CsAofQvisBqIIWIVgtDJCzUENIrBqiqFoFYXQ3QthrEKGwVwVRfC5GsIUIAoBLDiCGEgWodQoBXG0P0L47ACiBFgFYBwwgsBbAaGEagKgxBMESJgUwJACB5DGNEeokQji2CcMjGoJQyhRHKIwFIpACEBA" ) Add(3, "gBFLBCJwBAEHhEJAEGg4BW4Cg6AABACAxWgKBADQKAAyDIKsEQGGIZRhhGIwAgaFIXQKMUIxVAcLQxCgCYRhYABRiUAoJkjkMYhSDOFg1ARHcxRPDgARrDyZQAkOQ5FDGFo+QiNMTDFLELyLECEZBjWCZHgNf4JU7Fc6SLL8XyHJqZIqCCKAagkDIJRZWFQgBYcJxWGoSbLtGgRQquAw1WzIcbxNKMLy3AalIpnGL6TDGWIpSrLMr3TbcPxrG7CYDnOCZdpWQZDUbEdDgXRMEzvPSBbCqCKLdw6b5XTjWUI5JAYPQSC6wKYzOjschuaJqSLcFrABqVZQxOjRYRCHJtJwmZqMSZKErUDTAbQLUKMLpAC6dExjPqKcBfXBSfwUG0WI5m8IB8iCLR7HuT4dGuNhjC0fYzGeNYMFYIpAGgT4uAYDpcneYoRGiMAqBIbg3hyDbcGCOJEG0HARGCWR1BCBJYAkFwNhCEIhAkdwQDYXQCAYER3CmXw/s6TJeCGCYiioGIGiGGBuB6BxiAgcgigeYg4gYJIFE2ZoyCiBpMiMYJeC8TRjG4MIMiMGJODaDRjgiUg6g2Y44mYLYFmGGIgACBpOiOPJyDeTpDjyUA4g4aQuE2EwkmklwUmSeRWFKFYlEkOg/gaZA4GSew/A+U5cnkPoOgOSJ0hIDp5iIaoSGaOYmGyG5mmmRhthoJJok4XIGk+eZmF8PxPGmDJtDyTxZhSdIgigSYagWIJoGoJoIiKaAplITIdiGGR0iqHliGydQ+E+OZ0noPAPFOWocieKZaH6IooGoSoCiaJ5olkJh1gwZx4GaFIlimChqiOKZqFqTo2ikaoZCqD4rCkGZiHqGApHoZhji2axLBaRIqCYag4maJAKioSovjAKwbA6NY0mwaxSkiGZqiqbJbisaQ6nyfYwGsKxamKNRqGqZorjaa5ajqXo4C0K4SkeOJuGsapcjObZ7ESeomi+CdYD24Z2nyP5piuRpLi8LJanqFY0A+OwHAqJgwjwJwMkOcJsEcDYY4sKpMiSJBTkoe5GmYDBwn2R4yAwdwikecg6kCe4aCWOhGCuBhxhoUwukucwMkcMpMmePBmBuEIUmyLglk6YhMnYJpPraBgWGsEAQICA" ) Add( 4, "gBFLBCJwBAEHhEJAEGg4BDgGg6AADACAxRDAMgBQKAAzQFAYZhxBaERiGIZ4JhUAIIRZGMQxXAcMQ1DICYRhQABRiUAoJDKMchxEKcPBmAiPZhjEYocheGj/QjOEByHIcShjDyfZQjaB5SjaMo8RpJcBzUAFGQrHqSaAlag6KjGHgmRoKMhQTD1KyZJytYDGIZRFiuZIjDSMFiwTZNVxlDyRYpEewaGoWGZQDDVMoyWKUWxREK7JimSwqcwGO50T5UVBRDD0P4bBIPJpwO5aejmGp4YpDNSULS+IQSFqEbjjWCcVovF4RWbqFrABZtUTVOKNK5zaAxDgkIaFYZTcIzdbVfQbKobBqxeKeDAAB50AruG44PAkTRRXwABj4AY1FcHQJiwQJqjWKAYBuFZLjMapsHqPRtjMXxJmUVRqiGWBIgOF5KkAawtEKUYfkKWgtBoR44FCGIlBeKwaHcUA3B2Ix2FOE59DiAYWAeJQJAKEIRjgbwcgaUYEGwC4GCGNBwFCQQEAwQgTEMKBlBYDYQhC4Z2kABpdiMBgRGOcAPHuE4SjSGgekcMJ0ACDBjDiSg0g2YxomYNYOmOCJyDqDxkAifhCg+JBJAYRYQmMSI4HsaYkiKFB9BSC5SiiLYUGUORKFSFZlGkZhVhaZYJHIWoXGYCR+GKF4mEmBhlhiZRJDgUoSiOMwEi4LBmmmQhvhwZxJk4docieCZWHmHZnimdh8h+Z46AYfogigCgODSDpggMFIyC0aIqDKC4jGkCg+1uKRKEaFYkmkahmhiJppHodoaieKZKDYCIhmMSAgkkLYLhqHopioKoqjaLIrmqOpGi6LIrAqTo2i0a4KlKOotmuOpmiqKJjCoIgGDMC4inKRIxiwWwekqMhsksIpOjKbJ7DaUI0m0KxWlGNZtEsYpWjGbAEA6JYBg0Ap4kCOBuDuCpkjmbhriaZY6m6C4ymqOxvAuPpyjuLxLkadY8m4Sx2kIP5NEMCJEj8b57nsjRwCwFwBkGcBMCMBpCHCTAvA6QoxAwNwRkOcALmqXw/k2AwYkiRhxjwawckecZsgcHZInIDITCKSRygyHwqkmMq+C2SpxkwWgygIDZDCyTJNHMfJbDiTpziydw5k+c5NAMPpQHQTQPEbm4NBcSZRnODJJE2AaHjyUJUHUPRLFSVZ1G0ZxVladYNHMWpXHYDR/GKV42E2BxllidRNDoCA5A0MxTGyW42l2PxylwdxNkMO0XI7h9iuHiL0d4Wx3DzF+O8TgBh+i3HaFAGI0A1ibA4D8CYxA4hcDeBkY48Q+CPA6MkOQHBPgtGUPMDgpwajLHmHwZ4FRhO9CyLYNo9AugnCONIeoHQfhVGmHUToTwtjVHqN0R4YRsj1H6K8Mo2w7CdBeEAO4mxzD/DyN8O4vR/iFHAPgTwBxGjhHwP4F4kRyj5C8G8SY5x8ieEOJ0b49ADiZTkPobwxxXjsH2J4b4vR2h8A8O8YY7x+BfBeMkeY/A/hPGaPUPoHhnhAD2Jwc4Pxwj5D8D8T47R9D/A+Kceo+x/h/GePgf8cwAh/FgA4AAQAkAEH4N0AA+AOgjFMAUIAyALgDDAIQB4ggoA6AUEEDAKwCDgFoBkQYEA3ALGCNgGoBxQDkAaIEEYqA6gPEQEkBIoQWAnEKFAUwFghCIC6AocIfAWiGAgM4DIQwsBjAaOEUgOBDDQEiNAB4kRsA7BCPQIAhx4gGBEEQHAjQICiCIEURIMQPAlCINgTIExxBcCiIkaISgUBEAwHoHYRw0D5EWBENQLBii4F6BcMYBAuCMCiH4GIxgMDJAyOMGgaRGCxFcDQIwyBqgWA6AAfQHRxi+ByEcJA5wOhjGIHcR4URtA+COJgfYHhxj0ECJACQDgfjICykAUgJA6iOBGMQPAjxUgZBGKQNgjxJBSCMEqbwLQSDkF4JUSYEg3BNCSNkGYJxyDkFAJMaUEwHixHIDwUoNBUCUHkKYKwShchdBUKUQgrRLAyF8FkJYWQ0gtHKJwXIlhpDqC4EoTISgezUH2JgCYCgwDMByI0GIZgiDEEyFMDwZRmCZEyDMcwdBoiZFmE4NFfhSgwqGPwDwoxrBtCaMkW4NwzgEG+JwKYeg5BOAyMsHA5waDpE6BMVwcxnDZGqDsU4ZBuibBGNwPYjxkjpB6KcVg9xPhTHMH4J4iR+g+HOPwfooAKAOECFALQAwgjoBKAgUA0xoz8GiPIHwaA6gQFCPQIwigog6BaEQVAxQKijBoF4RtUqkjoG6CEUY1BFCQCiBoDQPhDjQH6KUCgqhKDSF0F0JYaRCgsFMFQXwmRpgaDSE0dItQcimFoO67Qyg6hKqGP4D4gx5ChCoEoQ4UQ1BFCOKkKoGsiiaE2FIdQdQoiqAqE4U41QtClCqKoUoRRUAjHoH4R46hchXFUO0L4rAqiGFkFYBQzQsDrB6GUVoFRXC1CsNoaYWx1hlDgK06wfQSDUE8IIFYxQ8ivCqO4XwVxtD9C+OwAogRYBVHqDUEwwhLCSEkDURISQLAtBGNgbYFQxisDKI8JA1gMCcAAIICQGwBgoDMA4RAUQFgVCiIQIQUBuifKWIAQIogRi42uBEGwRQCBUCMCIYwnwwDJGqH0CAAQBDXFAIIS4Xg2iYAALcGo6htiPH2HMN47RSi8FsKgDQ4AuA7DGF8Fo3Q8i3FsAyrYECAgA==") Add( 5, "gBFLBCJwBAEHhEJAEGg4BD4Gg6AADACAxRDAMgBQKAAzQFAYZhxBaERiGIZ4JhUAIIRZGMQxXAcMQ1DICYRhQABRiUAoJDKMchxEKcPBmAiPZhjEYocheMoWSLIcijDD0eRRDyDZrjaL5ZgmHonQK/cI0VDMdRLHqXKApCYYeCaGgpSJRUI1HRgAS7CqVRpEWwbDgkNQwWTAdj2TSlMwyE63JqmeKqODGU4pSqMUqyRINZxlGiBcAuK7qFgST4JT5DNAUHDWGQGDyacCoei8Uo3CKHQRUmY4fpWCaQQKLMI3BDtN4rLy6IhsKxJDqvLZoSLnOjYfBIRwSEKtL6nDJ7Wiie4NVKNQzYdC3CAPOIFdx3K4ZbrfPwADLwIzZZg2BMVoBlSawQDANwrhYAJWGqLYamsNpCDUU5JnYIQhlgSIDj2So+gALRilGH5DmQNIPHCYQxEmPxSDOXBAlwdoVmkUhPnUKgFFeQAFE0UwChCEY4G8HIGlGBBsAuBjWHAUABAQDBCBMQwoGUFgNhCEIhAkdoAAaYYlAYERjnADx7hSMo0hoHpHDCdAAgwYw4koNINmMaJmDWDpjgicg6g8ZAIn4QoPiQSQGEWEJjEiOB7FIQAJCiJQfEUIp0ioKxlCkUhThUZYJF4WoViWSRmF2FplmmBhghiZZ5hYYoZiYSRWE8FIkiibJBCuCwZj4cYcCcKZWHSHZnDmZh2h6J4Jm4fofGgCZygKH5oDoBoEg0I44ByRQsgsWgug2IwomoRoQiSaJ6FaEolikShehqJhpkoYoeiaaZ6HaDoBmiCJSAcMhLGKZooiqKoai6LorGsCoyjKK5rDqRo0i2axqmaNYumuCpyjqKpqEiSoJgETJCmiPIxGwewakiMpsisNpJjObJLEKTo0G0SxOlbigLFaWY1myCwFAOKYgFMQI+DALgrhKY45G6C4emqOYukuJptjqbprkacI8m6e5WnKPYvEuFpejCT5zFCQgxC+bACn+QBwEwDwGkCMIMBcCZBnCLA3AyQ5wjwRwOkSMQMAae44A+cxgkYMgxiwcwbkccgMH8IpHjITIHCWSJyGyJwokqch8jcKpLjKTB3BeDIgHMcJLDMMxsmMN5OHOTJvD7m4MncQZPnQLQXESUZ0D0JxGlKNIMmcMxXiAU4Ak8NA1C0UxTlUdYNF8WpVjWTRnF2Vp1m2BxglidZ9hcYpZjYTRXE+AZOEMTJUlsdp9jscJcncFsVw4xdjuE2MYdovB3ibG8P0XocANjvAGL8dwGwuAKDoBocyexihxB4F8Doxh5AcDO04eQfBHgpGWPIbgzwVjNHmBwc4NRijwGOPlCAmw+gfCWNIOg3QnhRGqPQfobwqjXDqJ0P4ZWVCdEOG0bI9h+ivCaNATo5h8i/G8Pcfo9xAjhHwF4F4gxxj4E8EcRrphPBfE6OUPQHg3ijHOPgDoCRzBxE4H4X4sx2NkHeLkd4+w/gPF6PEPgHwPjNHkP0D4JxqjzH6H8J4tRoCeHODkZ4+B/B/EuOkfY/hvjPHWP0f4Hxzj0H+GAAbcgnj6AEEADACwADfFGKED4AxSB0GALgDYAwQB0AiIICATgDjBCwCUAooBSAXEGFAMwDggiIB6AYcA/AOiBI8HUBwoR4gJDCDwEwhQICuAqEIbAUwFjhDIDAQo0BjAaCGDgNoDBQjEBqIcGA3gJC6AiPIHYBwyA/EQDEAQIQiBYESBEcQHAkiIGiCoEgRBcCdAmGIQgTBFBRB8CkYoGBCgPEOGgdoHwYhmBaMUVAuQLjiHoGERYsRHAwCMEgYoGQxhEDOI0KImgbBGEwNsDQ4hly0CGLwO4xwcDrA6CMWgeRHgRHcDsY42B6gfFGOQP4kApAGCEEgBIDQQDkB4IURw0RkB4qaPUEYZA+COEkBIJwSQkhZBGCUcgpBMCSGkGat4uQegmFKAQTolAZB+CNPoewPBDiUFOJUGQogqhKGyFkFY5QuCxEqNIZQWAlg5DaC0MoxBaCXCkN4LoyxMhVBSIcUA9APhzAMGEZgKREgxHMDQZImBZguDIEwZIlQZhmEIM8TQUwdBqCaBkVYNBzALloIMagehmi5F2DcEw9BwicAmI4N4zgsjFByKcEg5xOhTFMHYJwiRug6HOHwdomxphoD2I8OI+QehnF4PYT4Ex3B9CeNkeYPxzjlAAJ8agBhBBQB0A0IAqAigFFCDQDwep9D6B8EcZoDxRA0CEIkKIWgUhFHQJ0DIohqBqEYFEXQPQjhpAKBwUgVA/CRGkBoEoQxDjQH0B8WgprLiqCyEsdIdQYilFoM4TAUwlBlCaGkYoNxThUG0J4KYmg9hOHSEuWgwx4B+CoDoRYUQVA1CSKkCoLhRjUG0JUKYqgyhPFUFUI2bwFCtCoOoXoVRUDVAQH4R40R+hXDUP0LwrAKiOFiFYLQwwsjrBKGhBgphbBWF0N0LQqxChtFcDUXwrhXi0E4JQCAPQ8ivCqO4XwVxtD9C+OwAogRYBWAcL8EwtBtBS1sEYWISQRDGBIHsDoYh2B9EaLJbAwxKCgAkhcSAaQGDhFADqggLAqDGAiAkIYdiSCiAEAYRAjhsgJCACQbIFAIhRAwIsDQhRCGYHYEAAgCwxheGgCUPItkmjdG2IsNwgQ2jdGCLYZAHhuCgD2IUN47ROh6FuLUew4hsGxCAEAgIA==" ) Add(6,"gBFLBCJwBAEHhEJAEGg4BWMIQAAYAQGKIYBkAKBQAGaAoDDMOILQiMQxDPBMKgBBCLIxiGK4DhiGoZR5DAADEKoSxFEiTIRGUYJJgOK4tRYAUbxUA8EgNDSZIDfeawAjtf4XQiBMpSYJoZyFFyiBhjYZ4eDaM4JR5HcywHK8OwTHKeZ4naJoeh6UwAHQbZwCcYRWjhDxjIRIIjbJhmToDChCNb1LQAMQsSCnZjna67cr2W46X5gN6QTLyAERYZiGD4ThNfyzPbGMTwe7cEwHDaBZTgWZQTAIgIA=") Add(7,"gBFLBCJwBAEHhEJAEGg4BW8IQAAYAQGKIYBkAKBQAGaAoDDMOILQiMQxDPBMKgBBCLIxiGK4DhiGoZR5DAADEKoSxFEiTIRGUYJJgOK4tRYAUbxUA8EgNDSZIDfeawAjtf4XQiBMpSYJoZyFFyiBpjYZ4eDaM4JR5HcywHK8OwTHKeZ4naJoeh4CoJGIbZyHIZ5WhcMQ2TgjZhoJIITZsRjTUBiRBNJgBKqgAwiZIKPjOPp/YBgNZzVgTfoAICscChHAcHADDaNYDic54fhGKYdRDBcRwXK5f1yTaEYBAgI=") Add(8, "gBFLBCJwBAEHhEJAEGg4BDAGg6AADACAxRDAMgBQKAAzAFBIYhxASCBhGaCYUACCIVRhCIxRVBMLwzDACYRihaMSwZAYZRjkMYhSDOHgzARHcxRRDcBxrCyZYpkOQ5FDGHo+QjLUZRdD9CQzHaOYRkcAHfgmTYYTxJM7yfDwZSXIqERKjESZComA5LU7TFDxUKoSxXMqRRpGCxoJqqbIzR5IcSCPTsByNHK6ZIkagZKhqLYvSDeExzPK9bxlJCIaAgSpKDjnBgeRxNVbABYFHTHRKpaBqWp4Zh6WoDZBAYqwTalbSVSyBbBiSx7PAAMpoWzado7Fh2T5BBIRYREHI8CrmPZLSjLdJjMK2DQpQwDbxBPbNdACUQxcBQUocHAvGsA5PmUIQ1kgGAbhmPZWHgNg6lsdZLG0OIBgWfJaFAAIDhuR4EmAQAWmEaJTmOc5pEKI5RDmTigF0dwZDWAJ/FMYA2imWRXlCEApAkG4GnGSBtBgRpAjgYgbEcBRUBAQJECENAygWURXmwAAKB2JppEkBgRFOcAPHuERDnyLQmgeMZMD0AAimiQgvgwYxIk4NoMiOCJWDmDZjiidg8g+Y45AYPoQiQCJGCsHpahAAhHCkR5REiPQqgqWQ+FGFAlCkVhUhWZQ5GYVoWiWCRuF6FxmAkchiheZg5gYUoTAUKQeDgMBKmKRhshuJpZj4cocGcSZCHaHJnHmVh4h6Z4pnYeYfmeSgCH6IBjBiYgFOgIpWgiIoohoLoOiMaQKDKEojmkOhGhSJZpGoZoViaaYKHKGoimAWgWDGARMhKWI5ikah6hqKIqmqKsbCuapKkKLosGsSpOjaLIrgqVo5i2aoKgYL4hiAMwwjoLwsCsEpDjEbILB6SoxiySwmk2MpsmsRpQjSbJ7FaUo1i0SwWj4QJqDgDJQTeCx+mGOAuCuFpkjmbg7iaZo6i6C4um6OxvAuMpyjubw7kaYo2mwA58lQMIMEubp9j8L5sAcjRvnwFwCkGMBMB8CpCHCTAjA6QpwnwNp+j4LZTnyWAxgyDBfBmRgxiwdwckecY8gcHpIjIDIPCaSRygyEwqkmco8icGpFCKeAUlwMpMkyTw1k0MxsmcOJOnMfJ3DqT4zkyfxClAdBNANmh0H0Fw2kwFJIAyYAzk0DQ/FGVA1C0VxUlWdQ9GcVpWjWDRvF6Vx2A0cxiledg9gcUpTCAU4QlMNQ2i2MxrlsdwNj8cpbjcTZHHWLkdw2xnDxF6O4fY7h6i/DeJsNw0QAidAMLkWIwh4D8BuBEYo8QuBvAmMceInBDgdGQPITgn2mBzA4K8GYyx4gcAyP4OomwzDfCCNEOgPQPpZHqB0E4VRpj1D6E8LI1x6jdEeFtm4HRThlGiPMY4eRfBvHuF0c7XR8AdH+IUb4eBPAPEW4AbwTxIjlHwP4N4lRzh5E6O8HgeROBnA+KkdYehfC/FqOwfYnhji9HaPsfw7xgjxH4F8F4wx5j8E+EcZo64nC5GcHMfo3xDtxH8J8T47R8h/A+K8eY+x/hfHePgf43xuABD+NABQAAfgXB4D4A4SB0iBAgCoAgwBcAdAGGAQgDBBBQB8AkYIGAUgFHALQDIghYBuAYEEZANQBDgBwOoDoQxxARCEEgI4CQwhEBOIUKAmgLBCEwFsBQ4Q6AxEMBAZwFxhhYDKA0UIpARBzGGOQOwDhkB5AeKEdgPxEBRAMCIIgCBGgQHEDwIoiQIguBKEQbAkwJjiDIFARI0B/AdEcNEbQPgxC0CwIoeIZgXBFFwL0CwowCBdEYDEPwMQjBYGSBkcYHA0iMGiKoGgRQzytEOHgd4jgIjKBwMcHA7QOhjGIHQR4URvA9GOJgfIHxxj0ECI8WQDggBICSAUDg4w8DxA8CMdQRQkDJAuCMMghBHiSCkDoJQSQMgrBIOQWgmRJgSDcEsZI2QagnFIOQRU9E+gPBSEkFIpQWCnEqFIUwVglCJC6CocofBWiWAkM4LISwshjBaOUUguBLDSE8FER4QR0A+HKPQYAlx5gGDEEwHIjQYCmCIMUTIMwPBlCYNm245guDREyNMJQaAljnB4D8A4qB6ibAmGoNgzRci9BuGcAg3BOBTD8HEZwGRkg5HODQdInBZiuDoE4ZI1QbDmFwPcDw4x5B5CeEkc4PQzjEHuJ8KY2g/BPEyPsHw5x6gBFABQB0pwtAFCCKgEg8p6D0D4I8TQGQhioDaA8UQVAjCKCiAoFoRB0C9AqKMCgbhGhRG0DMI46ByggFGNQHwhRHihHoD8NINQUCkHoKYSwUhdBdCUKkQoLRTA0F8JkKYWg0hNHSJ0HIphqDqE4FKnYPxDjgH4KgCoChQDUB1iUNQRQiCpCqB4Uo1BNZGHUHUKIqRahOFQFUJQpQoDpHwP0D4ox9CtCqMoW4Vw1gFC+KwKoehZBWA0MsLA6wahpFaBUVwsxrDaGqFsVYZQtBfASC0EwoAtDtC6OsYoeRXhVHcL4K42h+hfHYAUPYTQEioGoKQOghwwjSBaIkJAlgXDECwMsCoYwpAdEICkVAKBAiGBAN6XAoA3gNFQEkBQFBYktCgM0T4IwEB5AgBAGYkhAANBkCQEQggggUA0JsAYXRlB1D0BAAIARTDXE2GMLorRMAAFvekXgWw9h3DaC0fouhbCIAsNsbQ9ADhxDcDEBIIAQEBA") Add(9,"gBFLBCJwBAEHhEJAEGg4BIAGg6AADACAxRDAMgBQKAAzQFAYZhxBaERiGIZ4JhUAIIRZGMQxXAcMQ1DICYRhQABRiUAoJDKMchxEKcPBmAiPZhjEYocheMoWSLIcijDD0eRRDyDZrjaL5ZgmHonQK/cI0VDMdRLHqXKApCYYeCaGgpSJRUI1HRgAS7CqVRpEWwbDgkNQwWTAdj2TSkEgNDQRaxjWZ6EgmO5TSjKYxSbJEQzpGSaIDwGZrfACRYEU7dVQxDQcNYbAYPJpwOh6LxWTZ2YjBGJ4FScPyrBLIYDFWCRHpqA5cZZOEQ2FYkRzXVy0JDzaCZQxCCQlQiIOjYLaUSRNFC+IZqMZhWw+FrGAbvIJbXakPZbVYSZ52AQuHcHY7lqAABhoDZllcEAxjwcCOD4GJbisGZPmmYQ1ggHIPg0dJnmCNYWG2D5OlkFYpkeAo7l0LpbjkcxAleYABGsCxDEgBgDHgXBUCQNhdB4ZBZG8QJgnYEAAFcD51CoFRXmENRtAkcpQDGQB1ByRoBhQZALgYIY0HAUABAQDBCBMQwoiUFoClAMIhmobhViAYQWD8AJ3nkSwrEmIZsHMDxAAifhBhAJApBYRIRmQOQmEaEokgkLhOhMZQJDIUoTmUORGEKDwHjUJAAhYChRnQUg3gycwYncOZOHmDhlhkJhpiYaIamYeY2GqG4mkmPhyhwZxJkIdocmceYyGAMYllEShYhIZ4zlTTRoCoEoDiEaIKB6CohiiSgmg2IpomoRoQiSaJ6FaEolikSgWHvc4YFycw4k4Oh+iGKAqCqFokimag6iaJoqiqCoui6KxrAqMoyiuaw6kaIoFmmSQKBcPBOBOBo8i+K5an6QowGwSwCkaMJsHsFpIjKbIrDaSYzmySxCk6L5rgkAodgUTpzHyX42G2OxqlyN5tmuBpdjibgLhKYo5G6C4emqOYukuJptjqbZLFUA4uiEU40l0NxvGuYp3j4b5Lm6fo+jAC53AGP5wCwFwEkGcA8CcBpCjCC5mnKNZPnOLJbDacQsFME5FHGDBfBqRYxkwZwdkacZsgcIJInGfIXCKSYyExJI9A+c4klkNhymyQwvkwcxMk8NpMjODJXDmTfCHcPPBj0Bw+lCNAMkcK4QCEc4glcNg0i0MxLlMdQND8UpTjUTRHFWVJ1G0ZxYladR9HcWpXjWTQ3EcV+wBiVQ16CIxnlodpNi8bpajcDY3HGW53C2Vx0l2O4PYzh2i9DeBsJwxwFicEMJkVIwB4B8AuAkYY8BuBPAWMUeIHAzgVGMPIDgfwSjHDkJwR4KxkjwE2PwFQcQNAmEuDkZ4cxeD/CKNAegnQDhNXSP0F4URqj1C6G8KY1x6idEOF0Z48wjj5GAGcTQHRfhzG4HcLo7w8jfHuH4B4fRwh4A8B8Ro4h8geBOJVzgfgnh1G0JsYwaROjoH0H4S4qR1j6G8M8VY7R9geHOLUdw/APD/bOHwT4DxljxH0J0VIuAyiZE+F8bY9g+jfEeOEfI/R/ivHKPsPwnxfj1H4P8T4xx+D+G+PttozhqBtAYIESoAQwA8AMIECALgChAGwBMAY4AyAQECNAIwCggg4BaAQUAxAKiDBgF4AgOwoiwBiIYIgHxCAwEEBEIQWAkgJHCBwFIhBoCqAoEIXAXQFhhEICwQwUBfAZGGBgIg7QjCwGIBgaA5gOjDFQHkB44R6BBEOLEBwIAiBIEKBEMQRAjiJCjC0IgmBNgSHCOMWoGhBgIDEEUHAqwKgiFoFkRYEQ3ArGKNgWoFxRDkC+IwKIhgZBGAQM0DA4weBlEVKoNIDAAiFA2GMPj5gIjOByEcLA4wOjjFIHgRw0RzA+COLgfoHhSAED6JAGI/gcTOFAC8QwBBDiRBkCIIoSBsgZBGOQLgkRIjSCUEgJIOQWglDIMQSgkwpBeCaMkTIFJ5BwF4BcaSaBlApCSCkcoNBUiUFkK4KgShkhVBWGUQgrxLBSF0FoJYGUQDlBGLUDIgh0BeCWLkPYLwSj0GCJgCYDgvjMCyIUGIpgSDHEyFMEwZgmCJE6DIcwfBmiXlUGURYgQ7g1DMLwawmwJhuDaE0bIswbjmHIOATY0xDByCcDkZoOBThEHKJ0GYng2TOEkC0QozB3ieBmMIPITwsjpB6OcTg+RPDTHUHwJ4uR+g/DQAQfgoApj+l+Bkck8gcC0AsPQEwhZwgZCGOgOoERQi0CcIhNIJQihoGKBcUYVAtCOCiJoHYRh0BjFqBgUQyAtDSB0EuwoNQUilAoK4SY0htBVCWKkMoLxTBUGMJoKYCg2hMHSL0GopJVBhEWAEM4Tw0j9B8KgCoDhQ4eEGFEdQJQkCoGqCbHouhOhSFUIUJoqgag+FBM4QQKxCiNCuKsGoYhWhVG0LkK46huhhFWNURQsArA6GaFkNYRQyZzE8LUawmhaDYGmNoC4FxxCwCuNcHQ6wugrFqHkV4FR3C7GuNoeoXxVjlD/n4AwwgsALAaGAdgPQ+BCHUG0NYJRiC9C4FAXokRZBWCcMoLIWwWhlHYMUTIs2XgKFOLQfQnxlBKCwEoSwjQVhaCoKsNI7QSioFoNYUoKgtACEoIcg4YgGjhGgDpHI2hEgRBiFMDAxASgVG2LIGQjAAACBkCAM4JQEAjUOCQCI0wyCzEsEQUo2QogAlqFUSYuRbBGHOIABYqw6huEiEkIQtwvDoC6MsVodAIC9GmLkNAVh4heBkBIIAQCAgA==") } AutoSize = False DrawGridLine = 1 ShowWeeks = True HeaderForeColor = 0 SelBackColor = 33554432 Background(0) = 100663296 Background(1) = 117440512 Background(2) = 67108864 Background(3) = 83886080 Background(4) = 134217728 Background(5) = 150994944 Background(6) = 50331648 Background(7) = 50331648 Background(8) = 16777216 Background(9) = 16777216 Background(10) = 33554432 Background(11) = 33554432 Background(12) = 33554432 Background(13) = 16777216 Background(15) = 16777216