#DEFINE WM_COMMAND 0x0111

DECLARE INTEGER SendMessage IN user32;
	INTEGER hWindow, INTEGER Msg,;
	INTEGER wParam, INTEGER lParam
...

IF IsWindow(THIS.hWindow)<>0 AND IsMenu(THIS.hMenu)<>0
	= SendMessage(THIS.hWindow, WM_COMMAND, m.nCommand, 0)
	DOEVENTS
ENDIF
...