Beiträge von i2c

  • GUI help

    Spoiler anzeigen
    [autoit]


    #NoTrayIcon
    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

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

    #region ### START Koda GUI section ### Form=C:\Users\Firstshoot\Desktop\ping.kxf
    $Form1 = GUICreate("Form1", 291, 151, 192, 124)
    GUISetCursor(2)
    GUISetBkColor(0x000000)
    $URL = GUICtrlCreateInput("URL", 45, 10, 200, 21)
    GUICtrlSetBkColor(-1, 0x800000)
    $Start = GUICtrlCreateButton("Start", 45, 50, 200, 50, 0)
    GUICtrlSetBkColor(-1, 0x800000)
    GUICtrlSetCursor(-1, 2)
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Start
    $p = Ping(GUICtrlRead($URL))
    If Not @error Then
    MsgBox(0, "Status", "Server: Online - Time: " & $p)
    Else
    Switch @error
    Case 1
    $error = 'Der Computer ist offline'
    Case 2
    $error = 'Der Computer ist nicht erreichbar'
    Case 3
    $error = 'Falsche Adresse'
    Case 4
    $error = 'Andere Fehler'
    EndSwitch
    MsgBox(0, "Status", $error)
    EndIf
    EndSwitch
    WEnd

    [/autoit]

  • Notepad++ und AutoIt

    Ja, das Problem war die Masse an Keywords. Notepad war dann so frei, den einfach abzuschneiden.
    Ich hab vorher mit der lang.xml und syler.xml gespielt aber so wie es aussieht, kann man weder zu benutzerdefinierten
    noch zu integrierten Sprachen einfach einen neue WordsStyle erstellen und ihn mit einer Keywords Gruppe verbinden.
    Sehr unflexible das Ganze.

    Da muss dann wohl ein externer Lexer her.

  • Notepad++ und AutoIt

    Entschuldige das ich deinen Thread kapere aber du hast mich auf den Geschmack gebracht. :D
    Der Editor hat sich echt gemacht seit ich ihn das letzte mal benutzt hab. Deshalb nochmal ein
    autocomplete inkl. Funktionsbeschreibung und Parametern.
    c:\Programme\Notepad++\plugins\APIs\autoit.xml - Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    Mit der Syntaxhervorhebung hab ich allerdings ein paar Probleme, vielmehr bei der Bearbeitung. Einige Änderungen bleiben
    wirungslos und neue Keywords und Lexertypes werden scheinbar garnicht beachtet. Deshalb hab ich mir über den Spracheneditor
    ein eigenes Highlighting erstellt. Sollte da jemand Interesse haben ..
    Notepad++ -> Ansicht -> Benutzerdefinierte Sprache -> importieren - Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.
    Um den autocomplete nutzen zu können, muss die autoit.xml nochmal als au3.xml in c:\Programme\Notepad++\plugins\APIs\autoit.xml gespeichert werden.

    Die auto propercae Funktion vermisse ich :(

    edit: au3.zip aktualisiert. Npp scheint nicht mit der masse an UDFs umgehen zu können.

  • Notepad++ und AutoIt

    Funktioniert, soweit ich das im Moment beurteilen kann, fehlerfrei.
    Hab erfolgreich ein paar Skripte als x86 und x64 auf einem 64bit WIndows kompiliert. Mit und ohne UPX, verschieden Kompressionen. Nichts auffälliges.

    Du schreibst, du hättest für "Run" Strg+F5 vergeben. In deinem Shortcut Command ist aber Shift+F5 eingetragen.
    Sollte wohl so aussehen?

    Code
    <Command name="AutoIt Run" Ctrl="yes" Alt="no" Shift="no" Key="116">

    edit: Hab mir eben eine autocomplete XML gebastelt. Falls die noch jemand brauchen kann: c:\Programme\Notepad++\plugins\APIs\autoit.xml
    ~siehe Post#4~

  • Kompilieren mit CMD-Line Aufruf

    Der Pfad zur Aut2exe enthält auch eine Leerstelle, also gehören imho Quotes drumrum.

    Code
    "C:\Program Files\AutoIt3\Aut2exe\Aut2exe.exe" /in "C:\Test\test.au3" /icon "C:\Program Files\AutoIt3\Aut2Exe\Icons\AutoIt_Old1.ico" /comp 2 /nopack

  • FileRead / Ausgabe

    Zitat von deutsche Hilfe


    FileOpen ( "filename" [, mode ] )

    [optional] Modus in dem die Datei geöffnet werden soll.
    Kann auch eine Kombination aus folgenden sein:
    0 = Lesemodus (Standard)
    [...]

  • Includes in Datei einbinden

    Solltest du ein 64bit Windows verwenden, dann musst du die Pfade anpassen. AutoIt liegt dann in "C:\Program Files (x86)\AutoIt3\

    Spoiler anzeigen

  • Includes in Datei einbinden

    Wie Molaynox schon schrieb, während des Kompilierens wird der gesammte Inhalt der inkludierten Datei geholt und anstelle der #include<> Anweisung eingefügt. Also genau das was du möchtest.

    Das mit dem dekompilieren hast du überlesen, das ist illegal!

  • Input keine Buchstaben

    ja du, genau das passiert doch aber auch.

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #region - GUI Create
    GUICreate('',100,100)
    $i = GUICtrlCreateInput("", 4, 4, 80, 21, BitOR($ES_AUTOHSCROLL,$ES_NUMBER))
    GUISetState()
    #endregion

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

    #region - GUI SelectLoop
    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    Exit
    EndSelect
    WEnd
    #endregion

    [/autoit]

  • Externe Konsolen auslese

    &quot;aus der deutschen Hilfe
    [autoit]

    ; Demonstriert StdoutRead()
    #include <Constants.au3>

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

    Local $foo = Run(@ComSpec & " /c dir foo.bar", @SystemDir, @SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD)
    Local $line
    While 1
    $line = StdoutRead($foo)
    If @error Then ExitLoop
    MsgBox(0, "STDOUT gelesen:", $line)
    WEnd

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

    While 1
    $line = StderrRead($foo)
    If @error Then ExitLoop
    MsgBox(0, "STDERR gelesen:", $line)
    WEnd

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

    MsgBox(0, "Debug", "Wie aufregend...")

    [/autoit]

  • Obfuscated

    Ob du eine Funktion in dein Hauptskript schreibst oder über eine Datei inkludierst spielt für den Compiler keine Rolle. Betrachte das #include<> als einen Platzhalter. Während des Kompilierens wird er durch den Inhalt der eingebundene Datei ersetzt.

    Also ja, auch die includes werden verfremdet.

  • UEZ hat Geburtstag

    Externer Inhalt www.youtube.com
    Inhalte von externen Seiten werden ohne deine Zustimmung nicht automatisch geladen und angezeigt.
    Durch die Aktivierung der externen Inhalte erklärst du dich damit einverstanden, dass personenbezogene Daten an Drittplattformen übermittelt werden. Mehr Informationen dazu haben wir in unserer Datenschutzerklärung zur Verfügung gestellt.

    Du hättest das mit ein wenig GDI+ warscheinlich besser hinbekommen. ^^
    Alles Gute zum Geburtstag!!

  • drop down files in array ( array wert nach unten verschieben)

    &quot;Beispiel&quot;
    [autoit]

    #include <GuiListBox.au3>

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

    GUICreate("", 400, 200)
    $hListBox = GUICtrlCreateList("", 2, 2, 300, 200, BitOR($LBS_STANDARD, $LBS_EXTENDEDSEL))
    $hButtonUp = GUICtrlCreateButton("up", 310, 10)
    $hButtonDown = GUICtrlCreateButton("down", 310, 40)
    GUISetState()

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

    _GUICtrlListBox_BeginUpdate($hListBox)
    For $i = 1 To 9
    _GUICtrlListBox_AddString($hListBox, "Item " & $i)
    Next
    _GUICtrlListBox_EndUpdate($hListBox)

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    Exit
    Case $msg = $hButtonUp
    _moveUp()
    Case $msg = $hButtonDown
    _moveDown()
    EndSelect
    WEnd

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

    Func _moveUp()
    Dim $aIndex
    $aIndex = _GUICtrlListBox_GetSelItems($hListBox)
    If $aIndex[0] = 0 Then Return
    If $aIndex[1] <> 0 Then
    For $i = 1 To $aIndex[0]
    _GUICtrlListBox_SwapString($hListBox, $aIndex[$i], $aIndex[$i] - 1)
    Next
    EndIf
    EndFunc ;==>_moveUp

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

    Func _moveDown()
    Dim $aIndex
    $aIndex = _GUICtrlListBox_GetSelItems($hListBox)
    If $aIndex[0] = 0 Then Return
    If $aIndex[UBound($aIndex) - 1] < _GUICtrlListBox_GetCount($hListBox) - 1 Then
    For $i = 1 To $aIndex[0]
    _GUICtrlListBox_SwapString($hListBox, $aIndex[$i], $aIndex[$i] + 1)
    Next
    EndIf
    EndFunc ;==>_moveDown

    [/autoit]

  • Offizielles AutoIt Pokerstars Turnier (15.02.2011)

    Danke, hat Spass gemacht. :)
    Den Benutzertitel könnte ich selbst ändern aber ich denke das wird nicht notwendig sein.
    Ich würde mir jetzt meinen Handverlauf virtuell einrahmen aber der wird in Freerols ja leider
    nicht aufgezeichnet. Bleibt mir aber auf jeden Fall die Gewissheit, das ich wiedermal äusserst
    diszipliniert war. ^^

    Bis auf ein paar extreme Gambling Aktionen hatte ich das Gefühl, da spielen keine (nicht ausschlisslich) Anfänger.
    Hätte am Ende auch anders ausgehen können. Wenn ich Zeit hab, wär ich auf jeden Fall wieder mit dabei. Dann
    hoffentlich mit 10 - 12 Spielern mehr.

    jetzt geh ich mir schnell den Gestank des Eigenlobes abwaschen.