TIDesigner

IsDesignMsg

UTF8KeyPress

Modified

Notification

PaintGrid

ValidateRename

GetShiftState

SelectOnlyThisComponent

UniqueName

PrepareFreeDesigner