egal auf welchem buchstaben ich klicke soll er denn buchstaben senden und noch enter
Beiträge von blackcho
-
-
hay habe
eine frage wie kann ich es machen
das egal auf welche taste man klickt
die eigene tastenfunktion sendet und noch beim tastenklick eine func aktiviert test()mal ein beispiel davon was ich meine
ich klicke auf
a
dann sendet er a und noch die funktion die bei
func test()
steht
MFG -
thx es funktioniert
geilesPogramm -
-
willst du eine txt mit angeblich 1,2millionen deutsche wörter
habe nicht nach gezählt aber von wo ich es herhabe steht 1,2 millionen
sieht auch sehr glaubwürdig aus -
Hi, habe es eben noch einmal probiert.
Ich starte das Programm und wechsle zum Tab +, hier bekomme ich die Frage und auch die Antwort, ohne selber gerechnet zu haben.
also ich habe es mehr mals ausgetest bei mir kommt wenn ich zum Tab + wechel immer "antwort hier!!!!!"
sry aber ich kann dazu nix sagen da dieses Problem bei mir nicht existiert. -
-
Hallo
Ich wollte in mein script
Mathe Pogramm
Noch geteilt rechnung einfügen (/) aber jetz habe ich das porblem das wenn als ergebniss einer aufgabe nach dem . ganz viele zahlen sind das er auch wen mann die aufgabe richtig gemacht hat trotztem sagt das es falsch ist woran könnte es liegen??
Quelcode:Spoiler anzeigen
[autoit]#include <ButtonConstants.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>global $Zahl9 = Random(100, 200, 1)
[/autoit] [autoit][/autoit] [autoit]
global $Zahl10 = Random(1, 20, 1)
Global $ergebniss4 = $Zahl9 / $Zahl10
global $Randomzahl13 = 101
global $Randomzahl14 = 201
global $Randomzahl15 = 2
global $Randomzahl16 = 21#Region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("Form1", 676, 551, 578, 240)
$Tab1 = GUICtrlCreateTab(0, 0, 673, 527)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)$TabSheet4 = GUICtrlCreateTabItem("/")
[/autoit] [autoit][/autoit] [autoit]
$Label9 = GUICtrlCreateLabel("Frage: Was ist " & $Zahl9 & "/" & $Zahl10 & " ?", 8, 40,999,21)
$Label10 = GUICtrlCreateLabel("", 8, 435,999,21)
;~ $Label3 = GUICtrlCreateLabel($ergebniss1, 8, 200,999,21)
$Input4 = GUICtrlCreateInput("antwort hier!!!!!", 8, 64, 641, 21)
$OK4 = GUICtrlCreateButton("OK", 288, 88, 97, 41, 0)
GUICtrlSetCursor (-1, 0)
$Leicht4 = GUICtrlCreateButton("Leicht", 24, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Mittel4= GUICtrlCreateButton("Mittel", 288, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Schwer4 = GUICtrlCreateButton("Schwer", 536, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Edit4 = GUICtrlCreateEdit("Hier könnt ihr rechnungen hinschreiben", 0, 144, 681, 281)
$Pic4 = GUICtrlCreatePic("icon.jpg",650,23,0,0)
GUICtrlSetCursor (-1, 0)
;~ GUICtrlSetData(-1, "Edit1")GUICtrlCreateTabItem("")
[/autoit] [autoit][/autoit] [autoit]
$Label1 = GUICtrlCreateLabel("Created by lalalden", 576, 531, 94, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Leicht4
global $Randomzahl13 = 21
global $Randomzahl14 = 500
global $Randomzahl15 = 1
global $Randomzahl16 = 20
Case $Mittel4
global $Randomzahl13 = 224
global $Randomzahl14 = 1023
global $Randomzahl15 = 123
global $Randomzahl16 = 223
Case $Schwer4
global $Randomzahl13 = 2052
global $Randomzahl14 = 13526
global $Randomzahl15 = 111
global $Randomzahl16 = 2051
Case $OK4
Global $read4 = GUICtrlRead($Input4)
Global $ergebniss4 = $Zahl9 / $Zahl10
If $ergebniss4 = $read4 Then
GUICtrlSetData($Label10, "Richtig")
Sleep(20)
Test4()
Else
GUICtrlSetData($Label9, "Ihre Antwort war Falsch bitte beantworten sie die frage richtig: Was ist " & $Zahl9 & "/" & $Zahl10 & " ?")
;~ GUICtrlSetData($Label10, "Falsch " & $ergebniss4 & " bla " & $read4& " !!")
GUICtrlSetData($Label10, "Falsch")
EndIf
Case $Pic4
$ergebniss4 = $Zahl9 / $Zahl10
Sleep(40)
GUICtrlSetData($Input4,$ergebniss4)EndSwitch
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
WEndFunc Test4()
[/autoit]
global $Zahl9 = Random($Randomzahl13, $Randomzahl14, 1)
global $Zahl10 = Random($Randomzahl15, $Randomzahl16, 1)
Global $read4 = GUICtrlRead($Input4)
GUICtrlSetData($Label9, "Nächste Frage: Was ist " & $Zahl9 & "/" & $Zahl10 & " ?")
EndFuncMFG
Freue Mich auf antwort -
@xXxProGamerxXx thx die anderen werde ich noch einfügen
RR04 thx und verstehe nicht was du meinst im jedem Tab kommt nur das ergebnis von alleine wenn man auf den fragezeichen klickt
sry aber ich habe es wirklich nicht verstanden habe auch Im Addition Tab nach bugs gesucht aber keine Gefunden -
Hallo
Habe mal wieder ein kleines Pogramm gemacht der Mathe aufgaben erstellt
und die muss man dann lösen
haha was man so in der langweile halt alles so macht najaBitte lieber runterladen als Quelcode Benutzen wegen dem ? Icon!!
Quelcode:Spoiler anzeigen
[autoit]#include <ButtonConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>global $Zahl3 = Random(1, 500, 1)
[/autoit] [autoit][/autoit] [autoit]
global $Zahl4 = Random(1, 20, 1)
Global $ergebniss1 = $Zahl3 + $Zahl4
global $Randomzahl1 = 1
global $Randomzahl2 = 500
global $Randomzahl3 = 1
global $Randomzahl4 = 20global $Zahl5 = Random(10, 25, 1)
[/autoit] [autoit][/autoit] [autoit]
global $Zahl6 = Random(5, 21, 1)
Global $ergebniss2 = $Zahl5 * $Zahl6
global $Randomzahl5 = 10
global $Randomzahl6 = 25
global $Randomzahl7 = 5
global $Randomzahl8 = 21global $Zahl7 = Random(100, 200, 1)
[/autoit] [autoit][/autoit] [autoit]
global $Zahl8 = Random(1, 20, 1)
Global $ergebniss3 = $Zahl7 - $Zahl8
global $Randomzahl9 = 101
global $Randomzahl10 = 201
global $Randomzahl11 = 2
global $Randomzahl12 = 21#Region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("Form1", 676, 551, 578, 240)
$Tab1 = GUICtrlCreateTab(0, 0, 673, 527)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("*")
$Label5 = GUICtrlCreateLabel("Frage: Was ist " & $Zahl5 & "*" & $Zahl6 & " ?", 8, 40,999,21)
$Label6 = GUICtrlCreateLabel("", 8, 435,999,21)
;~ $Label3 = GUICtrlCreateLabel($ergebniss1, 8, 200,999,21)
$Input2 = GUICtrlCreateInput("antwort hier!!!!!", 8, 64, 641, 21)
$OK2 = GUICtrlCreateButton("OK", 288, 88, 97, 41, 0)
GUICtrlSetCursor (-1, 0)
$Leicht2 = GUICtrlCreateButton("Leicht", 24, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Mittel2= GUICtrlCreateButton("Mittel", 288, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Schwer2 = GUICtrlCreateButton("Schwer", 536, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Edit2 = GUICtrlCreateEdit("Hier könnt ihr rechnungen hinschreiben", 0, 144, 681, 281)
$Pic2 = GUICtrlCreatePic("icon.jpg",650,23,0,0)
GUICtrlSetCursor (-1, 0)
;~ GUICtrlSetData(-1, "Edit1")$TabSheet2 = GUICtrlCreateTabItem("+")
[/autoit] [autoit][/autoit] [autoit]
$Label2 = GUICtrlCreateLabel("Frage: Was ist " & $Zahl3 & "+" & $Zahl4 & " ?", 8, 40,999,21)
$Label4 = GUICtrlCreateLabel("", 8, 435,999,21)
;~ $Label3 = GUICtrlCreateLabel($ergebniss1, 8, 200,999,21)
$Input1 = GUICtrlCreateInput("antwort hier!!!!!", 8, 64, 641, 21)
$OK = GUICtrlCreateButton("OK", 288, 88, 97, 41, 0)
GUICtrlSetCursor (-1, 0)
$Leicht = GUICtrlCreateButton("Leicht", 24, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Mittel= GUICtrlCreateButton("Mittel", 288, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Schwer = GUICtrlCreateButton("Schwer", 536, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Edit1 = GUICtrlCreateEdit("Hier könnt ihr rechnungen hinschreiben", 0, 144, 681, 281)
$Pic1 = GUICtrlCreatePic("icon.jpg",650,23,0,0)
GUICtrlSetCursor (-1, 0)
;~ GUICtrlSetData(-1, "Edit1")$TabSheet3 = GUICtrlCreateTabItem("-")
[/autoit] [autoit][/autoit] [autoit]
$Label7 = GUICtrlCreateLabel("Frage: Was ist " & $Zahl7 & "-" & $Zahl8 & " ?", 8, 40,999,21)
$Label8 = GUICtrlCreateLabel("", 8, 435,999,21)
;~ $Label3 = GUICtrlCreateLabel($ergebniss1, 8, 200,999,21)
$Input3 = GUICtrlCreateInput("antwort hier!!!!!", 8, 64, 641, 21)
$OK3 = GUICtrlCreateButton("OK", 288, 88, 97, 41, 0)
GUICtrlSetCursor (-1, 0)
$Leicht3 = GUICtrlCreateButton("Leicht", 24, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Mittel3= GUICtrlCreateButton("Mittel", 288, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Schwer3 = GUICtrlCreateButton("Schwer", 536, 456, 75, 25, 0)
GUICtrlSetCursor (-1, 0)
$Edit3 = GUICtrlCreateEdit("Hier könnt ihr rechnungen hinschreiben", 0, 144, 681, 281)
$Pic3 = GUICtrlCreatePic("icon.jpg",650,23,0,0)
GUICtrlSetCursor (-1, 0)
;~ GUICtrlSetData(-1, "Edit1")GUICtrlCreateTabItem("")
[/autoit] [autoit][/autoit] [autoit]
$Label1 = GUICtrlCreateLabel("Created by lalalden", 576, 531, 94, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Leicht
global $Randomzahl1 = 100
global $Randomzahl2 = 200
global $Randomzahl3 = 50
global $Randomzahl4 = 150
Case $Mittel
global $Randomzahl1 = 231
global $Randomzahl2 = 542
global $Randomzahl3 = 66
global $Randomzahl4 = 267
Case $Schwer
global $Randomzahl1 = 964
global $Randomzahl2 = 9999
global $Randomzahl3 = 99
global $Randomzahl4 = 99999
Case $OK
Global $read1 = GUICtrlRead($Input1)
Global $ergebniss1 = $Zahl3 + $Zahl4
If $read1 = $ergebniss1 Then
GUICtrlSetData($Label4, "Richtig")
Sleep(20)
Test()
Else
GUICtrlSetData($Label2, "Ihre Antwort war Falsch bitte beantworten sie die frage richtig: Was ist " & $Zahl3 & "+" & $Zahl4 & " ?")
GUICtrlSetData($Label4, "Falsch")
EndIf
Case $Pic1
$ergebniss1 = $Zahl3 + $Zahl4
Sleep(40)
GUICtrlSetData($Input1,$ergebniss1)Case $Leicht2
[/autoit] [autoit][/autoit] [autoit]
global $Randomzahl5 = 10
global $Randomzahl6 = 20
global $Randomzahl7 = 5
global $Randomzahl8 = 21
Case $Mittel2
global $Randomzahl5 = 21
global $Randomzahl6 = 101
global $Randomzahl7 = 13
global $Randomzahl8 = 101
Case $Schwer2
global $Randomzahl5 = 101
global $Randomzahl6 = 1013
global $Randomzahl7 = 86
global $Randomzahl8 = 693
Case $OK2
Global $read2 = GUICtrlRead($Input2)
Global $ergebniss2 = $Zahl5 * $Zahl6
If $read2 = $ergebniss2 Then
GUICtrlSetData($Label6, "Richtig")
Sleep(20)
Test2()
Else
GUICtrlSetData($Label5, "Ihre Antwort war Falsch bitte beantworten sie die frage richtig: Was ist " & $Zahl5 & "*" & $Zahl6 & " ?")
GUICtrlSetData($Label6, "Falsch")
EndIf
Case $Pic2
$ergebniss2 = $Zahl5 * $Zahl6
Sleep(40)
GUICtrlSetData($Input2,$ergebniss2)Case $Leicht3
[/autoit] [autoit][/autoit] [autoit]
global $Randomzahl9 = 21
global $Randomzahl10 = 500
global $Randomzahl11 = 1
global $Randomzahl12 = 20
Case $Mittel3
global $Randomzahl9 = 224
global $Randomzahl10 = 1023
global $Randomzahl11 = 123
global $Randomzahl12 = 223
Case $Schwer3
global $Randomzahl9 = 2052
global $Randomzahl10 = 13526
global $Randomzahl11 = 111
global $Randomzahl12 = 2051
Case $OK3
Global $read3 = GUICtrlRead($Input3)
Global $ergebniss3 = $Zahl7 - $Zahl8
If $read3 = $ergebniss3 Then
GUICtrlSetData($Label8, "Richtig")
Sleep(20)
Test3()
Else
GUICtrlSetData($Label7, "Ihre Antwort war Falsch bitte beantworten sie die frage richtig: Was ist " & $Zahl7 & "-" & $Zahl8 & " ?")
GUICtrlSetData($Label8, "Falsch")
EndIf
Case $Pic3
$ergebniss3 = $Zahl7 - $Zahl8
Sleep(40)
GUICtrlSetData($Input3,$ergebniss3)EndSwitch
[/autoit] [autoit][/autoit] [autoit]
WEndFunc Test()
[/autoit] [autoit][/autoit] [autoit]
global $Zahl3 = Random($Randomzahl1, $Randomzahl2, 1)
global $Zahl4 = Random($Randomzahl3, $Randomzahl4, 1)
Global $read1 = GUICtrlRead($Input1)
GUICtrlSetData($Label2, "Nächste Frage: Was ist " & $Zahl3 & "+" & $Zahl4 & " ?")
EndFuncFunc Test2()
[/autoit] [autoit][/autoit] [autoit]
global $Zahl5 = Random($Randomzahl5, $Randomzahl6, 1)
global $Zahl6 = Random($Randomzahl7, $Randomzahl8, 1)
Global $read2 = GUICtrlRead($Input2)
GUICtrlSetData($Label5, "Nächste Frage: Was ist " & $Zahl5 & "*" & $Zahl6 & " ?")
EndFuncFunc Test3()
[/autoit]
global $Zahl7 = Random($Randomzahl9, $Randomzahl10, 1)
global $Zahl8 = Random($Randomzahl11, $Randomzahl12, 1)
Global $read3 = GUICtrlRead($Input3)
GUICtrlSetData($Label7, "Nächste Frage: Was ist " & $Zahl7 & "-" & $Zahl8 & " ?")
EndFuncDownload:
MFG
-
ups erst jetz bemerkt
thx haha
habe eig ganze zeit geguckt aber erst jetz gesehen -
hallo
habe eine gui erstellt wo er in einer inputbox nach einer zeit fragt
und wenn man dann auf den ok button klickt
soll er nach der angegebenen zeit den shutdown(1) befehl einfügen
es funktioniert auch aber wenn ich das pogramm benden will und dann auf das rote x klicke
bendet sich das pogramm aber er führt auch den shutdown(1) befehl ausQuelcode
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
GUICreate("Zählen", 320, 120)
$anzahli = GUICtrlCreateInput("", 10, 5, 300, 20)
$btn = GUICtrlCreateButton("Ok", 40, 75, 60, 20)
$label = GUICtrlCreateLabel(" Zähler:", 0, 100 ,999,30)
GUISetState()$msg = 0
[/autoit] [autoit][/autoit] [autoit]
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Select
Case $msg = $btn
$anzahl = GUICtrlRead($anzahli)
$i = $anzahl
$time = 60000*$i
AdlibRegister("_Update",$time)
EndSelect
WEndShutdown(1)
[/autoit]
Func _Update()
;~ MsgBox(0,"title","text")
Shutdown(1)
AdlibUnRegister("_Update")
EndFuncwie mache ich das das das alles funktioniert
MFG -
Spoiler anzeigen
[autoit]ShellExecute("http://www.autoit.de/index.php?page=Board&boardID=" & Random(1,500,1))
[/autoit]MfG, Julien
thx
-
-
Hallo habe eine frage
wie kann ich machen das er
zumbeispielhttp://www.autoit.de/index.php?page=Board&boardID=4
startet aber da wo die 4 steht
soll zufällig eine zahl von 1 bis 500so das dann
http://www.autoit.de/index.php?page=Board&boardID=341
dieser link sich öffnet oder eine andere zahl zwischen 1 und 500
MFG -
thx
[autoit]
jetz habe ich eine neue frage habe jetz meine 2 pogramme rechner,keybinder in einer gui aber
habe ein problem bei der gui größe ändernung#include <GUIConstantsEx.au3>
[/autoit][autoit][/autoit][autoit]Example()
[/autoit][autoit][/autoit][autoit]
Func Example()
Local $msgGlobal $GUI999 = GUICreate("My GUI Tab")
[/autoit][autoit][/autoit][autoit]GUISetBkColor(0x00E0FFFF)
[/autoit][autoit][/autoit][autoit]
GUISetFont(9, 300)
GUICtrlCreateTab(100, 0, 129, 23)GUICtrlCreateTabItem("Rechner")
[/autoit][autoit][/autoit][autoit][/autoit][autoit]
GUICtrlSetState(-1, $GUI_SHOW)
WinMove($GUI999, "", 900, 400, 240, 430)GUISetFont (15, 400, 21,"Tunga")
[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]
Global $label = GUICtrlCreateLabel(" ( Ergebnis ) ", 0, 290 ,999,30)GUICtrlCreateTabItem("Keybinder")
[/autoit][autoit][/autoit][autoit][/autoit][autoit]
WinMove($GUI999, "", 900, 400, 999, 2000)GUICtrlCreateTabItem("")
[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]GUISetState()
[/autoit][autoit][/autoit][autoit][/autoit][autoit]While 1
[/autoit][autoit][/autoit][autoit]
$msg = GUIGetMsg()If $msg = $GUI_EVENT_CLOSE Then ExitLoop
[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit]
WEnd
EndFunchabe jetz in der quelcode die ganzen unwichtigen sachen für die frage entfernt
[autoit]
also das problem was ich gemacht habe ist jetz wenn ich auf den anderen tab klicke bleibt der immer
beiWinMove($GUI999, "", 900, 400, 999, 2000)
[/autoit]
aber ich muss ja die größen für meine tabs umändern
weis einer wie ich es machen könnte -
Hallo habe eine frage
will mein rechner
und ein anderes script in eine gui rein machen mit tabs aber habe schon probleme bei der ersten tabQuelCode
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]Example()
[/autoit] [autoit][/autoit] [autoit]Func Example()
[/autoit] [autoit][/autoit] [autoit]
Local $msgGUICreate("My GUI Tab")
[/autoit] [autoit][/autoit] [autoit]GUISetBkColor(0x00E0FFFF)
[/autoit] [autoit][/autoit] [autoit]
GUISetFont(9, 300)Opt( "GUIOnEventMode", 1 )
[/autoit] [autoit][/autoit] [autoit]
GUICtrlCreateTab(0, 0, 156, 23)GUICtrlCreateTabItem("Rechner")
[/autoit] [autoit][/autoit] [autoit]
$Button = GUICtrlCreateButton("+", 150, 150, 30, 20)
$Button2 = GUICtrlCreateButton("-", 200, 150, 30, 20)
$Button3 = GUICtrlCreateButton("*", 150, 120, 30, 20)
$Button4 = GUICtrlCreateButton("CE", 200, 180, 30, 20)
$Button5 = GUICtrlCreateButton("/", 200, 120, 30, 20)
$Button6 = GUICtrlCreateButton("^", 150, 180, 30, 20)
$Button7 = GUICtrlCreateButton("=", 150, 210, 30, 20)
$Button8 = GUICtrlCreateButton("%", 200, 210, 30, 20)
Local $input1
$input1 = GUICtrlCreateInput("", 10, 41, 220, 20)
$input2 = GUICtrlCreateInput("", 10, 90, 220, 20)
$endergebnis = GUICtrlCreateInput("Hier Wird Das Ergebnis Stehen!!!", 10, 290, 220, 20)
$labe2 = GUICtrlCreateLabel(" ( RECHNER ) ", 79, 0, 180, 20)
$labe5 = GUICtrlCreateLabel(" By lalaladen ", 80, 16, 180, 20)
$labe3 = GUICtrlCreateLabel(" Zahl 1 ", 10, 20)
$labe4 = GUICtrlCreateLabel(" Zahl 2 ", 10, 70, 220, 20)$zButton0 = GUICtrlCreateButton("0", 10, 120, 40, 20)
[/autoit] [autoit][/autoit] [autoit]
$zButton1 = GUICtrlCreateButton("1", 50, 120, 40, 20)
$zButton2 = GUICtrlCreateButton("2", 90, 120, 40, 20)
$zButton3 = GUICtrlCreateButton("3", 10, 150, 40, 20)
$zButton4 = GUICtrlCreateButton("4", 50, 150, 40, 20)
$zButton5 = GUICtrlCreateButton("5", 90, 150, 40, 20)
$zButton6 = GUICtrlCreateButton("6", 10, 180, 40, 20)
$zButton7 = GUICtrlCreateButton("7", 50, 180, 40, 20)
$zButton8 = GUICtrlCreateButton("8", 90, 180, 40, 20)
$zButton9 = GUICtrlCreateButton("9", 10, 210, 40, 20)
$zzahl1 = GUICtrlCreateButton("Z1", 50, 210, 40, 20)
$zzahl2 = GUICtrlCreateButton("Z2", 90, 210, 40, 20)
$Menu_File = GUICtrlCreateMenu("Menu")
$Menu_File_Item1 = GUICtrlCreateMenuItem("Created BY",$Menu_File)
$Menu_File_Item3 = GUICtrlCreateMenuItem("UPDATES",$Menu_File)
Opt( "GUIOnEventMode", 1 )
GUISetOnEvent( $GUI_EVENT_CLOSE, "_Exit" )
GUICtrlSetOnEvent( $zzahl1,"_zzahl1")
GUICtrlSetOnEvent( $zzahl2,"_zzahl2")
GUICtrlSetOnEvent( $Button,"_Button")
GUICtrlSetOnEvent( $Button2,"_Button2")
GUICtrlSetOnEvent( $Button3,"_Button3")
GUICtrlSetOnEvent( $Button4,"_Button4")
GUICtrlSetOnEvent( $Button5,"_Button5")
GUICtrlSetOnEvent( $Button6,"_Button6")
GUICtrlSetOnEvent( $Button7,"_Button7")
GUICtrlSetOnEvent( $Button8,"_Button8")GUISetFont (15, 400, 21,"Tunga")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$label = GUICtrlCreateLabel(" ( Ergebnis ) ", 0, 230 ,999,30)GUICtrlCreateTabItem("tab2")
[/autoit] [autoit][/autoit] [autoit]
GUICtrlCreateLabel("label1", 30, 80, 50, 20)
GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon")
GUICtrlCreateButton("OK1", 80, 50, 50, 20)GUICtrlCreateTabItem("tab3")
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetState(-1, $GUI_SHOW)
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
GUICtrlCreateButton("OK2", 140, 50, 50)GUICtrlCreateTabItem("")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]GUISetState()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]While 1
[/autoit] [autoit][/autoit] [autoit]
$msg = GUIGetMsg()If $msg = $GUI_EVENT_CLOSE Then ExitLoop
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
WEnd
EndFuncFunc _zzahl1()
[/autoit] [autoit][/autoit] [autoit][/autoit]
GUICtrlSetOnEvent( $zButton0,"_z1Button0")
GUICtrlSetOnEvent( $zButton1,"_z1Button1")
GUICtrlSetOnEvent( $zButton2,"_z1Button2")
GUICtrlSetOnEvent( $zButton3,"_z1Button3")
GUICtrlSetOnEvent( $zButton4,"_z1Button4")
GUICtrlSetOnEvent( $zButton5,"_z1Button5")
GUICtrlSetOnEvent( $zButton6,"_z1Button6")
GUICtrlSetOnEvent( $zButton7,"_z1Button7")
GUICtrlSetOnEvent( $zButton8,"_z1Button8")
GUICtrlSetOnEvent( $zButton9,"_z1Button9")
EndFunc ;
Func _zzahl2()
GUICtrlSetOnEvent( $zButton0,"_z2Button0")
GUICtrlSetOnEvent( $zButton0,"_z2Button0")
GUICtrlSetOnEvent( $zButton1,"_z2Button1")
GUICtrlSetOnEvent( $zButton2,"_z2Button2")
GUICtrlSetOnEvent( $zButton3,"_z2Button3")
GUICtrlSetOnEvent( $zButton4,"_z2Button4")
GUICtrlSetOnEvent( $zButton5,"_z2Button5")
GUICtrlSetOnEvent( $zButton6,"_z2Button6")
GUICtrlSetOnEvent( $zButton7,"_z2Button7")
GUICtrlSetOnEvent( $zButton8,"_z2Button8")
GUICtrlSetOnEvent( $zButton9,"_z2Button9")
EndFunc
Func _z1Button0()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 0 )
EndFunc
Func _z2Button0()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 0 )
EndFunc
Func _z1Button1()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 1 )
EndFunc
Func _z2Button1()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 1 )
EndFunc
Func _z1Button2()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 2 )
EndFunc
Func _z2Button2()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 2 )
EndFunc
Func _z1Button3()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 3 )
EndFunc
Func _z2Button3()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 3 )
EndFunc
Func _z1Button4()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 4 )
EndFunc
Func _z2Button4()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 4 )
EndFunc
Func _z1Button5()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 5 )
EndFunc
Func _z2Button5()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 5 )
EndFunc
Func _z1Button6()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 6 )
EndFunc
Func _z2Button6()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 6 )
EndFunc
Func _z1Button7()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 7 )
EndFunc
Func _z2Button7()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 7 )
EndFunc
Func _z1Button8()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 8 )
EndFunc
Func _z2Button8()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 8 )
EndFunc
Func _z1Button9()
GUICtrlSetData( $input1, GUICtrlRead( $input1 ) & 9 )
EndFunc
Func _z2Button9()
GUICtrlSetData( $input2, GUICtrlRead( $input2 ) & 9 )
EndFunc
Func _Button()
$read1 = GUICtrlRead($input1)
$read2 = GUICtrlRead($input2)
$Ergebnis = $read1 + $read2
GUICtrlSetData($label, "Ergebnis: " & $Ergebnis)
GUICtrlSetData($endergebnis, "" & $Ergebnis)
EndFunc
Func _Button2()
$read1 = GUICtrlRead($input1)
$read2 = GUICtrlRead($input2)
$Ergebnis = $read1 - $read2
GUICtrlSetData($label, "Ergebnis: " & $Ergebnis)
GUICtrlSetData($endergebnis, "" & $Ergebnis)
EndFunc
Func _Button3()
$read1 = GUICtrlRead($input1)
$read2 = GUICtrlRead($input2)
$Ergebnis = $read1 * $read2
GUICtrlSetData($label, "Ergebnis: " & $Ergebnis)
GUICtrlSetData($endergebnis, "" & $Ergebnis)
EndFunc
Func _Button5()
$read1 = GUICtrlRead($input1)
$read2 = GUICtrlRead($input2)
$Ergebnis = $read1 / $read2
GUICtrlSetData($label, "Ergebnis: " & $Ergebnis)
GUICtrlSetData($endergebnis, "" & $Ergebnis)
EndFunc
Func _Button6()
$read1 = GUICtrlRead($input1)
$read2 = GUICtrlRead($input2)
$Ergebnis = $read1 ^ $read2
GUICtrlSetData($label, "Ergebnis: " & $Ergebnis)
GUICtrlSetData($endergebnis, "" & $Ergebnis)
EndFunc
Func _Button7()
$read1 = GUICtrlRead($endergebnis)
MsgBox(0,"Das Ergebnis ist:","Das Ergebnis ist:" & $read1)
EndFunc
Func _Button4()
GUICtrlSetData($input1, "")
GUICtrlSetData($input2, "")
GUICtrlSetData($endergebnis, "Hier Wird Das Ergebnis Stehen!!!")
EndFunc
Func _Button8()
GUICtrlSetData( $endergebnis, GUICtrlRead( $input1 )/100 )
EndFunc
Func _Menu_File_Item3()
InetGet("http://scripts12.square7.ch/update-r/")
ShellExecute("http://scripts12.square7.ch/update-r/")
EndFunc
Func _Menu_File_Item1()
MsgBox(0,"","Dieser Rechner wurde von lalaladen erstellt")
MsgBox(0,"","zocker4life@hushmail.com")
EndFunc
Func _Exit()
Exit
EndFuncaber es funktioniert leider nicht so wie ich es gemacht habe
verstehe auch nicht wie ich es anderes machen kann
bitte um hilfe thx
MFG -
-
Kleiner Tipp: Guck Dir doch mal Schleifen und Arrays an. Das würde den Code erheblich reduzieren.
was bringt es denn wenn die quelcode kürzer ist??? -
Ok , danke .
Bin gerade an version 0.2 ;D
man wird die hotkeys selber festlegen können ;DMir ist so langweilig das ich was für dich gemacht habe wenn du willst haha
damit kann man auch die tasten selber wählen
einfach in den Input die taste schreiben 0-9 F1-F12 Numpad0-Numpad9 a-z oder andere tasten ohne ein { }Quelcode
Spoiler anzeigen
[autoit]#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
[/autoit] [autoit][/autoit] [autoit]
#AutoIt3Wrapper_outfile=CDLade0.1.exe
#AutoIt3Wrapper_Res_Fileversion=0.1.0.1
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_LegalCopyright=Jeahaha
#AutoIt3Wrapper_Res_Language=1031
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
Global Const $GUI_EVENT_CLOSE = -3
$file999 = "settings.properties"
If FileExists($file999) Then
$lwe = IniRead ($file999, "LW", "LW","")$lwoo = IniRead ($file999, "LWÖ", "LWÖ","")
[/autoit] [autoit][/autoit] [autoit]$lwss = IniRead ($file999, "LWS", "LWS","")
[/autoit] [autoit][/autoit] [autoit]$pss = IniRead ($file999, "PS", "PS","")
[/autoit] [autoit][/autoit] [autoit]HotKeySet($lwoo, "func2")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
HotKeySet($lwss, "func3")
HotKeySet($pss, "func1")
GUISetState(@SW_SHOW)
Else
MsgBox(0,"","Bitte wählen sie ein laufwerk aus und die Die Hotkeys!!")
GUICreate ("Laufwerk auswahl" ,310 ,280)
GUICtrlCreateLabel("Schreiben sie den laufwerk namen zumbeispiel E:",0, 30)
$laufwerk999 = GUICtrlCreateInput("Schreiben sie den laufwerk namen zumbeispiel E:", 0, 50, 300, 20)
GUICtrlCreateLabel("Taste fürs Öffnen des laufwerks:",0, 80)
$hotkeyo999 = GUICtrlCreateInput("Taste fürs Öffnen des laufwerks", 0, 100, 300, 20)
GUICtrlCreateLabel("Taste fürs Schließen des laufwerks:",0, 130)
$hotkeys999 = GUICtrlCreateInput("Taste fürs Schließen des laufwerks", 0, 150, 300, 20)
GUICtrlCreateLabel("Taste fürs Schließen des Pogramms",0, 180)
$hotkeyps999 = GUICtrlCreateInput("Taste fürs Schließen des Pogramms", 0, 200, 300, 20)
$Speichern999 = GUICtrlCreateButton("Speichern", 120, 220,80,50)
Opt( "GUIOnEventMode", 1 )
GUICtrlSetOnEvent( $Speichern999,"Speichern999")
GUISetOnEvent( $GUI_EVENT_CLOSE, "_Exit")
GUISetState ()
EndIfFunc _Exit()
[/autoit] [autoit][/autoit] [autoit]
;MsgBox(64, "Uhrzeit","Wird Beendet")
Exit
EndFuncFunc Speichern999()
[/autoit] [autoit][/autoit] [autoit]
$laufwerk999read = GUICtrlRead($laufwerk999)
IniWrite($file999,"LW","LW",$laufwerk999read)$hotkeyo999read = GUICtrlRead($hotkeyo999)
[/autoit] [autoit][/autoit] [autoit]
IniWrite($file999,"LWÖ","LWÖ","{" & $hotkeyo999read & "}")$hotkeys999read = GUICtrlRead($hotkeys999)
[/autoit] [autoit][/autoit] [autoit]
IniWrite($file999,"LWS","LWS","{" & $hotkeys999read & "}")$hotkeyps999read = GUICtrlRead($hotkeyps999)
[/autoit] [autoit][/autoit] [autoit]
IniWrite($file999,"PS","PS","{" & $hotkeyps999read & "}")
Sleep(1000)
Exit
EndFunc
Func func1()
Exit
EndFuncFunc func2()
[/autoit] [autoit][/autoit] [autoit]
CDTray($lwe,"open")
EndFuncFunc func3()
[/autoit] [autoit][/autoit] [autoit]CDTray($lwe,"close")
[/autoit] [autoit][/autoit] [autoit]EndFunc
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]While 1
[/autoit]
WEndMFG