FocusRequest - a request has been received to give focus, so it is given
Source position: dbctrls.pp line 996
procedure TDBCalendar.FocusRequest(
Sender: TObject
);