Beiträge von blackcho

blackcho

egal auf welchem buchstaben ich klicke soll er denn buchstaben senden und noch enter

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

blackcho

thx es funktioniert
geilesPogramm

blackcho

[Blockierte Grafik: http://img7.imagebanana.com/img/s700jvmr/thumb/error.png]
habe dieses fehler

blackcho

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

blackcho

Zitat von RR04

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.

blackcho

@Cheater Dieter thx

blackcho

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>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>

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

global $Zahl9 = Random(100, 200, 1)
global $Zahl10 = Random(1, 20, 1)
Global $ergebniss4 = $Zahl9 / $Zahl10
global $Randomzahl13 = 101
global $Randomzahl14 = 201
global $Randomzahl15 = 2
global $Randomzahl16 = 21

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 676, 551, 578, 240)
$Tab1 = GUICtrlCreateTab(0, 0, 673, 527)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)

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

$TabSheet4 = GUICtrlCreateTabItem("/")
$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")

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

GUICtrlCreateTabItem("")
$Label1 = GUICtrlCreateLabel("Created by lalalden", 576, 531, 94, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$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)

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

EndSwitch
WEnd

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

Func Test4()
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 & " ?")
EndFunc

[/autoit]

MFG
Freue Mich auf antwort

blackcho

@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

blackcho

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 naja

Bitte lieber runterladen als Quelcode Benutzen wegen dem ? Icon!!
Quelcode:

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>

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

global $Zahl3 = Random(1, 500, 1)
global $Zahl4 = Random(1, 20, 1)
Global $ergebniss1 = $Zahl3 + $Zahl4
global $Randomzahl1 = 1
global $Randomzahl2 = 500
global $Randomzahl3 = 1
global $Randomzahl4 = 20

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

global $Zahl5 = Random(10, 25, 1)
global $Zahl6 = Random(5, 21, 1)
Global $ergebniss2 = $Zahl5 * $Zahl6
global $Randomzahl5 = 10
global $Randomzahl6 = 25
global $Randomzahl7 = 5
global $Randomzahl8 = 21

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

global $Zahl7 = Random(100, 200, 1)
global $Zahl8 = Random(1, 20, 1)
Global $ergebniss3 = $Zahl7 - $Zahl8
global $Randomzahl9 = 101
global $Randomzahl10 = 201
global $Randomzahl11 = 2
global $Randomzahl12 = 21

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

#Region ### START Koda GUI section ### Form=
$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")

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

$TabSheet2 = GUICtrlCreateTabItem("+")
$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")

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

$TabSheet3 = GUICtrlCreateTabItem("-")
$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")

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

GUICtrlCreateTabItem("")
$Label1 = GUICtrlCreateLabel("Created by lalalden", 576, 531, 94, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$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)

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

Case $Leicht2
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)

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

Case $Leicht3
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)

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

EndSwitch
WEnd

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

Func Test()
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 & " ?")
EndFunc

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

Func Test2()
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 & " ?")
EndFunc

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

Func Test3()
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 & " ?")
EndFunc

[/autoit]

Download:

MFG

blackcho

ups erst jetz bemerkt
thx haha
habe eig ganze zeit geguckt aber erst jetz gesehen

blackcho

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 aus

Quelcode

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
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()

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

$msg = 0
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Select
Case $msg = $btn
$anzahl = GUICtrlRead($anzahli)
$i = $anzahl
$time = 60000*$i
AdlibRegister("_Update",$time)
EndSelect
WEnd

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

Shutdown(1)
Func _Update()
;~ MsgBox(0,"title","text")
Shutdown(1)
AdlibUnRegister("_Update")
EndFunc

[/autoit]

wie mache ich das das das alles funktioniert
MFG

blackcho

Zitat von Julien

Spoiler anzeigen

[autoit]
ShellExecute("http://www.autoit.de/index.php?page=Board&boardID=" & Random(1,500,1))
[/autoit]

MfG, Julien

thx

blackcho

thx

blackcho

Hallo habe eine frage
wie kann ich machen das er
zumbeispiel

http://www.autoit.de/index.php?page=Board&boardID=4
startet aber da wo die 4 steht
soll zufällig eine zahl von 1 bis 500

so 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

blackcho

thx
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

[autoit]

#include <GUIConstantsEx.au3>

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

Example()
Func Example()
Local $msg

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

Global $GUI999 = GUICreate("My GUI Tab")

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

GUISetBkColor(0x00E0FFFF)
GUISetFont(9, 300)
GUICtrlCreateTab(100, 0, 129, 23)

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

GUICtrlCreateTabItem("Rechner")
GUICtrlSetState(-1, $GUI_SHOW)
WinMove($GUI999, "", 900, 400, 240, 430)

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

GUISetFont (15, 400, 21,"Tunga")
Global $label = GUICtrlCreateLabel(" ( Ergebnis ) ", 0, 290 ,999,30)

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

GUICtrlCreateTabItem("Keybinder")
WinMove($GUI999, "", 900, 400, 999, 2000)

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

GUICtrlCreateTabItem("")

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

GUISetState()

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

While 1
$msg = GUIGetMsg()

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

If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd
EndFunc

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

habe jetz in der quelcode die ganzen unwichtigen sachen für die frage entfernt
also das problem was ich gemacht habe ist jetz wenn ich auf den anderen tab klicke bleibt der immer
bei

[autoit]

WinMove($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

blackcho

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 tab

QuelCode

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>

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

Example()

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

Func Example()
Local $msg

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

GUICreate("My GUI Tab")

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

GUISetBkColor(0x00E0FFFF)
GUISetFont(9, 300)

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

Opt( "GUIOnEventMode", 1 )
GUICtrlCreateTab(0, 0, 156, 23)

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

GUICtrlCreateTabItem("Rechner")
$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)

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

$zButton0 = GUICtrlCreateButton("0", 10, 120, 40, 20)
$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")

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

GUISetFont (15, 400, 21,"Tunga")
$label = GUICtrlCreateLabel(" ( Ergebnis ) ", 0, 230 ,999,30)

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

GUICtrlCreateTabItem("tab2")
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)

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

GUICtrlCreateTabItem("tab3")
GUICtrlSetState(-1, $GUI_SHOW)
GUICtrlCreateLabel("label2", 30, 80, 50, 20)
GUICtrlCreateButton("OK2", 140, 50, 50)

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

GUICtrlCreateTabItem("")

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

GUISetState()

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

While 1
$msg = GUIGetMsg()

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

If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd
EndFunc

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

Func _zzahl1()
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
EndFunc

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

aber es funktioniert leider nicht so wie ich es gemacht habe
verstehe auch nicht wie ich es anderes machen kann
bitte um hilfe thx
MFG

blackcho

Ohhh sry haha

blackcho

Zitat von meistertogo

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???

blackcho

Zitat von Jeahaha

Ok , danke .
Bin gerade an version 0.2 ;D
man wird die hotkeys selber festlegen können ;D

Mir 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 ****
#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","")

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

$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")
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 ()
EndIf

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

Func _Exit()
;MsgBox(64, "Uhrzeit","Wird Beendet")
Exit
EndFunc

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

Func Speichern999()
$laufwerk999read = GUICtrlRead($laufwerk999)
IniWrite($file999,"LW","LW",$laufwerk999read)

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

$hotkeyo999read = GUICtrlRead($hotkeyo999)
IniWrite($file999,"LWÖ","LWÖ","{" & $hotkeyo999read & "}")

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

$hotkeys999read = GUICtrlRead($hotkeys999)
IniWrite($file999,"LWS","LWS","{" & $hotkeys999read & "}")

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

$hotkeyps999read = GUICtrlRead($hotkeyps999)
IniWrite($file999,"PS","PS","{" & $hotkeyps999read & "}")
Sleep(1000)
Exit
EndFunc
Func func1()
Exit
EndFunc

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

Func func2()
CDTray($lwe,"open")
EndFunc

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

Func func3()

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

CDTray($lwe,"close")

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

EndFunc

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

While 1
WEnd

[/autoit]

MFG

Beiträge von blackcho

nach jedem tastenklick eine funktion aktivieren

nach jedem tastenklick eine funktion aktivieren

Susi - Lasse dir die Nachrichten und das Wetter vorlesen

Susi - Lasse dir die Nachrichten und das Wetter vorlesen

Burning Keyboard - Wie schnell kannst du tippen?

Mathe Pogramm

Mathe Pogramm

Mathe Pogramm

Mathe Pogramm

Mathe Pogramm

shutdown mit timer

shutdown mit timer

zufäligen link starten

zufäligen link starten

zufäligen link starten

tabs

tabs

CD Lade | Virtueller CDladenknopf | Script für Faule

Rechner

CD Lade | Virtueller CDladenknopf | Script für Faule