Beiträge von zemkedesign

RunAsWait("admin", @ComputerName, "passwort", 0, "\\Server\freigabe\ricoh.cmd " & Chr (34) & $drucker2 & Chr (34) & " " & Chr (34) & $drucker3 & "oemsetup.inf" & Chr (34) & " " & Chr (34) & "IP_" & $drucker4 & Chr (34), @SystemDir)

\\Server\freigabe\ sollte das Problem lösen (Zugriffsrechte müssen natürlich bestehen...)

Erstell dir die einzelnen Bilder für jede Prozentzahl, die du anzeigen möchtest und dann kannst du anstatt Progressbar zu verwenden GUICtrlCreatePic nutzen.

Ich hab mich dann doch selbst rangemacht und rausgekommen ist folgendes:

1) Script starten
2) Tastenkombi (kann aus ALT, Strg, Shift, 0-9, A-Z bestehen) drücken und loslassen
3) gedrückte Tastenkombi wird angezeigt.

zu 1) ja verstehe ich. Deswegen hab ich schon versucht klarzumachen, dass ich die Geschichte für ein "normales" Tool brauche.
zu 2) per GUI gehts leider nicht, da die Tastenkombinationen nicht von der Tastatur kommen, sondern von einer Fernbedienung. Bei der Fernbedienung ist nicht klar, welche Taste simuliert wird, wenn man auf einen Knopf der Fernbedienung gedrückt wird.

Dann muss ich doch allein ran.

Hallo zusammen,

mit _IsPressed() kann ich prüfen, ob eine bestimmte Taste gedrückt wurde.
Nun möchte ich gern ermitteln, welche Taste gedrückt wurde.

Hintergrund ist, dass ich gern die gedrückte Taste(-nkombination) "aufnehmen" und einer Aktion zuordnen möchte.

Mit _IsPressed() kann ich zwar alle Tasten nacheinander prüfen, ob diese gedrückt wurde. Aber wie schaut es z.B. mit Strg+A aus?

Gibt es da eine UDF oder muss ich selbst ran?

Gruß

Das Script funktioniert wesentlich besser und nutzerfreundlicher als das von Bugfix.

Habe noch zwei Vorschläge:
Wenn ich folgende Zeichenfolge eingebe, sollte das Script die Zahlen automatisch richtig verteilen:
010203 (d.h. nach 2 eingegebenen Zahlen im Tag- und Monatsfeld Cursor ins nächste Feld)
1.1.01 (d.h. mit Eingabe eines Punkts sollte der Cursor auch ins nächste Feld gesetzt werden.

$fenstername = "Arcsoft Total MediaTheatre"
WinWait($fenstername)
If Not WinActive($fenstername) Then WinActivate($fenstername)
WinWaitActive($fenstername)
Sleep(100)

; Wiedergabe stoppen
Send("{o}")

; TotalMedia Theatre beenden
ProcessClose("uDigital Theatre.exe")

Sleep(1000)

; Auflösung auf 50Hz stellen
send("^+5"); = CTRG + SHIFT +5

; DVBViewer starten
Run("C:\Program Files\DVBviewer\dvbviewer.exe")

Exit

Probier es mal wie es der Scriptwriter vorschlägt:

$fenstername = "Fenster"
WinWait($fenstername)
If Not WinActive($fenstername) Then WinActivate($fenstername)
WinWaitActive($fenstername)
Sleep(100)
Send("o")

Vorher minimierst du dein Programm um zu sehen, ob AutoIt es auch wirklich findet und in den Vordergrund bringt.

Ich hoffe dein Passwort ist nicht n8tisch!

Ist zwar nicht ganz entscheidend, aber mit Passwörtern sollte man sensibel umgehen.

Ich denke mal wenn du das Script aufrufst, werden die Send-Befehle direkt gesendet und das Zielfenster ist noch nicht aktiv.
Füge mal am Anfang des Scripts ein Sleep(5000) ein, starte das Script und klicke in deinem Programm manuell Pause. Dann sollte es zumindest nicht am Focus liegen.

Schau dir mal WinActivate an.

Const $dateiname = "datei.txt"

$zeile = FileReadLine($dateiname) ;Zeile wird aus Datei gelesen
$zeile += 1 ;gelesene Zahl wird um 1 erhöht
$dateihandle = FileOpen($dateiname, 2) ;Datei wird zum Schreiben geöffnet und der Inhalt wird gelöscht
FileWriteLine($dateihandle, $zeile) ;neue Zahl wird in Datei geschrieben
FileClose($dateihandle) ;Datei wird geschlossen

Firmenbedingt musste ich mich mit AutoIt beschäftigen, da das IT-Zentrum der Bundeswehr ebenfalls mit AutoIt Scripte programmiert.

Ich öffne dein Testtool und klicke mit der Maus in das zweite Feld (egal an welche Stelle) und schon kann ich nichts mehr eintippen.

Ich öffne dein Testtool und klicke mit der Maus und trage 01.02.2000 ein, setze den Cursor anschließend zwischen 0 und 1 und drücke entfernen. Damit werden die folgenden Stellen eingerückt und zeigen ein völlig anderes Datum.

Insgesamt finde ich den Umgang sehr ungewohnt und nicht intuitiv für den Nutzer. Ich persönlich finde führende Nullen in einem Ausdruck wesentlich schöner als ein Datum wie 4.5.2000, aber die Eingabe eines solchen Datum sollte schon möglich sein.

Case $nmsg = $button1
$zahl1 = GUICtrlRead($input1)
If $zahl1 > 50 then
MsgBox(0, "Hinweis", "Bitte nicht größer als 50!")
Else
;hier wird sonst etwas ausgeführt, wenn der Wert korrekt ist
EndIf

Warst doch fast richtig.

Wie sieht denn dein Script aus, wo du bei Fehleingabe das gesamte Script beendest?
Der Quellcode, den du gepostest hast, tut das nämlich nicht

Ich hatte mal zwei Funktionen geschrieben, die dir vielleicht helfen:

;gibt ein 2D-Array mit allen Farbpixeln zurück
;x & y: linke obere Ecke
;w + h: Ausdehnung
;Prozent der Genauigkeit: 100->jeder Pixel wird geprüft; 50->jeder zweite Pixel wird geprüft
Func get_colormap($x, $y, $w, $h, $prozent = 100)

Local $arr[$w][$h]

For $i = $x To ($x + $w - 1) Step Round(100 / $prozent)
For $j = $y To ($y + $h - 1) Step Round(100 / $prozent)
$arr[$i - $x][$j - $y] = PixelGetColor($i, $j)
Next
Next

Return $arr

EndFunc

;Vergleicht 2 Colormaps und gibt True/False zurück
;True: Maps sind gleich in jedem Pixel
Func compare_colormaps($map1, $map2)

Local $gleich = True

For $i = 0 To UBound($map1, 1) - 1
For $j = 0 To UBound($map1, 2) - 1
If $map1[$i][$j] <> $map2[$i][$j] Then
$gleich = False
ExitLoop
EndIf
Next
If Not $gleich Then ExitLoop
Next

Return $gleich

EndFunc

Viele Webserver weisen einen Ping ab. So wirds auch in deinem Fall sein. Ping funktioniert nicht und der Webserver ist trotzdem ansprechbar.

Local $handle = WinGetHandle("Internet Explorer","autoit")

Damit ist es nicht nutzbar für mich

$oIE = _IECreate(InputBox ("URL", "..."))