Beiträge von Shadowigor

  • Mathe/Berechnung?

    Ich würde es so machen. Ist vielleicht nicht die beste Lösung, aber was besseres ist mir nicht eingefallen.

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>

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

    Opt("MouseCoordMode", 0)

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

    Local $OffsetX = -1, $OffsetY, $ButtonX = 300, $ButtonY = 180

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

    $GUIGen = GUICreate("Beispielskript", 615, 438, 192, 124)
    $VButton = GUICtrlCreateButton("Julien", $ButtonX, $ButtonY, 72, 24)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    If $nMsg = $GUI_EVENT_CLOSE Then
    Exit
    EndIf

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

    $CursorState = GUIGetCursorInfo($GUIGen)

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

    If $CursorState[4] = $VButton And $CursorState[2] Then
    $MoveButton = True
    ElseIf Not $CursorState[2] Then
    $MoveButton = False
    $OffsetX = -1
    EndIf

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

    If $MoveButton Then
    If $OffsetX = -1 Then
    $OffsetX = $CursorState[0] - $ButtonX
    $OffsetY = $CursorState[1] - $ButtonY
    EndIf
    $ButtonX = $CursorState[0] - $OffsetX
    $ButtonY = $CursorState[1] - $OffsetY
    GUICtrlSetPos($VButton, $ButtonX, $ButtonY)
    EndIf

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

    WEnd

    [/autoit]


    Gruss Shadowiogor

  • Laufwerke in Combox einlesen

    Also so schwer ist das nicht. Du hattest es schon fast:

    Spoiler anzeigen
    [autoit]

    $idCombo = GUICtrlCreateCombo("", 50, 50, 80, 30)

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

    $aDrives = DriveGetDrive("ALL")

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

    For $i = 1 To $aDrives[0]
    $sDrives &= $aDrives[$i] & "|"
    Next

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

    GUICtrlSetData($idCombo, StringTrimRight($sDrives, 1), $aDrives[1])

    [/autoit]


    Gruss Shadoiwgor

  • Mausbewegung während eines Tastendrucks

    Es ist das integrierte Touchpad meines Laptops. Treiber sind aktuell. Und noch was: Wenn ich eine Taste drücke, dann kann ich die Maus noch so 2 sek. bewegen, aber dann ist fertig.

    PS: Ich habs jetzt noch mit meiner Funkmaus getestet und da funktioniert es Problemlos. Aber woran könnte das liegen...?

  • Mausbewegung während eines Tastendrucks

    Ich glaube das ist eher was grundsätzliches, denn dieses Verhalten habe ich bei allen Programmen, auch z.B. auf dem Desktop. Wenn ich dort z.B. die Leertaste gedrückt halte, kann ich die Maus auch nicht mehr bewegen. Aber bei Spielen funktioniert es ja problemlos. Dann müsste es doch eigentlich etwas geben um dieses Verhalten zu beeinflussen.

  • ISN AutoIt Studio

    Mich würde mal interessieren wie das mit den Plugins so funktioniert, die du in den Features beschreibst. Ist das schon fertig implementiert oder kommt das erst noch? Damit liessen sich sicher viele tolle Dinge machen... :D

    Gruss Shadowigor

  • Bilderkollision

    Wenns so nicht funktioniert weis ich auch nicht weiter:

    Spoiler anzeigen
    [autoit]

    Func _Collides($PosX1, $PosY1, $SizeX1, $SizeY1, $PosX2, $PosY2, $SizeX2, $SizeY2)

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

    If ($PosX1 < $PosX2) And ($PosY1 < $PosY2) And ($PosX2 < ($PosX1 + $SizeX1)) And ($PosY2 < ($PosY1 + $SizeY1)) Then Return True

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

    If ($PosX1 > $PosX2) And ($PosY1 < $PosY2) And ($PosX1 < ($PosX2 + $SizeX2)) And ($PosY2 < ($PosY1 + $SizeY1)) Then Return True

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

    If ($PosX1 > $PosX2) And ($PosY1 > $PosY2) And ($PosX1 < ($PosX2 + $SizeX2)) And ($PosY1 < ($PosY2 + $SizeY2)) Then Return True

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

    If ($PosX1 < $PosX2) And ($PosY1 > $PosY2) And ($PosX2 < ($PosX1 + $SizeX1)) And ($PosY1 < ($PosY2 + $SizeY2)) Then Return True

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

    Return False

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

    EndFunc

    [/autoit]

  • Textdatei auslesen

    Ich würds so machen:

    Spoiler anzeigen
    [autoit]

    $sString = FileRead($sPath)
    $aString = StringRegExp($sString, '".*"', 1)

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

    For $i = 0 To UBound($aString) - 1
    $aString[$i] = StringTrimLeft($aString[$i], 1)
    $aString[$i] = StringTrimRight($aString[$i], 1)
    Next

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

    ; $aString enthält jetzt alle ergebnisse

    [/autoit]

    Gruss Shadowigor

  • Bilderkollision

    Noch ungetestet, aber es sollte funktionieren:

    Spoiler anzeigen
    [autoit]

    Func _Collides($PosX1, $PosY1, $SizeX1, $SizeY1, $PosX2, $PosY2, $SizeX2, $SizeY2)

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

    If ($PosX1 < $PosX2) And ($PosY1 < $PosY2) And ($PosX2 < ($PosX1 + $SizeX1)) And ($PosY2 < ($PosY1 + $SizeY1)) Then Return True

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

    If ($PosX1 > $PosX2) And ($PosY1 < $PosY2) And ($PosX1 < ($PosX2 + $SizeX2)) And ($PosY2 < ($PosY1 + $SizeY1)) Then Return True

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

    If ($PosX1 > $PosX2) And ($PosY1 > $PosY2) And ($PosX1 < ($PosX2 + $SizeX2)) And ($PosY1 < ($PosY2 + $SizeY2)) Then Return True

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

    If ($PosX1 > $PosX2) And ($PosY1 > $PosY2) And ($PosX2 < ($PosX1 + $SizeX1)) And ($PosY1 < ($PosY2 + $SizeY2)) Then Return True

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

    Return False

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

    EndFunc

    [/autoit]