png или ico вместо обычной кнопки,как реализовать?

ferget · Отправлено: **20:45, 22-02-2012** | #2

посмотрите в справке GUICtrlSetImage

AZJIO · Отправлено: **15:07, 24-02-2012** | #3

Vsirf, вот, только у меня при активности кнопки картинка исчезает.

Vsirf · Конфигурация компьютера

Цитата ferget:

посмотрите в справке GUICtrlSetImage »

Все перечитал, но как сделать что бы картинка менялась при наведении и нажатии?

Цитата AZJIO:

вот, только у меня при активности кнопки картинка исчезает. »

надо что бы возвращалась в начальное состояние

может попробовать с помощью GUICtrlOnHover ?

madmasles · Конфигурация компьютера

Цитата AZJIO:

только у меня при активности кнопки картинка исчезает. »

Чтобы нормально работало, в ImageList должно быть не менее пяти иконок(картинок), а не три, как в Вашем примере.

Vsirf · Конфигурация компьютера

Цитата madmasles:

Чтобы нормально работало, в ImageList должно быть не менее пяти иконок(картинок), а не три, как в Вашем примере. »

madmasles, сделал,но изображение только на одной кнопке,на второй не отображается

и еще,как кнопку сделать прозрачной,что бы отображалась лиш картинка?

Vsirf · Конфигурация компьютера

madmasles, AZJIO, ferget, Почти решил вопрос...
AZJIO, Вот таким образом кнопка не пропадает :

Вот так изображение отображается на всех кнопках:

Теперь следующий вопрос:
Это все хорошо работает если фон JPG изображение в обычном окне ,но, все же как сделать кнопку прозрачной( что бы отображалось лишь изображение ),и как это все сделать если фон - png изображение,и на нем кнопки с png изображениями ?

Код и изображение в шапке темы...

Если можно,наведите пример не с одной кнопкой,а с двумя, что бы для меня понятнее было,спасибо

madmasles · Конфигурация компьютера

Vsirf,
Попробуйте, например, так.

Код:

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

Global $aIcon[3][5] = [[0, -3, -2, -5],[0, -4, -2, -3],[0, -5, -2, -4]], _
        $aText[3] = ['Minimize', 'MsgBox', 'Exit']

$hGui = GUICreate('Test', 200, 100, -1, -1, $WS_POPUP, $WS_EX_DLGMODALFRAME)
GUICtrlCreateLabel('Таскать можно', 0, 0, 140, 22, -1, $GUI_WS_EX_PARENTDRAG)
GUICtrlCreateLabel('', 0, 22, 200, 2, -1, $WS_EX_STATICEDGE)
For $i = 0 To 2
    $aIcon[$i][0] = GUICtrlCreateIcon('', 0, 140 + $i * 20, 3, 16, 16)
    GUICtrlSetCursor(-1, 0)
    GUICtrlSetTip(-1, $aText[$i])
Next
GUISetState()

While 1
    _ChangeImage()
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE, $aIcon[2][0]
            Exit
        Case $aIcon[0][0]
            GUISetState(@SW_MINIMIZE)
        Case $aIcon[1][0]
            MsgBox(64, 'Info', '2 Icon click', 0, $hGui)
    EndSwitch
WEnd

Func _ChangeImage()
    Local $s_IconFile = @SystemDir & '\user32.dll'
    Local $a_Cursor = GUIGetCursorInfo()
    If @error Then Return
    For $i = 0 To 2
        If $a_Cursor[4] = $aIcon[$i][0] Then
            If $a_Cursor[2] Then
                If $aIcon[$i][4] <> 1 Then
                    GUICtrlSetImage($aIcon[$i][0], $s_IconFile, $aIcon[$i][1])
                    $aIcon[$i][4] = 1
                    ConsoleWrite($i + 1 & ' Icon click' & @LF)
                EndIf
            Else
                If $aIcon[$i][4] <> 2 Then
                    GUICtrlSetImage($aIcon[$i][0], $s_IconFile, $aIcon[$i][2])
                    $aIcon[$i][4] = 2
                EndIf
            EndIf
        Else
            If $aIcon[$i][4] <> 3 Then
                GUICtrlSetImage($aIcon[$i][0], $s_IconFile, $aIcon[$i][3])
                $aIcon[$i][4] = 3
            EndIf
        EndIf
    Next
EndFunc   ;==>_ChangeImage

Vsirf · Конфигурация компьютера

madmasles, мне надо с png изображениями , и фон png изображение

с иконками я неумею работать

madmasles · Конфигурация компьютера

Цитата Vsirf:

мне надо с png изображениями »

Посмотрите здесь: Поддержка иконок и изображений, содержащих прозрачность (Alpha канал)