button ohne form?

[Löler³]

Hi


kann man ein button i-wie machen das er da ist ohne form?

[PenGuin :O]

#include <WindowsConstants.au3>
#include <WinAPI.au3>

Global $aButton[2]

$hGUI = GUICreate("MyGUI", 150, 150, -1, -1, $WS_POPUP)
$aButton[0] = GUICtrlCreateButton("Hit Me!", 0, 0, 150)
$aButton[1] = GUICtrlCreateButton("Exit", 0, 50, 150)
GUISetState()

_GuiHole($hGUI, 0, 0, 150, 150)

While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $aButton[0]
            MsgBox(0, "", "It's magic!")
        Case $aButton[1]
            Exit
    EndSwitch
WEnd

Func _GuiHole($h_win, $i_x, $i_y, $i_sizew, $i_sizeh)
    Local $outer_rgn, $inner_rgn, $combined_rgn
    $combined_rgn = _WinAPI_CreateRectRgn(0, 0, 0, 0)
    _WinAPI_DeleteObject($outer_rgn)
    _WinAPI_DeleteObject($inner_rgn)
    _AddCtrlRegion($combined_rgn, $aButton)                               ;Hier aButton anpassen
    _WinAPI_SetWindowRgn($h_win, $combined_rgn)
EndFunc   ;==>_GuiHole

Func _AddCtrlRegion($full_rgn, $ctrl_id)
    Local $ctrl_pos, $ctrl_rgn
    If IsArray($ctrl_id) Then
        For $i = 0 To UBound($ctrl_id) -1
            $ctrl_pos = ControlGetPos($hGui, "", $ctrl_id[$i])             ;Hier hGUI anpassen
            $ctrl_rgn = _WinAPI_CreateRectRgn($ctrl_pos[0], $ctrl_pos[1], $ctrl_pos[0] + $ctrl_pos[2], $ctrl_pos[1] + $ctrl_pos[3])
            _WinAPI_CombineRgn($full_rgn, $full_rgn, $ctrl_rgn, $RGN_OR)
            _WinAPI_DeleteObject($ctrl_rgn)
        Next
    Else
        $ctrl_pos = ControlGetPos($hGui, "", $ctrl_id)                     ;Hier hGUI anpassen
        $ctrl_rgn = _WinAPI_CreateRectRgn($ctrl_pos[0], $ctrl_pos[1], $ctrl_pos[0] + $ctrl_pos[2], $ctrl_pos[1] + $ctrl_pos[3])
        _WinAPI_CombineRgn($full_rgn, $full_rgn, $ctrl_rgn, $RGN_OR)
        _WinAPI_DeleteObject($ctrl_rgn)
    EndIf
EndFunc   ;==>_AddCtrlRegion

[Löler³]

kannste es vll bissel erklären?^^

[PenGuin :O]

Was gena verstehst daran nicht?
Dann kann ich besser auf deine Fragen eingehen...
Bzw. wenn du viel nicht verstehst, schreib das auf was du verstehst

[Löler³]

will einfach wissen was was macht genau da ich anfänger bin

[PenGuin :O]

WEnn du noch Anfänger bist wird das erklären ein ziemlicher Akt.
Ich würde sagen, nimms erstmal hin und baus bei dir ein, wenn duein bisschen mehr gelernt hast, wirste das schon verstehen :P

[kknb]

vieleicht kann er das c&p ding auch net erklären

[ZaZiZu]

Originally Posted by kknb

vieleicht kann er das c&p ding auch net erklären

welches ding meinst du ^^?

[kknb]

wieviele scripte wurden denn hier gepostet?

[ZaZiZu]

Originally Posted by kknb

wieviele scripte wurden denn hier gepostet?

ah...copy&paste meinst du ^^

die meisten schauen hier nicht die skripts aus anderen/kurz davor geposteten threads rein und fragen einfach irgendwas, das ist das problem

[PenGuin :O]

Originally Posted by kknb

vieleicht kann er das c&p ding auch net erklären

Aber auch nur vielleicht