1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Greenhorn

Beiträge von Greenhorn

  • Happy Birthday i2c

    • Greenhorn
    • 18. April 2012 um 16:46

    Herzlichen Glückwunsch zum Burzeltag und alles Gute ! :)

    [Blockierte Grafik: http://www10.pic-upload.de/17.02.12/2xeusp3i6po.gif]

    LG
    Greenhorn

  • GuiCtrlDelete

    • Greenhorn
    • 18. April 2012 um 16:23

    Hallo Ilse,

    ja, ich schaue es mir noch einmal an.
    Kann aber ein/zwei Tage dauern, habe im Moment viel RL-mäßig um die Ohren. ;)

    LG
    Greenhorn

  • GUICtrlSetImage Icon und Bild problem

    • Greenhorn
    • 17. April 2012 um 21:54

    Also wenn ich das alles richtig verstanden habe, dann möchtest Du eine Bitmap aus einer EXE extrahieren und auf Deiner Schaltfläche anzeigen ???

    Gruß
    Greenhorn

  • GuiCtrlDelete

    • Greenhorn
    • 17. April 2012 um 21:50

    Hallo Ilse,

    so nun haben wir es.

    Spoiler anzeigen
    [autoit]

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

    [/autoit] [autoit][/autoit] [autoit]

    ;-- Global variables
    Global $sDataDir = @ScriptDir & "\Data"
    Global $idButton [1], $idcbo
    Global $sCurComboSel

    [/autoit] [autoit][/autoit] [autoit]

    ;-- Start script
    Exit (ScriptMain ( ))

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    ;-- Main function of the script
    Func ScriptMain ( )

    [/autoit] [autoit][/autoit] [autoit]

    Local $hwnd
    Local $nMsg
    Local $rcClient

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $hwnd = GUICreate ("Form1", 625, 443, 192, 124, _
    BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPCHILDREN, $WS_CLIPSIBLINGS))

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreateLabel ("Auswahl", 12, 5)
    $idcbo = GUICtrlCreateCombo ("", 12, 23, 145, 25)
    InitComboData ($idcbo)

    [/autoit] [autoit][/autoit] [autoit]

    CreateButtons ($idcbo)

    [/autoit] [autoit][/autoit] [autoit]

    GUIRegisterMsg ($WM_SIZE, "OnSize")
    GUISetState (@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg ( )
    Switch ($nMsg)
    Case $GUI_EVENT_CLOSE
    ExitLoop

    [/autoit] [autoit][/autoit] [autoit]

    Case $idButton[0] To $idButton[UBound($idButton) - 1]
    MsgBox(4096, "", StringFormat ("Es wurde eine Schaltfläche gedrückt.\nID: %d\nText: %s", $nMsg, GUICtrlRead ($nMsg)))

    [/autoit] [autoit][/autoit] [autoit]

    Case $idcbo
    If ($sCurComboSel <> GUICtrlRead ($idcbo)) Then

    [/autoit] [autoit][/autoit] [autoit]

    $sCurComboSel = GUICtrlRead ($idcbo)

    [/autoit] [autoit][/autoit] [autoit]

    DeleteButtons ( )
    CreateButtons ($idcbo)
    $rcClient = WinGetClientSize ($hwnd)
    OnSize ($hwnd, $WM_SIZE, 0, MAKELPARAM($rcClient[0], $rcClient[1]))
    EndIf
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Return 0

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    ;-- Aligns the buttons
    Func OnSize ($hwnd, $message, $wParam, $lParam)

    [/autoit] [autoit][/autoit] [autoit]

    Local $cx, $cy
    Local $nWidth, $nHeight
    Local $cnLoop = 0
    Local $cnButtons = UBound ($idButton) ; Anzahl der Schaltflächen
    Local $nColumns = 2 ; Anzahl der Spalten
    Local $nRows = Ceiling ($cnButtons / $nColumns) ; Anzahl der Reihen

    [/autoit] [autoit][/autoit] [autoit]

    $cx = 10 ; Abstand links/rechts
    $cy = 200 ; Abstand oben

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $nWidth = Int(((BitAND($lParam, 0xffff) - $cx * 2) - (22 * ($nColumns - 1))) / ($nColumns))
    $nHeight = Int(((BitShift($lParam, 16) - $cy - 10) - (22 * ($nRows - 1))) / $nRows)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    For $i = 0 To $nRows - 1
    For $j = 0 To $nColumns - 1

    [/autoit] [autoit][/autoit] [autoit]

    If ($cnLoop >= $cnButtons) Then ExitLoop
    WinMove (GUICtrlGetHandle ($idButton[$cnLoop]), "", $cx, $cy, $nWidth, $nHeight)

    [/autoit] [autoit][/autoit] [autoit]

    $cx += $nWidth + 22
    $cnLoop += 1
    Next
    $cx = 10
    $cy += $nHeight + 22
    Next

    [/autoit] [autoit][/autoit] [autoit]

    Return 0

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc ;==>OnSize

    [/autoit] [autoit][/autoit] [autoit]

    ;-- Initializes the content of the combo box
    Func InitComboData ($idCombo)

    [/autoit] [autoit][/autoit] [autoit]

    Local $aInis
    Local $sFileName

    [/autoit] [autoit][/autoit] [autoit]

    $aInis = _FileListToArray ($sDataDir, "*.ini", 1)

    [/autoit] [autoit][/autoit] [autoit]

    If IsArray ($aInis) Then

    [/autoit] [autoit][/autoit] [autoit]

    For $i = 0 To $aInis[0]

    [/autoit] [autoit][/autoit] [autoit]

    $sFileName = StringTrimRight ($aInis[$i], 4)
    GUICtrlSetData ($idcbo, $sFileName, $sFileName)
    Next
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    $sCurComboSel = GUICtrlRead ($idcbo)

    [/autoit] [autoit][/autoit] [autoit]

    Return 0

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    ;-- Creates a button for each entry in the INI section "Name"
    Func CreateButtons ($idCombo)

    [/autoit] [autoit][/autoit] [autoit]

    Local $var
    Local $iniwahl

    [/autoit] [autoit][/autoit] [autoit]

    $iniwahl = StringFormat ("%s\\%s.ini", $sDataDir, GUICtrlRead ($idCombo))

    [/autoit] [autoit][/autoit] [autoit]

    $var = IniReadSection ($iniwahl, "Namen")

    [/autoit] [autoit][/autoit] [autoit]

    ReDim $idButton[$var[0][0]]

    [/autoit] [autoit][/autoit] [autoit]

    For $i = 1 To $var[0][0]

    [/autoit] [autoit][/autoit] [autoit]

    $idButton[$i - 1] = GUICtrlCreateButton ($var[$i][1], 0, 0)
    Next

    [/autoit] [autoit][/autoit] [autoit]

    Return 0

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    ;-- Deletes all buttons
    Func DeleteButtons ( )

    [/autoit] [autoit][/autoit] [autoit]

    For $i = 0 To UBound($idButton) - 1

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlDelete ($idButton[$i])
    Next

    [/autoit] [autoit][/autoit] [autoit]

    Return 0

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    ;-- Helper function
    Func MAKELPARAM($wLow, $wHigh)
    Return BitOR ( BitAND ( $wLow, 0xFFFF ), BitShift (BitAND ( $wHigh, 0xFFFF ), -16) )
    EndFunc

    [/autoit]


    Evtl musst Du noch den Pfad zu Deinen INIs wieder anpassen.

    LG
    Greenhorn

  • GuiCtrlDelete

    • Greenhorn
    • 17. April 2012 um 17:47

    Hallo Ilse,

    ich sehe es mir mal an.
    Heute Abend oder morgen melde ich mich dann bei Dir.


    LG
    Greenhorn

  • Installation von AutoIt Programm

    • Greenhorn
    • 16. April 2012 um 18:40

    Moin Crys,

    wenn Du einen Windows-Konformen Installer erstellen möchtest, dann solltest Du so etwas wie NSIS nehmen.
    Da hast dann auch eine ordentliche Deinstallationsroutine dabei und es lässt sich über die Systemsteuerung deinstallieren.

    Für Programmeinträge in der Registrierung nimmt man im Allgemeinen den Hive HKCU\Software\Progammname.


    Gruß
    Greenhorn

  • DLLCall mit DragQueryFile

    • Greenhorn
    • 15. April 2012 um 19:34

    Moin,

    hier noch einmal die einfache Version:

    Spoiler anzeigen
    [autoit]

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

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Global $g_DropFiles [1]
    ; ...
    GUIRegisterMsg($WM_DROPFILES, 'OnDropFiles')
    ; (...)
    Func OnDropFiles ($hWnd, $msgID, $wParam, $lParam)

    Local $cnFiles

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $cnFiles = DragQueryFile ($wParam, 0xFFFFFFFF, 0, 0)

    ReDim $g_DropFiles[$cnFiles] ; $g_DropFiles ist globales Array

    For $i = 0 To $cnFiles - 1

    DragQueryFile ($wParam, $i, $gaDropFiles[$i], 261) ; 261 = MAX_PATH + 1
    Next

    Return 0

    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func DragQueryFile ($hDrop, $iFile, ByRef $lpszFile, $cch)

    [/autoit] [autoit][/autoit] [autoit]

    Local $aRes = DllCall ("shell32.dll", "UINT", "DragQueryFileW", _
    "HANDLE", $hDrop, _
    "UINT", $iFile, _
    "WSTR", $lpszFile, _
    "UINT", $cch)
    $lpszFile = $aRes[3]
    Return $aRes[0]

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit] [autoit][/autoit] [autoit][/autoit]

    Oder Deine ursprüngliche Version:

    Spoiler anzeigen
    [autoit]

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

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Global $g_DropFiles [1]
    ; ...
    GUIRegisterMsg($WM_DROPFILES, 'OnDropFiles')
    ; (...)
    Func OnDropFiles ($hWnd, $msgID, $wParam, $lParam)

    [/autoit] [autoit][/autoit] [autoit]

    Local $cnFiles
    Local $cchBuffer
    Local $szBuffer

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $szBuffer = DllStructCreate ("WCHAR [261]") ; 261 = MAX_PATH + 1

    [/autoit] [autoit][/autoit] [autoit]

    $cnFiles = DragQueryFile ($wParam, 0xFFFFFFFF, 0, 0)

    [/autoit] [autoit][/autoit] [autoit]

    ReDim $g_DropFiles[$cnFiles] ; $g_DropFiles ist globales Array

    [/autoit] [autoit][/autoit] [autoit]

    For $i = 0 To $cnFiles - 1

    [/autoit] [autoit][/autoit] [autoit]

    $cchBuffer = DragQueryFile ($wParam, $i, 0, 0)

    [/autoit] [autoit][/autoit] [autoit]

    If ($cchBuffer < 261) Then
    ; Dateiname in Puffer kopieren
    DragQueryFile ($wParam, $i, DllStructGetPtr ($szBuffer), 260)
    $g_DropFiles[$i] = DllStructGetData ($szBuffer)
    Else
    ; Eher unwahrscheinlich ...
    MsgBox (BitOR($MB_OK, $MB_ICONHAND), "Fehler", "Puffer ist zu klein!")
    EndIf
    Next

    [/autoit] [autoit][/autoit] [autoit]

    Return 0

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func DragQueryFile ($hDrop, $iFile, $lpszFile, $cch)

    [/autoit] [autoit][/autoit] [autoit]

    Local $aRes = DllCall ("shell32.dll", "UINT", "DragQueryFileW", _
    "HANDLE", $hDrop, _
    "UINT", $iFile, _
    "ptr", $lpszFile, _
    "UINT", $cch)

    Return $aRes[0]

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit]

    Edith sagte ich hatte noch etwas vergessen ...

    Gruß
    Greenhorn

  • QT Button mit Controlcklick() ansteuern

    • Greenhorn
    • 14. April 2012 um 18:59

    Hi,

    um welches Proggie handelt es sich denn ?

    Ansonsten bleibt immer noch die rohe Methode mit MouseClick ...


    Gruß
    Greenhorn

  • Buttons erstellen

    • Greenhorn
    • 14. April 2012 um 18:30
    Zitat von Ilse

    SCHADE und das geht leider bei diesem GuiScroll nicht.
    Sonst wäre das die Lösung.

    Dann schau doch mal hier wie Crys es gemacht hat.
    Das solltest Du leicht an Dein Skript anpassen können. ;)
    Scrollbar GUI


    Gruß
    Greenhorn

  • Buttons erstellen

    • Greenhorn
    • 13. April 2012 um 17:57

    Hi,

    hier mal der Lösungsansatz von Andy (und ein wenig von mir).

    Spoiler anzeigen
    [autoit]

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

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Global $idButton [1]

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $Form1 = GUICreate("Form1", 625, 443, 192, 124, _
    BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPCHILDREN, $WS_CLIPSIBLINGS))

    [/autoit] [autoit][/autoit] [autoit]

    $var = IniReadSection(@ScriptDir & '\Namen.ini',"Name")
    If @error Then
    MsgBox(4096, "", StringFormat ("Es ist ein Fehler aufgetreten.\nWarscheinlich keine INI Datei vorhanden."))
    Else
    ReDim $idButton [$var[0][0]]
    For $i = 1 To $var[0][0]

    [/autoit] [autoit][/autoit] [autoit]

    $idButton[$i - 1] = GUICtrlCreateButton ($var[$i][1],0,0)
    Next
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    GUIRegisterMsg ($WM_SIZE, "OnSize")
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch ($nMsg)
    Case $GUI_EVENT_CLOSE
    Exit

    [/autoit] [autoit][/autoit] [autoit]

    Case $idButton[0] To $idButton[UBound ($idButton) - 1]
    MsgBox(4096, "", StringFormat ("Es wurde eine Schaltfläche gedrückt.\nID: %d\nText: %s", $nMsg, GUICtrlRead ($nMsg)))

    [/autoit] [autoit][/autoit] [autoit]

    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func OnSize ($hwnd, $message, $wParam, $lParam)

    [/autoit] [autoit][/autoit] [autoit]

    Local $rcClient
    Local $cx, $cy
    Local $nWidth, $nHeight
    Local $cnLoop = 0
    Local $cnButtons = UBound ($idButton) ; Anzahl der Schaltflächen
    Local $nColumns = 4 ; Anzahl der Spalten
    Local $nRows = Ceiling ($cnButtons / $nColumns) ; Anzahl der Reihen

    [/autoit] [autoit][/autoit] [autoit]

    $cx = 10 ; Abstand links/rechts/unten
    $cy = 200 ; Abstand oben

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $nWidth = int(((BitAND($lParam, 0xffff) - $cx * 2) - (22 * ($nColumns -1))) / ($nColumns ))
    $nHeight = int(((BitShift($lParam, 16) - $cy - $cx) - (22 * ($nRows - 1))) / $nRows)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    For $i = 0 To $nRows - 1
    For $j = 0 To $nColumns - 1

    [/autoit] [autoit][/autoit] [autoit]

    If ($cnLoop >= $cnButtons) Then ExitLoop
    WinMove (GUICtrlGetHandle ($idButton[$cnLoop]), "", $cx, $cy, $nWidth, $nHeight)

    [/autoit] [autoit][/autoit] [autoit]

    $cx += $nWidth + 22
    $cnLoop += 1
    Next
    $cx = 10
    $cy += $nHeight + 22
    Next

    [/autoit] [autoit][/autoit] [autoit]

    Return 0

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit] [autoit][/autoit] [autoit][/autoit]

    Mit der Schriftgröße muss ich mal sehen, ob ich das gebacken bekomme ...

    Edith hat gesagt ich sollte den Abstand unten gleichmäßig zu denen an den Seiten halten.
    Gesagt, getan. ;)


    Gruß
    Greenhorn

  • Wenn Maus über Bild Rahmen erstellen

    • Greenhorn
    • 10. April 2012 um 09:54

    AutoIt ist ziemlich lahm, aber so ist es schon etwas besser:

    Spoiler anzeigen
    [autoit]

    While 1
    $Maus_pos = GUIGetCursorInfo()
    Switch ($Button)
    Case 1
    If ($Maus_pos[4] <> $player1) Then
    DeleteFrame ($player1)
    $Button = 0
    EndIf
    Case 2
    If ($Maus_pos[4] <> $player2) Then
    DeleteFrame ($player2)
    $Button = 0
    EndIf
    Case 3
    If ($Maus_pos[4] <> $player3) Then
    DeleteFrame ($player3)
    $Button = 0
    EndIf
    EndSwitch

    [/autoit] [autoit][/autoit] [autoit]

    Select
    Case $Maus_pos[4] = $player1 And $Button <> 1
    GUICtrlSetData($label, "rot")
    DrawFrame ($player1)
    $Button = 1
    Case $Maus_pos[4] = $player2 And $Button <> 2
    GUICtrlSetData($label, "blau")
    DrawFrame ($player2)
    $Button = 2
    Case $Maus_pos[4] = $player3 And $Button <> 3
    GUICtrlSetData($label, "grün")
    DrawFrame ($player3)
    $Button = 3
    Case GUIGetMsg() = -3
    Exit

    [/autoit] [autoit][/autoit] [autoit]

    EndSelect
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    ; ...

    [/autoit] [autoit][/autoit] [autoit]

    Func DeleteFrame ($idCtrl)

    [/autoit] [autoit][/autoit] [autoit]

    _WinAPI_InvalidateRect (GUICtrlGetHandle ($idCtrl))
    _WinAPI_UpdateWindow (GUICtrlGetHandle ($idCtrl))
    Return

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit]
  • Scrollbar GUI

    • Greenhorn
    • 8. April 2012 um 20:36

    Du musst nach dem Neuordnen nMax neu berechnen und dann SetScrollInfo aufrufen. So ähnlich, wie Du es in der WM_Size machst.
    SetScrollRange könntest Du auch dafür benutzen.

  • Scrollbar GUI

    • Greenhorn
    • 8. April 2012 um 18:18
    Zitat von Crys

    Ich denke, dass es am $WS_VSCROLL Parameter von Windows liegt, denn tut der nicht aktualisieren ...
    Wenn ich "crys_scroll()" bzw "_GUIScroll_Init()" ein weiteres mal aufrufe, sollte AutoIt ja $WS_VSCROLL neu bestimmen, macht der aber irgendwie nicht.


    Ich habe mir die Funktion _GUIScroll_Init einmal angesehen. Wenn Du Die Funktion ein zweites mal aufrufst, dann wird das globale Array $aSB_WindowInfo erweitert. D.h. Dein erster Eintrag für das jeweilige Fenster bleibt bestehen und da wird der Hund begraben liegen, denke ich.

  • Scrollbar GUI

    • Greenhorn
    • 8. April 2012 um 17:47

    Ich meinte das Beispiel aus der AutoIt-Hilfe: _GUIScrollBars_Init

    Beispiele in der MSDN findest Du hier: Using Scroll Bars

    EDIT: Warum soll Dein Skript nicht unter 64bit laufen ?


    Gruß
    Greenhorn

  • Wenn Maus über Bild Rahmen erstellen

    • Greenhorn
    • 8. April 2012 um 17:42

    Ja, so scheint es nicht zu funktionieren.

    Hier ein schmutziger Workaround:

    Spoiler anzeigen
    [autoit]

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

    [/autoit] [autoit][/autoit] [autoit]

    $Login = GUICreate("", 810, 400)

    [/autoit] [autoit][/autoit] [autoit]

    $label = GUICtrlCreateLabel("", 20, 20, 100, 20)
    $player1 = GUICtrlCreatePic("Res\bild 1.jpg", 20, 80, 250, 250)
    $player2 = GUICtrlCreatePic("Res\bild 2.jpg", 280, 80, 250, 250)
    $player3 = GUICtrlCreatePic("Res\bild 3.jpg", 540, 80, 250, 250)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState()

    [/autoit] [autoit][/autoit] [autoit]

    $Button = 0

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $Maus_pos = GUIGetCursorInfo()
    Select
    Case $Maus_pos[4] = $player1 And $Button <> 1
    GUICtrlSetData($label, "rot")
    DrawFrame ($player1)
    $Button = 1
    Case $Maus_pos[4] = $player2 And $Button <> 2
    GUICtrlSetData($label, "blau")
    DrawFrame ($player2)
    $Button = 2
    Case $Maus_pos[4] = $player3 And $Button <> 3
    GUICtrlSetData($label, "grün")
    DrawFrame ($player3)
    $Button = 3
    Case GUIGetMsg() = -3
    Exit
    Case Else
    Switch ($Button)
    Case 1
    If ($Maus_pos[4] <> $player1) Then
    DeleteFrame ($player1)
    $Button = 0
    EndIf
    Case 2
    If ($Maus_pos[4] <> $player2) Then
    DeleteFrame ($player2)
    $Button = 0
    EndIf
    Case 3
    If ($Maus_pos[4] <> $player3) Then
    DeleteFrame ($player3)
    $Button = 0
    EndIf
    EndSwitch

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    EndSelect
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func DrawFrame ($idCtrl)

    [/autoit] [autoit][/autoit] [autoit]

    Local $hwnd
    Local $hdc
    Local $rcClient
    Local $rcDraw
    Local $hbr

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $hwnd = GUICtrlGetHandle ($idCtrl)

    [/autoit] [autoit][/autoit] [autoit]

    $hbr = _WinAPI_GetStockObject ($BLACK_BRUSH)
    $hdc = _WinAPI_GetDC ($hwnd)
    $rcClient = _WinAPI_GetClientRect ($hwnd)

    [/autoit] [autoit][/autoit] [autoit]

    $rcDraw = DllStructCreate ("LONG;LONG;LONG;LONG")

    [/autoit] [autoit][/autoit] [autoit]

    DllStructSetData ($rcDraw, 3, 3)
    DllStructSetData ($rcDraw, 4, DllStructGetData ($rcClient, 4))
    _WinAPI_FillRect ($hdc, $rcDraw, $hbr)

    [/autoit] [autoit][/autoit] [autoit]

    DllStructSetData ($rcDraw, 3, DllStructGetData ($rcClient, 3))
    DllStructSetData ($rcDraw, 4, 3)
    _WinAPI_FillRect ($hdc, $rcDraw, $hbr)

    [/autoit] [autoit][/autoit] [autoit]

    DllStructSetData ($rcDraw, 1, DllStructGetData ($rcClient, 3) - 3)
    DllStructSetData ($rcDraw, 4, DllStructGetData ($rcClient, 4))
    _WinAPI_FillRect ($hdc, $rcDraw, $hbr)

    [/autoit] [autoit][/autoit] [autoit]

    DllStructSetData ($rcDraw, 1, 0)
    DllStructSetData ($rcDraw, 2, DllStructGetData ($rcClient, 4) - 3)
    _WinAPI_FillRect ($hdc, $rcDraw, $hbr)

    [/autoit] [autoit][/autoit] [autoit]

    _WinAPI_ReleaseDC ($hwnd, $hdc)

    [/autoit] [autoit][/autoit] [autoit]

    Return

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func DeleteFrame ($idCtrl)

    [/autoit] [autoit][/autoit] [autoit]

    _WinAPI_InvalidateRect (GUICtrlGetHandle ($idCtrl))
    Return

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc

    [/autoit]


    Gruß
    Greenhorn

  • Wenn Maus über Bild Rahmen erstellen

    • Greenhorn
    • 8. April 2012 um 15:41

    Füge noch die Standard-Flags hinzu:

    [autoit]

    GUICtrlSetStyle($player1, BitOr($SS_BLACKFRAME, $GUI_SS_DEFAULT_PIC))

    [/autoit]
  • Wenn Maus über Bild Rahmen erstellen

    • Greenhorn
    • 8. April 2012 um 15:25

    Hi,

    z.B. so:

    [autoit]

    GUICtrlSetStyle($player1, $SS_BLACKFRAME)

    [/autoit]


    Gruß
    Greenhorn

  • Scrollbar GUI

    • Greenhorn
    • 8. April 2012 um 15:15

    Hi,

    am sinnvollsten ist es, wenn Du Dich ein wenig in die Thematik einliest.

    About Scroll Bars

    Anschliessend solltest Du Dir das Beispiel aus der Hilfe zu der Funktion ansehen.


    Gruß
    Greenhorn

  • GUICtrlSetImage Icon und Bild problem

    • Greenhorn
    • 8. April 2012 um 15:03

    Hi,

    Du musst der Schaltfläche den Stil $BS_BITMAP mitgeben.


    Gruß
    Greenhorn

  • Festplattengeschwindigkeit (vom Linux Kernel ?) ausgebremst nach bestimmter Datenmenge

    • Greenhorn
    • 8. April 2012 um 11:55

    Moin,

    hast Du schon einmal im Ubuntu-Forum nachgefragt ?


    Gruß
    Greenhorn

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™