Beiträge von Oscar

Eh?
Das Control wird doch mit vergrößert. Was genau willst Du denn erreichen?

Du musst den Resizing-Befehl auch richtig einsetzen:

Rechenaufwand kenne ich auch nicht, aber von der Idee her eine interessante Aufgabe.
Und da wir ja mittlerweile Mitte März haben, könnte man die Aufgabe ja auf 2 Monate (+April) ausdehnen.

Das erreicht man mit dem Obfuscator. Dein Script vor dem compilieren durch den Obfuscator bearbeiten lassen.
Wenn Du "AutoIt3Wrapper_Gui.exe" (C:\Programme\AutoIt3\SciTE\AutoIt3Wrapper\) startest, bei "Run Obfuscator before compilation" einen Haken setzen.

Lass das Label "$lblwrar" einfach weg und schreib mit GUICtrlSetData($cbwrar, "Winrar = installiert") einen neuen Text in die Checkbox.
Größe der Checkbox evtl. anpassen, damit der neue Text hineinpasst.

So:

$hwnd = GUICreate("Word", 300, 300, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX))

Edit: und um der nächsten Frage zuvorzukommen:

Resizing geht mit:

$hwnd = GUICreate("Word", 300, 300, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX))

und die einzelnen Controls dann mit:

GUICtrlSetResizing(controlID, resizing)

Tut mir leid, aber meine Kristallkugel zeigt nur schleierhaftes.

Beschreib mal genau, was Du erreichen willst.

So:

Du suchst: _ChooseColor()

Wenn $cbwinrar eine globale Variable ist und in der Funktion soll sie $lblwinrar heißen, dann erstelle in der Funktion einfach eine solche Variable und weise ihr den Wert von $cbwinrar zu:

Local $lblwinrar = $cbwinrar

Upps!

Na gut, dann halt:

WinSetState("title", "text", @SW_DISABLE)

und:

WinSetState("title", "text", @SW_ENABLE)

Edit: Könnte natürlich Probleme mit der AutoIt-Kontrolle geben.
Wenn sich das Programm nicht mehr steuern läßt, dann bleibt wohl wirklich nur das transparente Fenster...

Für die Eingabe würde ich statt der drei Input-Felder lieber ein Date-Control benutzen:

#include <DateTimeConstants.au3>
#include <GUIConstantsEx.au3>

GUICreate("My GUI get time")
$hTime = GUICtrlCreateDate("", 20, 20, 90, 25, $DTS_TIMEFORMAT)
GUICtrlSetFont(-1, 12)
GUISetState()

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE

MsgBox(0, "Time", GUICtrlRead($hTime))

Da hast Du zum Einen gleich ein Up-/Down-Control und zum Anderen kann man keine falschen Werte eingeben (spart das Error-Handling).

Wenn Du die gesamte GUI deaktivieren willst, nimm:

GUISetState(@SW_DISABLE)

zum wieder aktivieren:

GUISetState(@SW_ENABLE)

[OT]
Rote LEDs benötigen ca. 1.8 Volt Spannung, wenn Du eine LowCurrent-LED besitzt, dann sollte man den Durchlassstrom auf ca. 2 mA begrenzen.
Formel:
Rv = U - Uled / Iled

4.9 - 1.8 / 0.002 = 1550 Ohm
[/OT]

SCNR

Ok, vielleicht muss man das etwas differenzieren. Deine Fragestellung ist hier ein wenig zweideutig.
Wenn es Dir nur darum geht die Länge des Tastendrucks von ein paar bestimmten Tasten zu ermitteln (wozu das auch immer gut sein soll), dann kannst Du das mittels TimerInit, TimerDiff und _IsPressed in den Griff kriegen.

Ich habe das allerdings so verstanden, dass Du die Länge des Tastendrucks von allen Tasten ermiteln willst, was einen anderen Lösungsansatz erfordern würde, der dann leicht als Keylogger zu mißbrauchen wäre.

Das würde auf einen Keylogger hinauslaufen und sowas unterstützen wir hier nicht.

Dein Fehler besteht darin, dass Du einen Parameter vergessen hast:

GUICtrlSetFont($EditText, 9, 550, "Verdana")

Richtig wäre:

GUICtrlSetFont($EditText, 9, 550, 0, "Verdana")

Wieso 9, ich denke 10?

Zitat

Ich bekomme folgendes zurück: >10<

Wenn dabei 10 rauskommt, kann die If-Abfrage ja auch nicht klappen.

Zitat

Was soll daran nicht funktionieren?

D:\AutoIt\test14.au3(4,40) : ERROR: _wmpcreate(): undefined function.
$oPlayer = _wmpcreate(0, 0, 0, 160, 165)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
D:\AutoIt\test14.au3(8,31) : ERROR: _wmpvalue(): undefined function.
_wmpvalue($oPlayer, "controls")
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
D:\AutoIt\test14.au3(12,79) : ERROR: _wmploadmedia(): undefined function.
_wmploadmedia($oPlayer, "http://www.wdr.de/wdrlive/media/einslive-wm32.asx", 1)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
D:\AutoIt\test14.au3 - 3 error(s), 0 warning(s)

Da fehlt wohl was...

Pack mal das hier anstelle von Zeile 10 rein:

MsgBox(0, "", ">" & $playerstate & "<" & @CRLF & IsNumber($playerstate))

P.S.: ein Beispielscript sollte auch bei jedem funktionieren. Ansonsten hat es wenig Sinn.