How to recognize virtual key codes in KeyPress event?

Question

I am trying to implement something similar to Notepad\'s insertion of the date and time when users press the F5 key. In the event

procedure TFormMain.Memo1Key