GUICreate("GUI с контекстным меню", 300, 200)

$idTrackMenu = GUICtrlCreateContextMenu()
$idAboutItem = GUICtrlCreateMenuItem("О программе", $idTrackMenu)
GUICtrlCreateMenuItem("", $idTrackMenu) ; пустая строка создаёт разделитель, линию в меню
$dExitItem = GUICtrlCreateMenuItem("Выход", $idTrackMenu)

GUISetState()

While 1
	Switch GUIGetMsg()
		Case -3, -1, $dExitItem
			Exit
		Case $idAboutItem
			MsgBox(0, "О программе", "Простой пример контекстного меню!")
	EndSwitch
WEnd