class
	WEL_COMMAND_MESSAGE

General
	cluster: wel.messages
	description: "Information about message Wm_command which is sent when the user selects a command item from a menu, when a control sends a notification message to its parent window, or when an accelerator keystroke is translated."
	create: make

Ancestors
	WEL_MESSAGE_INFORMATION
	WEL_WINDOW_MANAGER

Queries
	control: WEL_CONTROL
	from_accelerator: BOOLEAN
	from_control: BOOLEAN
	from_menu: BOOLEAN
	h_window: POINTER
	id: INTEGER
	l_param: INTEGER
	message: INTEGER
	notify_code: INTEGER
	w_param: INTEGER
	window: WEL_WINDOW

Commands
	make (a_window: WEL_WINDOW; a_message, a_w_param, a_l_param: INTEGER)