int pascal AcceleratorSetKey(WORD id, int key)

  This function sets the identifier which is associated with the key
which is passed as the second argument. When TranslateAccelerator()
is called, and if the 'key' has been pressed, a WM_COMMAND message
will be generated with wParam set to the corresponding 'id'.
AcceleratorSetKey() only operates on the current accelerator table.

Parameters
  id is the identifier which will be associated with the key.
  key is a valid keycode which can be generated by the user pressing
the ALT key in combination with another key. Please see the keys.h
file for a complete listing of keycodes.

Returns
  TRUE if the key-id combo was set, FALSE if not.