Unit DrawCalendar |
Version 1.3 // TDrawCalendar is a component based on though not descended from the Calendar in the Samples page of the pallette. I wanted to unpublish the font property which meant I could not descend it directly. Therefore a lot of this code is identical to that of the TCalendar component. I have put all original code at the end of the listing where possible, and highlighted changes to the TCalendar code. // TDrawCalendar is my first component so I do not expect it to be perfect. My programming techniques and style may also be questionable as I am not a professional developer but a home taught one who enjoys programming in my spare time. // The purpose of this component is to add flexibility to the calendar component to allow: 1. Drawing bitmaps, Icons and text onto particular dates of the calendar. 2. Allow font setting for the Days of the week, Date numbers and added text as three separate properties (HeaderFont, DateFont and TextFont resp.). // //
Classes |
Functions |
Register - Function to convert a string to a pChar.
Types |
Constants |
Variables |
Functions |
Types |
TCoordResults = (crXIcon, crYIcon, crXText, crYText, crXColor, crYColor);
TDayOfWeek = 0..6
Constants |
Variables |