Beiträge von PengShui

  • Inbutbox > Eingabe in Variable speichern und weiterverwenden

    Nun ists abe gut! Ihr habts geschafft. Ich werde hier keine Fragen mehr stellen und mir ein anderes Forum suchen.
    Jedes mal wenn man eine mickrige Frage stellt bekommt man irgendetwas unterstellt. Ich habe einfach ein paar Zeilen weggelassen um alles bissl zu kürzen.
    Das Skript sollte nichts anderes tun, als X Tabs mit Fotos die ich mir den Tag über rausgesucht habe (und deren Anzahl ich gerne eintippen möchte) per Rechtsklick > Speichern unter am Abend in einen Ordner zu packen....gleiches mit geöffneten PDF-Dokumenten.
    Ich weiß mir aktuell (als Anfänger) nicht anders zu helfen als über die Tab-Anzahl zu gehen. Das war das erste, was mir einfiel. Und es soll ja auch kein profi-Ding werden sondern nur meine privaten banalen Mini-Ansprüche erfüllen und mir (egal wie) die Klickerei abnehmen.

    Ich habe keine Lust mehr.
    Problem ist mitlerweile auch gelöst.
    Ich hab vergessen eine Variable als Global zu definieren....warum das jetzt das Problem gelöst hat ist mir nicht ganz klar. Aber egal. Ich frage woanders.

  • Inbutbox > Eingabe in Variable speichern und weiterverwenden

    Hallo ihr Lieben,

    ich habe mal wieder eine kleine Anfänger-Frage.
    Ich möchte gerne, dass beim Start des Skriptes der User ein Fenster mit Eingabemöglichkeit angezeigt bekommt, er seinen Wert eintippt, der Wert in eine Variable gespeichert wird und dann in einer Berechnung verwendet werden kann....aber so einfach wie ichs mir denke ist es mal wieder nicht. Auch gut möglich, dass ich den Befehl "Inputbox" nicht richtig verstanden habe oder dergleichen.
    Vielleicht könnt ihr ja helfen :)

    [autoit]

    #AutoIt3Wrapper_usex64=n
    #include <Misc.au3>

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

    HotKeySet("{ESC}", "ende")
    Global $zahl
    Global $anzahl

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

    While 1
    Sleep(1000)
    starten()
    WEnd

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

    Func starten()
    Sleep(200)
    If _IsPressed(12) Then ;;wenn Pfeil-Taste gedrückt starte go()
    Sleep(300)
    go()
    EndIf

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

    If _isPressed(26) Then ;wenn Pfeil-Taste gedrückt starte straight()
    Sleep(300)
    straight()
    EndIf
    EndFunc

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

    Func go()
    $zahl = InputBox("Dein Wert", "Was willst du eingeben?", "", "") ;<==== hier wills nicht

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

    If not @error Then
    $anzahl = Number($zahl) ;string soll in Int umgewandelt werden
    EndIf
    DO
    ...
    Until ...
    EndFunc

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

    Func straight()
    $zahl = InputBox("Dein Wert", "Was willst du eingeben?", "", "")
    If not @error Then
    $anzahl = Number($zahl)
    EndIf
    DO
    ....
    Until
    EndFunc

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

    Func ende()
    Exit
    EndFunc ;==>ende

    [/autoit]

    Ich wollte eigentlich ungern eine eigene GUI schreiben für so eine Mini-Eingabe. Ich habe gelesen dass der InputBox-Befehl häufig in Verbindung mit ini-Dateien genutzt wird. Gehts vielleicht nicht ohne?
    Komm ich da drum herum?
    Die Funktionen lassen sich allesamt ohne die Input-Boxen ausführen ohne Probleme.
    Wäre nett wenn jemand einen Hinweis hätte.

    LG

  • _ImageSearch-Problem > tut einfach nix

    Wer blutiger Anfänger ist, liest sich in die Programme anderer rein und nimmt sich raus was passend erscheint. Denn wer kann sich schon alles ohne einlesen selbst erdenken? Wer soll sonst irgendwie eine Struktur verstehen?

    [autoit]

    HotKeySet("{Space}", "starten")
    HotKeySet("{ESC}", "ende")

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

    While 1
    sleep(200)
    If _IsPressed(20) Then
    starten()
    EndIf
    WEnd

    [/autoit]

    Mein Fehler war meine Funktion garnicht erst zu starten....also ein Basics-Problem. Wer Fehler macht, der lernt.
    Aber danke für eure freundliche Hilfe.

  • _ImageSearch-Problem > tut einfach nix

    Hallo ihr Lieben,

    ich bin grade dabei mich ein wenig in ImageSearch einzulesen aber stoße schon am Anfang auf Probleme.
    Ich habe ein kleines Skript geschrieben, das einfach nur ein Fenster (Klick oben rechts auf rotes X) schließen soll,...klappt aber nicht.
    Das gute Prog tut einfach nix. Es läuft zwar und lässt sich beenden aber sonst rein garnix.
    Ich seh sicher nur den Wald vor lauter Bäumen nicht:

    [autoit]

    #include <ImageSearch.au3>

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

    HotKeySet("{Space}", "starten")
    HotKeySet("{ESC}", "ende")

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

    $koordX = 0
    $koordY = 0

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

    While 1
    sleep(20000)
    WEnd

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

    Func starten()
    While 1
    $schlafenPic = _ImageSearch("exit.jpg",1,$koordX,$koordY,1)
    If $schlafenPic = 1 Then
    MouseClick($koordX,$koordY)
    Sleep(200)
    EndIf
    WEnd
    EndFunc

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

    Func ende()
    exit 0
    EndFunc

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

    Wäre nett wenn ihr mir auf die Sprünge helfen könntet :)