Mir würde nen Laptop noch genügen ;), aber habe letztens schon einen Pc gekauft und soooo viel geld hab ich auch net
Beiträge von blubbstar
-
-
Vollkommen richtig. Der gleiche Spaß funktioniert natürlich auch noch mit - * u /.
-
In die Registry eintragen oder in eine Txt schreiben oder in eine Ini schreiben Alles was du möchtest :P. Ich empfehle eine txt, geht am schnellsten :). Sauberer wäre ein Registryeintrag.
Warum sind alle schneller ?
-
Spoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
; ------------------------ Hauptfenster -----------
Global $InputAufloesungsAuswahlA, $InputAufloesungsAuswahlB, $InputAufloesungsAuswahlC, $InputAufloesungsAuswahlD, $InputAufloesungsAuswahlE, $InputAufloesungsAuswahlF
Global $InputAufloesungsAuswahlG, $InputAufloesungsAuswahlH
Global $FormOptionen
#region ### START Koda GUI section ### Form=
Opt("GUIOnEventMode", 1)
$Form1 = GUICreate("Beispiel", 116, 68, 193, 125)
$Label1 = GUICtrlCreateLabel("Test", 32, 8, 44, 28 )
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$MenuItem1 = GUICtrlCreateMenu("Optionen ")
$MenuItem2 = GUICtrlCreateMenuItem("Optionen", $MenuItem1)
GUISetState(@SW_SHOW)
#endregion ### START Koda GUI section ### Form=GUISetOnEvent($GUI_EVENT_CLOSE, "_exit")
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetOnEvent($MenuItem2, "_Optionen")While 1
[/autoit] [autoit][/autoit] [autoit]
Sleep(100)
WEnd;--------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]Func _Optionen()
[/autoit] [autoit][/autoit] [autoit]
;---------------------- Optionsfenster --------------
#region ### START Koda GUI section ###
$FormOptionen = GUICreate("Optionen", 213, 159, 193, 125)
$Label1 = GUICtrlCreateLabel("Bitte wählen sie ihre Auflösung des Spiels:", 8, 8, 202, 17)
$InputAufloesungsAuswahlA = GUICtrlCreateRadio("z.b. Auf. 1", 24, 32, 73, 17)
$InputAufloesungsAuswahlB = GUICtrlCreateRadio("z.b. Auf. 2", 24, 56, 73, 17)
$InputAufloesungsAuswahlC = GUICtrlCreateRadio("z.b. Auf. 3", 24, 80, 73, 17)
$InputAufloesungsAuswahlD = GUICtrlCreateRadio("z.b. Auf. 4", 24, 104, 73, 17)
$InputAufloesungsAuswahlE = GUICtrlCreateRadio("z.b. Auf. 5", 120, 32, 73, 17)
$InputAufloesungsAuswahlF = GUICtrlCreateRadio("z.b. Auf. 6", 120, 56, 73, 17)
$InputAufloesungsAuswahlG = GUICtrlCreateRadio("z.b. Auf. 7", 120, 80, 73, 17)
$InputAufloesungsAuswahlH = GUICtrlCreateRadio("z.b. Auf. 8", 120, 104, 73, 17)
$EinstellSpeichern = GUICtrlCreateButton("Einstellung speichern", 48, 128, 115, 25, 0)
GUISetState(@SW_SHOW)
#endregion ### START Koda GUI section ###GUISetOnEvent($GUI_EVENT_CLOSE, "Optdel")
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetOnEvent($EinstellSpeichern, "_SaveAufloesungsAuswahl")
;------------------------------------------------
EndFunc ;==>_OptionenFunc Optdel()
[/autoit] [autoit][/autoit] [autoit]
GUIDelete($FormOptionen)
EndFunc ;==>OptdelFunc _SaveAufloesungsAuswahl()
[/autoit] [autoit][/autoit] [autoit]
If GUICtrlRead($InputAufloesungsAuswahlA) = $GUI_CHECKED Then
Global $SaveAufloesungsAuswahl = "A"
ElseIf GUICtrlRead($InputAufloesungsAuswahlB) = $GUI_CHECKED Then
Global $SaveAufloesungsAuswahl = "B"
ElseIf GUICtrlRead($InputAufloesungsAuswahlC) = $GUI_CHECKED Then
Global $SaveAufloesungsAuswahl = "C"
ElseIf GUICtrlRead($InputAufloesungsAuswahlD) = $GUI_CHECKED Then
Global $SaveAufloesungsAuswahl = "D"
ElseIf GUICtrlRead($InputAufloesungsAuswahlE) = $GUI_CHECKED Then
Global $SaveAufloesungsAuswahl = "E"
ElseIf GUICtrlRead($InputAufloesungsAuswahlF) = $GUI_CHECKED Then
Global $SaveAufloesungsAuswahl = "F"
ElseIf GUICtrlRead($InputAufloesungsAuswahlG) = $GUI_CHECKED Then
Global $SaveAufloesungsAuswahl = "G"
ElseIf GUICtrlRead($InputAufloesungsAuswahlH) = $GUI_CHECKED Then
Global $SaveAufloesungsAuswahl = "H"
EndIfIniWrite(@ScriptDir & "\Config.ini", "Einstellungen", "Aufloesung", "" & $SaveAufloesungsAuswahl & "")
[/autoit] [autoit][/autoit] [autoit]
IniWrite(@ScriptDir & "\Config.ini", "Einstellungen", "SchonMalGestartet", "1")
GUIDelete($FormOptionen)
EndFunc ;==>_SaveAufloesungsAuswahlFunc _exit()
[/autoit]
Exit
EndFunc ;==>_exitIst im OnEventMode geschrieben, finde ich lassen sich die Fenster besser koordinieren und ist auch übersichtlicher Klappt nun so wie du möchtest.
-
[autoit]
Opt("GUIOnEventMode", 1)
[/autoit][autoit][/autoit][autoit]
GUICreate("TEST", 800, 800)$label = GUICtrlCreateLabel("test", 200, 200)
[/autoit][autoit][/autoit][autoit]GUISetState(@SW_SHOW)
[/autoit][autoit][/autoit][autoit]GUICtrlSetOnEvent($label, "seite")
[/autoit][autoit][/autoit][autoit]While 1
[/autoit][autoit][/autoit][autoit]
Sleep(100)
WEndFunc seite()
[/autoit]
ShellExecute("http://autoit.de")
EndFunc ;==>seite -
[autoit]
GUICtrlSetLimit(-1, 25)
[/autoit] -
[autoit]
$i1 = GUICtrlCreateCombo($aG, 197, 192, 150, 21)
[/autoit]
GUICtrlSetData(-1,$iS&"|"&$tB,$aG)Sorry für die späte Antwort
Edit: haha Tweaky, jetzt warst wohl schneller
-
Du könntest die Ergebnisse speichern und später immer abfragen. Wenn bei random halt eine dieser Zahlen rauskommt, soll er ebend erneut raten.
Edit :
-
Spoiler anzeigen
[autoit]$WINSTYLE = $WS_POPUP
[/autoit] [autoit][/autoit] [autoit]
Func START()
$Form1 = GUICreate("Startcenter", 185, 440, 10, 10, $WINSTYLE, 0)
$Button0 = GUICtrlCreateButton("Icon aufs Desktop kopieren", 15, 0, 156, 26)GUISetFont(14, 400, "", $font)
[/autoit] [autoit][/autoit] [autoit]
$Button1 = GUICtrlCreateButton("(1)", 15, 35, 156, 26)
$Button2 = GUICtrlCreateButton("(2)", 15, 70, 156, 26)
$Button3 = GUICtrlCreateButton("(3)", 15, 105, 156, 26)
$Button4 = GUICtrlCreateButton("(4)i", 15, 140, 156, 26)
$Button5 = GUICtrlCreateButton("(5)", 15, 175, 156, 26)
$Button6 = GUICtrlCreateButton("(6)", 15, 210, 156, 26)
$Button7 = GUICtrlCreateButton("(7)", 15, 245, 156, 26)
$Button8 = GUICtrlCreateButton("(8)", 15, 280, 156, 26)
$Button9 = GUICtrlCreateButton("(9)", 15, 315, 156, 26)
GUISetState(@SW_SHOW)While 1
[/autoit]
Sleep(100)
WEnd
EndFunc ;==>STARTDie Schleife ist notwendig, da das script sonst fertig ist und sich sofort wieder beendet.
Ich bin davon ausgegangen, das du mir nur einen Teil geschickt hast und den include schon im anderen teil hast, und $font auch schon definiert hast. Wenn nicht halt oben noch #include <GuiConstants.au3> und $font = "Arial" o. ä. und natürlich die funktion start aufrufen. -
Hi ;),
[autoit]#include <GuiConstants.au3>
[/autoit]
GUICtrlSetState($Checkbox1, $GUI_CHECKED)den include natürlich nur, wenn du ihn noch nicht hast ;). Fals du ihn bereits oben im Script hast, fällt die Zeile natürlich weg.
-
Kein Problem ;).
Gute nacht.
-
Oh man Nismo...
Spoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit]
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("King-Blade´s Movie Searcher", 780, 447, 196, 157)
GUISetBkColor(0x3D95FF)
$Serienname = GUICtrlCreateInput("Serienname", 16, 64, 161, 21)
$Folgennummer = GUICtrlCreateInput("Folgennummer", 16, 104, 161, 21)
$Suche = GUICtrlCreateButton("Suche", 56, 144, 89, 25, 0)
$List1 = GUICtrlCreateList("", 344, 8, 185, 240)
GUICtrlSetData(-1, "Beschreibung:")
GUICtrlSetBkColor(-1, 0x9DB9EB)
$Skins = GUICtrlCreateButton("Skins", 592, 352, 121, 25, 0)
$Pic1 = GUICtrlCreatePic("", 0, 0, 185, 185, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic2 = GUICtrlCreatePic(@Scriptdir & "\kingblade.JPG", 536, 232, 241, 97, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Avi1 = GUICtrlCreateAvi("No File", -1, 536, 8, 241, 177)
$OpenSearch = GUICtrlCreateButton("OpenSearch", 32, 16, 129, 25, 0)
$List2 = GUICtrlCreateList("", 192, 8, 145, 175)
GUICtrlSetBkColor(-1, 0x9DB9EB)
$Pic3 = GUICtrlCreatePic(@Scriptdir & "\logo.JPG", 8, 192, 321, 241, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Entwickelt = GUICtrlCreateLabel("Entwickelt", 376, 280, 122, 37)
GUICtrlSetFont(-1, 20, 800, 2, "Monotype Corsiva")
$bei = GUICtrlCreateLabel("bei", 416, 336, 34, 37)
GUICtrlSetFont(-1, 20, 800, 2, "Monotype Corsiva")
$Nismo = GUICtrlCreateLabel("Nismo", 400, 392, 72, 37)
GUICtrlSetFont(-1, 20, 800, 2, "Monotype Corsiva")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE ; SCHLIEßEN BUTTON (X)
Exit
Case $suche
FileSelectFolder ("Hey", "")
EndSwitch
WEndin der Schleife $button zu $suche... Das musst du doch sehen
-
MSGSchleife:
[autoit]#include <GuiConstants.au3>
[/autoit][autoit][/autoit][autoit]
GUICreate("test", 500, 500)
$button = GUICtrlCreatebutton("test", 150, 150, 100)
GUISetState()While 1
[/autoit]
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE ; SCHLIEßEN BUTTON (X)
Exit
Case $button
MsgBox(0, "", "blubbstar")
EndSwitch
WEndGUIOnEventMode:
[autoit]#include <GuiConstants.au3>
[/autoit][autoit][/autoit][autoit]
Opt("GUIOnEventMode", 1)
GUICreate("test", 500, 500)
$button = GUICtrlCreateButton("test", 150, 150, 100)
GUISetState()GUICtrlSetOnEvent($button, "_button");GUICTRLSETONEVENT für buttons, etc.
[/autoit][autoit][/autoit][autoit]
GUISetOnEvent($GUI_EVENT_CLOSE, "_exit");GUISETONEVENT für schließen button und so zeugsel was mit gui zu tun hat;DIE SCHLEIFE ist dazu da, damit das script sich nicht beendet, da es nichts zu tun hat.
[/autoit][autoit][/autoit][autoit]
While 1
Sleep(100)
WEndFunc _exit()
[/autoit][autoit][/autoit][autoit]
Exit
EndFunc ;==>_exitFunc _button()
[/autoit]
MsgBox(0, "", "blubbstar")
EndFunc ;==>_button -
[autoit]
While 1
[/autoit]
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE ; SCHLIEßEN BUTTON (X)
Exit
Case $suche
FileSelectFolder("Hey", "")
EndSwitch
WEndIch empfehle aber eher den OnEventMode ;). Aber jedem das seine
-
[autoit]
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
[/autoit]
Unter das GUICtrlCreateLabel versteht sich ;). -
PW Speichern + Automatische Anmeldung Ansonsten mal mit AutoITWindowInfo schauen, wobei du damit warscheinlich wenig erfolg hast.
-
$GUI_EVENT_CLOSE mit guidelete($fenster) bestücken und nicht mit exit.
-
Weil du aus der Schleife nicht mehr rauskommst.
[autoit]$readfile = FileOpen("Daten.txt", 0)
[/autoit][autoit][/autoit][autoit]
If $readfile = -1 Then
MsgBox(0, "Error", "Kann Datei nicht öffnen!")
Exit
EndIf$line_one = FileReadLine($readfile, 1)
[/autoit][autoit][/autoit][autoit]
$line_two = FileReadLine($readfile, 2)FileClose($readfile)
[/autoit] -
-