Beiträge von $var

$var

ImageSearchDLL.dll in C:\Windows\SysWOW64 ablegen.
Rechtsklick aufs Script -> Run Script (x86)

LG

$var

Etwa so sollte es funktionieren... Setze einfach alle relevanten Werte wieder zurück.

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$GUI = GUICreate("Ratespiel", 202, 178, 428, 314)
$Tipp = GUICtrlCreateButton("Tipp", 8, 80, 91, 25)
$Reset = GUICtrlCreateButton("Reset", 104, 80, 91, 25)
$Text = GUICtrlCreateLabel("Rate eine Zahl zwischen 0 und 100", 8, 16, 188, 17, $SS_CENTER)
$Result = GUICtrlCreateLabel("", 8, 48, 184, 17, $SS_CENTER)
$Sub = GUICtrlCreateButton("- 1", 8, 112, 27, 25)
$Add = GUICtrlCreateButton("+ 1", 168, 112, 27, 25)
$Slider = GUICtrlCreateSlider(40, 112, 118, 21)
$Value = GUICtrlCreateLabel("0", 48, 144, 102, 25, $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Sub10 = GUICtrlCreateButton("- 10", 8, 144, 27, 25)
$Add10 = GUICtrlCreateButton("+ 10", 168, 144, 27, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

Global $Random = Random(0,100,1)
Global $Guess = 0
Global $Tipps = 0

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg

Case $GUI_EVENT_CLOSE
Exit

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

Case $Tipp
$Tipps = $Tipps+1
If $Guess = $Random Then
$Result = GUICtrlCreateLabel("...", 8, 48, 184, 17, $SS_CENTER)
sleep (500)
$Result = GUICtrlCreateLabel("Mit "&$Tipps&" versuchen Gewonnen!", 8, 48, 184, 17, $SS_CENTER)
EndIf
If $Guess > $Random Then
$Result = GUICtrlCreateLabel("...", 8, 48, 184, 17, $SS_CENTER)
sleep (500)
$Result = GUICtrlCreateLabel(".. weniger ..", 8, 48, 184, 17, $SS_CENTER)
EndIf
If $Guess < $Random Then
$Result = GUICtrlCreateLabel("...", 8, 48, 184, 17, $SS_CENTER)
sleep (500)
$Result = GUICtrlCreateLabel(".. mehr ..", 8, 48, 184, 17, $SS_CENTER)
EndIf

Case $Slider
$Guess = GUICtrlRead($Slider)
$Value = GUICtrlCreateLabel(""&$Guess, 48, 144, 102, 25, $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")

Case $Sub
If $Guess < 1 Then
$Guess = 1
EndIf
GUICtrlSetData($Slider, $Guess-1)
$Value = GUICtrlCreateLabel(""&$Guess-1, 48, 144, 102, 25, $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Guess = $Guess-1

Case $Add
If $Guess > 99 Then
$Guess = 99
EndIf
GUICtrlSetData($Slider, $Guess+1)
$Value = GUICtrlCreateLabel(""&$Guess+1, 48, 144, 102, 25, $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Guess = $Guess+1

Case $Sub10
If $Guess < 10 Then
$Guess = 10
EndIf
GUICtrlSetData($Slider, $Guess-10)
$Value = GUICtrlCreateLabel(""&$Guess-10, 48, 144, 102, 25, $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Guess = $Guess-10

Case $Add10
If $Guess > 90 Then
$Guess = 90
EndIf
GUICtrlSetData($Slider, $Guess+10)
$Value = GUICtrlCreateLabel(""&$Guess+10, 48, 144, 102, 25, $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Guess = $Guess+10

Case $Reset
;~ MsgBox(0,"Check Value Box","Guess ist = "&$Guess&@CRLF&"Random = "&$Random&@CRLF&"Slider = "&GUICtrlRead($Slider)) ;~ nur zu testzwecken.
$Random = Random(0,100,1)
$Guess = 0
$Tipps = 0
GUICtrlSetData($Result, "")
GUICtrlSetData($Value, 0)
GUICtrlSetData($Slider, 0)
EndSwitch
WEnd

[/autoit]

Habs nur überflogen, sehe aber, dass du u. a. die Controls $Result und $Value immer neu erstellst. Benutz dafür lieber GUICtrlSetData.

LG

$var

[autoit]

WinMove($hGUI, '', Default, Default, 640, 480) ; Die zwei letzten Parameter entsprechen Breite & Höhe.

[/autoit]

$var

Versuchs mal mit ClipPut.

[autoit]

ClipPut(ControlGetText('[CLASS:Notepad]', '', 15))

[/autoit]

$var

_StringBetween gibt ein Array zurück.
In den Zeilen 22 & 23 brauchst du also $string[0].

MfG

$var

[autoit]

#include <Array.au3>

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

Global $a_Array1[5] = [Chr(Random(0, 255, 1)), Chr(Random(0, 255, 1)), Chr(Random(0, 255, 1)), Chr(Random(0, 255, 1)), Chr(Random(0, 255, 1))]
Global $a_Array2[1] = ['neu']

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

_ArrayDisplay($a_Array1, 'Altes Array')

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

_ArrayAdd($a_Array1, $a_Array2[0]) ; <!--

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

_ArrayDisplay($a_Array1, 'Neues Array')

[/autoit]

$var

[autoit]

#include <Array.au3>

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

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

Global $a_Array, $a_Split, $i_Zeile
$a_Array = StringSplit($s_String, @LF)

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

$i_Zeile = Random(1, $a_Array[0], 1) ; Zufällige Zeile
;~ $i_Zeile = 4

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

$a_Split = StringSplit($a_Array[$i_Zeile], '|')
MsgBox(0, 'Erste Spalte von Zeile ' & $i_Zeile, $a_Split[1])
MsgBox(0, 'Zweite Spalte von Zeile ' & $i_Zeile, $a_Split[2])

[/autoit]

$var

[autoit]

#include <Array.au3>

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

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

Global $a_Array, $a_Split, $a_Msg[2]
$a_Array = StringSplit($s_String, @LF)

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

For $i = 1 To $a_Array[0]
$a_Split = StringSplit($a_Array[$i], '|')
$a_Msg[0] &= $a_Split[1] & @LF
$a_Msg[1] &= $a_Split[2] & @LF
Next

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

MsgBox(0, 'Erste Spalte', $a_Msg[0])
MsgBox(0, 'Zweite Spalte', $a_Msg[1])

[/autoit]

$var

[autoit]

Func Dropdown_feed()
Local $string, $temp
$csv = FileOpen($bzpath)
$anzahl = _FileCountLines($bzpath)
MsgBox(0,"TEST", $anzahl)
Global $zeilen[$anzahl+1][2] ; Globale Deklaration in einer Funktion? Sowas macht man nicht.
For $i = 0 to $anzahl
$string = FileReadLine($bzpath,$i)
For $j = 0 To 1
$temp = StringSplit($string, ";")
$zeilen[$i][0] = $i
$zeilen[$i][1] = $temp[1]
$zeilen[$i][2] = $temp[2]
Next
Next
_ArrayDisplay($zeilen,"TEST")
EndFunc

[/autoit]

$var

[autoit]

Global $s_String = '-135'
Global $n_Float = Number($s_String / 100)
MsgBox(0, '', $n_Float)

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

$s_String = '-55'
$n_Float = Number($s_String / 100)
MsgBox(0, '', $n_Float)

[/autoit]

Hm?

$var

Versuchs mal das letzte Parameter auf '1' zu setzen.
Also:

[autoit]

Send('123456@1234.com', 1)

[/autoit]

$var

Du musst das X in geschweifte Klammern setzen, damit es funktioniert.

[autoit]

HotKeySet("{x}", "MeinExit")

[/autoit]

$var

Return? Also Zeilenumbrüche like @CRLF?
Dir sind bei dir bereits im Array enthalten.

Spoiler anzeigen

[autoit]

#include <Array.au3>

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

Global $s_String = 'Das ist ein Text,' & @CRLF & 'der über zwei Zeilen geht.'
Global $a_Split = StringSplit($s_String, '', 2)

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

_ArrayDisplay($a_Split)

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

For $i = 0 To UBound($a_Split) - 1
ConsoleWrite($a_Split[$i])
Next

[/autoit]

$var

Dass das Problem so banal ist, habe ich wirklich nicht gedacht.
Funktioniert bestens. Herzlichen Dank.

$var

Guten Tag.
Sorry wegen dem Titel - ich kann das Problem leider gar nicht mit einem Einzeiler beschreiben.

Es sieht folgendermaßen aus:
Im Script benutze ich einen Accelerator, um eine Funktion aufzurufen, in der ein Control versteckt und deaktiviert wird ($GUI_HIDE + $GUI_DISABLE).
Das Problem ist dann, dass danach die WM_MOUSEWHEEL-Funktion nicht mehr funktioniert, bis das Fenster minimiert und wieder geöffnet wird.

Nutze ich dafür keinen Accelerator, sondern einen gewöhnlichen Button o. ä., dann gibt es das Problem nicht.
Es funktioniert auch, wenn ich das Control lediglich verstecke ($GUI_HIDE) - aber für das Endprodukt kommen diese beiden Optionen nicht in Frage...

Der Wunsch ist also, per Accelerator das Control verstecken und deaktivieren und danach trotzdem noch das Mausrad nutzen zu können.

Spoiler anzeigen

Hier ist ein stark vereinfachtes Script. Bekommt das jemand zum Laufen?

[autoit]

Global $h_Gui, $h_Input, $h_Dummy
Global $a_Accel[1][2] = [['{enter}']]

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

$h_Gui = GUICreate('')
$h_Input = GUICtrlCreateInput('', 10, 10, 100, 20)
$h_Dummy = GUICtrlCreateDummy()
$a_Accel[0][1] = $h_Dummy

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

GUISetAccelerators($a_Accel, $h_Gui)
GUISetState(@SW_SHOW, $h_Gui)
GUIRegisterMsg(0x020A, 'WM_MOUSEWHEEL') ; $WM_MOUSEWHEEL = 0x020A

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

While True
Switch GUIGetMsg()
Case -3
Exit
Case $h_Dummy
; $GUI_HIDE = 32
; $GUI_DISABLE = 128

GUICtrlSetState($h_Input, 160)
;GUICtrlSetState($h_Input, 32)
EndSwitch
WEnd

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

Func WM_MOUSEWHEEL($h_Wnd, $n_Msg, $w_Param)
If $w_Param = 0x00780000 Then
ConsoleWrite('up' & @CRLF)
ElseIf $w_Param = 0xFF880000 Then
ConsoleWrite('down' & @CRLF)
EndIf
EndFunc ;==> WM_MOUSEWHEEL

[/autoit]

LG

$var

Zitat von Sol.LrMartyn

Natürlich habe ich auf meinem Rechner UAC ausgeschaltet und vorsichtshalber #RequireAdmin eingefügt

Bei mir ist es halt so, dass ich diese eine Datei als #include "data.sol" eingefügt habe (.sol hat nichts zubedeuten, könnte auch .txt sein, xD).
Ansonsten wüsste ich nicht wie ich andere Variablen einfügen sollte? Liegt vielleicht genau hier mein Fehler?

Befinden sich in dieser data.sol-Datei die Variablen, die du aus der PHP-Datei holst?
Wenn ja, dann ist genau das das Problem, denn das #include wird beim Kompilieren einmalig eingebunden und ist in der Exe nicht mehr 'dynamisch'. Deshalb hast du die fixen Werte...

$var

[autoit]

Global $i = 2.524139
MsgBox(0, '', StringReplace(Round($i, 1), '.', ','))

[/autoit]

$var

Spoiler anzeigen

[autoit]

#include <GDIPlus.au3>

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

Opt('MustDeclareVars', 1)
Opt('GUIOnEventMode', 1)
_GDIPlus_Startup()

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

Global $i_WIDTH = 400, $i_HEIGHT = 300
Global $h_GUI, $h_Graphic

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

$h_GUI = GUICreate('', $i_WIDTH, $i_HEIGHT)
$h_Graphic = _GDIPlus_GraphicsCreateFromHWND($h_GUI)
GUISetOnEvent(-3, '_Exit', $h_GUI)
GUISetState(@SW_SHOW, $h_GUI)

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

While True
For $i = 5 To 0 Step - 1
_GDIPlus_GraphicsClear($h_Graphic, 0xFFFFFFFF)
_GDIPlus_GraphicsDrawString($h_Graphic, $i, ($i_WIDTH / 2) - 6, ($i_HEIGHT / 2) -
Sleep(1000)
Next
WEnd

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

Func _Exit()
_GDIPlus_GraphicsDispose($h_Graphic)
_GDIPlus_Shutdown()
Exit
EndFunc

[/autoit]

So...?

$var

Mit _GDIPlus_GraphicsDrawString wird das nicht funktionieren, da du damit weder die Schriftfarbe noch die Ausrichtung noch sonst etwas einstellen kannst.
Eine ziemlich blöde Funktion und nicht ernsthaft zu gebrauchen... Du müsstest dabei zu _GDIPlus_GraphicsDrawStringEx greifen.
In der Hilfe findest du Hilfe dazu.

Ganz ehrlich muss ich aber sagen, dass diese Funktion absolut überkompliziert aufgebaut ist. Gerade am Anfang schreckt sie ziemlich ab, da man dafür ziemlich viel erstellen und disposen muss. Außerdem ist sie langsamer, als die Custom-Variante... Die Entscheidung liegt bei dir.

$var

Hier und hier.
Wenn man beide Tutorials abarbeitet, versteht man eigentlich die Funktionalität.

Viel Erfolg.

Beiträge von $var

ImageSearch funktioniert nicht.

Reset Knopf

GUI Größe verändern

Probleme etwas in die zwischenablage zu kopieren

Stringbetween ist leer

Zeile aus Array einem anderen Array hinzufügen

Spalte auslesen.

Spalte auslesen.

string split problem

String in Float umwandeln

Problem mit send @ und #

Wechsel zwischen Fenster alle x Sekunden

Return-Befehle in ein Array mit-speichern

Unverträglichkeit von Msg & State

Unverträglichkeit von Msg & State

Variablen in einer Datei, welche im Internet ist (InetRead)

Autoit Round mit Komma ausgeben lassen

GDI+ Countdown

Text automatisch vergrößern

Text automatisch vergrößern