Called on key press in active designer.

procedure KeyPress(Sender: IDesigner; var Key: Char);