Кнопка с битмапом и текстом

joiner сказал(а):

самодельная кнопка. то есть, снизу картинка, сверху прозрачная строка. забудь про обычные кнопки. все можно сделать одними картинками

Нажмите, чтобы раскрыть...

$VAR_1 = GUICtrlCreateLabel("ТЕСТ", 155, 41, '' , '' , $ES_CENTER, $WS_EX_TRANSPARENT)

joiner сказал(а):

можно через опрос событий guimsg, можно через wm_command . можно через wm_setcursor, эта функция отслеживает скольжение по окно и выдает id элементов. а также, регистрирует нажатие и отпуск клавиш мыши.

картинку нужно отключить. а строку сделать по размеру картинки. и будет регистрироваться клик по строке


Добавлено:

Сообщение автоматически объединено: 5 Фев 2019

пример

Спойлер

Код:

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Winapiex.au3>

$Form1 = GUICreate("Form1", 248, 153, 192, 124)
$Label1 = GUICtrlCreateLabel("Label1", 24, 24, 36, 17)
$Label2 = GUICtrlCreateLabel("Label2", 32, 88, 36, 17)
Global $Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 128, 16, 97, 17)
Global $Radio1 = GUICtrlCreateRadio("Radio1", 136, 48, 81, 17)
GUISetState()


GUIRegisterMsg($WM_SETCURSOR, 'WM_SETCURSOR')
GUIRegisterMsg($WM_COMMAND, 'WM_COMMAND')
While 1
	Switch GUIGetMsg()
		Case -3
			Exit

	EndSwitch
WEnd

Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
	#forceref $hWnd, $iMsg, $ilParam
	Local $id = _WinAPI_LoWord($iwParam)
	Switch $id
		Case $Checkbox1, $Radio1
			ConsoleWrite(GUICtrlRead($id, 1) & ' - ' & 'клик по кнопке' & @LF)
	EndSwitch
	Return $GUI_RUNDEFMSG
EndFunc   ;==>WM_COMMAND

Func WM_SETCURSOR($hWnd, $Msg, $wParam, $lParam)
	#forceref $hWnd, $Msg, $lParam

	Switch _WinAPI_HiWord($lParam)
		Case 514;регистрирует клики по статическим элементам pic, label
			ConsoleWrite(_WinAPI_GetDlgCtrlID($wParam) & ' - ' & 'клик по строке' & @LF)
		Case 512;регистрирует скольжение мыши(на какой элемент наведена)
			ConsoleWrite(_WinAPI_GetDlgCtrlID($wParam) & @LF)
	EndSwitch
	Return $GUI_RUNDEFMSG
EndFunc   ;==>WM_SETCURSOR

в итоге, можно даже без строк обойтись. картинки с надписями

Нажмите, чтобы раскрыть...