|
You last visited: Today at 18:49
Advertisement
Brauche Hilfe beim Coden
Discussion on Brauche Hilfe beim Coden within the AutoIt forum part of the Coders Den category.
11/19/2010, 18:18
|
#1
|
elite*gold: 0 
Join Date: Aug 2010
Posts: 39
Received Thanks: 0
|
Brauche Hilfe beim Coden
Hi
Ich fange gerade an mich mit AutoIt zu beschäftigen.( und Koda )
Ich bin dabei einen mini-Taschenrechner zu machen^^
Es kommen natürlich noch Optionen dazu 
Ich hab jetzt 3 Fragen :
1) Wie kann ich den Code kürzen?
2) Was muss ich machen, um das so einzustellen, dass ich, wenn ich auf "Abbrechen" klicke ( beim 2. Fenster), zum ersten Fenster gelange, und sich das Programm nicht ganz schließt ?
3) Was muss ich machen, damit in der Input-Box nicht Input1 steht, sondern 0 ?
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Rechner", 318, 123, 192, 147)
$MenuItem1 = GUICtrlCreateMenu("Datei")
$MenuItem2 = GUICtrlCreateMenuItem("Schließen", $MenuItem1)
$Input1 = GUICtrlCreateInput("Input1", 16, 40, 121, 21)
$Button1 = GUICtrlCreateButton("+", 160, 16, 75, 25)
$Button2 = GUICtrlCreateButton("-", 160, 40, 75, 25)
$Button3 = GUICtrlCreateButton("x", 160, 64, 75, 25)
$Button4 = GUICtrlCreateButton(":", 232, 16, 75, 25)
$Button5 = GUICtrlCreateButton("x²", 232, 40, 75, 25)
$Button6 = GUICtrlCreateButton("Wurzel", 232, 64, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $MenuItem2
Exit
Case $Button1
$ausgelesen1 = GUICtrlRead($Input1)
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Geben Sie hier nun eine andere Zahl ein", 190, 94, 391, 218)
$Input2 = GUICtrlCreateInput("Input1", 32, 16, 121, 21)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 96, 48, 75, 25)
$Loesen = GUICtrlCreateButton("Lösen", 8, 48, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Loesen
$ausgelesen2 = GUICtrlRead($Input2)
MsgBox(0,"Addition",$ausgelesen1+$ausgelesen2)
Case $Abbrechen
Exit
EndSwitch
WEnd
Case $Button2
$ausgelesen1 = GUICtrlRead($Input1)
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Geben Sie hier nun eine andere Zahl ein", 190, 94, 391, 218)
$Input2 = GUICtrlCreateInput("Input1", 32, 16, 121, 21)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 96, 48, 75, 25)
$Loesen = GUICtrlCreateButton("Lösen", 8, 48, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Loesen
$ausgelesen2 = GUICtrlRead($Input2)
MsgBox(0,"Subtraktion",$ausgelesen1-$ausgelesen2)
Case $Abbrechen
Exit
EndSwitch
WEnd
Case $Button3
$ausgelesen1 = GUICtrlRead($Input1)
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Geben Sie hier nun eine andere Zahl ein", 190, 94, 391, 218)
$Input2 = GUICtrlCreateInput("Input1", 32, 16, 121, 21)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 96, 48, 75, 25)
$Loesen = GUICtrlCreateButton("Lösen", 8, 48, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Loesen
$ausgelesen2 = GUICtrlRead($Input2)
MsgBox(0,"Multiplikation",$ausgelesen1*$ausgelesen2)
Case $Abbrechen
Exit
EndSwitch
WEnd
Case $Button4
$ausgelesen1 = GUICtrlRead($Input1)
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Geben Sie hier nun eine andere Zahl ein", 190, 94, 391, 218)
$Input2 = GUICtrlCreateInput("Input1", 32, 16, 121, 21)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 96, 48, 75, 25)
$Loesen = GUICtrlCreateButton("Lösen", 8, 48, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Loesen
$ausgelesen2 = GUICtrlRead($Input2)
MsgBox(0,"Division",$ausgelesen1/$ausgelesen2)
Case $Abbrechen
Exit
EndSwitch
WEnd
Case $Button5
$ausgelesen1 = GUICtrlRead($Input1)
MsgBox(0,"Quadrat",$ausgelesen1*$ausgelesen1)
Case $Button6
$ausgelesen1 = GUICtrlRead($Input1)
MsgBox(0,"Wurzel",$ausgelesen1^(0.5))
EndSwitch
WEnd
Danke für Antworten 
|
|
|
|
11/19/2010, 19:16
|
#2
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
|
zb so:
PHP Code:
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Rechner", 318, 123, 192, 147)
$MenuItem1 = GUICtrlCreateMenu("Datei")
$MenuItem2 = GUICtrlCreateMenuItem("Schließen", $MenuItem1)
$Input1 = GUICtrlCreateInput("0", 16, 40, 121, 21)
$Button1 = GUICtrlCreateButton("+", 160, 16, 75, 25)
$Button2 = GUICtrlCreateButton("-", 160, 40, 75, 25)
$Button3 = GUICtrlCreateButton("*", 160, 64, 75, 25)
$Button4 = GUICtrlCreateButton("/", 232, 16, 75, 25)
$Button5 = GUICtrlCreateButton("x²", 232, 40, 75, 25)
$Button6 = GUICtrlCreateButton("Wurzel", 232, 64, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Geben Sie hier nun eine andere Zahl ein", 190, 94, 391, 218)
$Input2 = GUICtrlCreateInput("0", 32, 16, 121, 21)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 96, 48, 75, 25)
$Loesen = GUICtrlCreateButton("Lösen", 8, 48, 75, 25)
GUISetState(@SW_HIDE)
#EndRegion ### END Koda GUI section ###
While 1
$ausgelesen1 = GUICtrlRead($Input1)
$ausgelesen2 = GUICtrlRead($Input2)
$msg = GUIGetMsg(1)
Switch $msg[1]
Case $Form1
Switch $msg[0]
Case -3
Exit
Case $Button1
GUISetState(@SW_SHOW, $Form2)
WinSetTitle($Form2, "", "+")
Case $Button2
GUISetState(@SW_SHOW, $Form2)
WinSetTitle($Form2, "", "-")
Case $Button3
GUISetState(@SW_SHOW, $Form2)
WinSetTitle($Form2, "", "*")
Case $Button4
GUISetState(@SW_SHOW, $Form2)
WinSetTitle($Form2, "", "/")
Case $Button5
MsgBox(0, "Quadrat", $ausgelesen1 * $ausgelesen1)
Case $Button6
MsgBox(0, "Wurzel", $ausgelesen1 ^ (0.5))
EndSwitch
Case $Form2
Switch $msg[0]
Case -3
GUISetState(@SW_HIDE, $Form2)
GUISetState(@SW_SHOW, $Form1)
Case $Abbrechen
GUISetState(@SW_HIDE, $Form2)
GUISetState(@SW_SHOW, $Form1)
Case $Loesen
$zusammenfassen = $ausgelesen1&WinGetTitle($Form2)&$ausgelesen2
$loesung = Execute($zusammenfassen)
MsgBox("","",$loesung)
EndSwitch
EndSwitch
If $msg[0] = $MenuItem2 Then Exit
WEnd
|
|
|
|
|
11/19/2010, 19:17
|
#3
|
elite*gold: 25
Join Date: Jun 2010
Posts: 1,076
Received Thanks: 290
|
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Rechner", 318, 123, 192, 147)
$MenuItem1 = GUICtrlCreateMenu("Datei")
$MenuItem2 = GUICtrlCreateMenuItem("Schließen", $MenuItem1)
$Input1 = GUICtrlCreateInput("0", 16, 40, 121, 21)
$Button1 = GUICtrlCreateButton("+", 160, 16, 75, 25)
$Button2 = GUICtrlCreateButton("-", 160, 40, 75, 25)
$Button3 = GUICtrlCreateButton("x", 160, 64, 75, 25)
$Button4 = GUICtrlCreateButton(":", 232, 16, 75, 25)
$Button5 = GUICtrlCreateButton("x²", 232, 40, 75, 25)
$Button6 = GUICtrlCreateButton("Wurzel", 232, 64, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $MenuItem2
Exit
Case $Button1
Addition()
Case $Button2
Subtration()
Case $Button3
Multiplikation()
Case $Button4
Division()
Case $Button5
Quadrat()
Case $Button6
Wurzel()
EndSwitch
WEnd
Func Addition()
$Addition_inputbox = inputbox("Deine Zahl","Geb hier bitte deine Zahl ein","")
msgbox(0,"Addition",$Addition_inputbox+GUICtrlRead($Input1))
endfunc
Func SubtratioN()
$Subtration_inputbox = inputbox("Deine Zahl","Geb hier bitte deine Zahl ein","")
msgbox(0,"Subtration",GUICtrlRead($Input1)-$Subtration_inputbox)
endfunc
func Multiplikation()
$Multiplikation_inputbox = inputbox("Deine Zahl","Geb hier bitte deine Zahl ein","")
msgbox(0,"Multiplikation",$Multiplikation_inputbox*GUICtrlRead($Input1))
endfunc
func Division()
$Division_inputbox = inputbox("Deine Zahl","Geb hier bitte deine Zahl ein","")
msgbox(0,"Division",$Division_inputbox/GUICtrlRead($Input1))
endfunc
Func Quadrat()
msgbox(0,"Quadrat",GUICtrlRead($Input1)*GUICtrlRead($Input1))
endfunc
Func Wurzel()
MsgBox(0,"Wurzel",guictrlread($Input1)^(0.5))
endfunc
So müsste es gehen 
|
|
|
|
|
11/19/2010, 19:20
|
#4
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
|
und wiedereinmal war ich ein tick schneller als du ;D
|
|
|
|
|
11/19/2010, 19:26
|
#5
|
elite*gold: 0
Join Date: Aug 2010
Posts: 39
Received Thanks: 0
|
Danke euch beiden
Aber hab noch ne Frage an omer36 : was ist der Unterschied zwischen :
Switch $nMsg und
Switch $msg[1] ?
|
|
|
|
|
11/19/2010, 20:02
|
#6
|
elite*gold: 25
Join Date: Jun 2010
Posts: 1,076
Received Thanks: 290
|
die zweite variable ist eine array
|
|
|
|
|
11/19/2010, 22:21
|
#7
|
elite*gold: 0
Join Date: Aug 2010
Posts: 39
Received Thanks: 0
|
Tut mir leid, ich fange grad erst an zu "programmieren".
Was und wofür ist eine Array ?
|
|
|
|
|
11/19/2010, 23:17
|
#8
|
elite*gold: 25
Join Date: Jun 2010
Posts: 1,076
Received Thanks: 290
|
vllt. kann dir das weiterhelfen ;D
|
|
|
|
|
11/19/2010, 23:42
|
#9
|
elite*gold: 0
Join Date: Sep 2009
Posts: 51
Received Thanks: 8
|
kurz gesagt ist ein Array eine Variable mit mehreren Werten, z.b: bei einer Koordinate hast du x und y Wert, die kannst du beide in ein Array speichern. Viele Funktionen von AutoIt geben als wert ein Array zurück, weil es "mehrere Antworten/Möglichkeiten" gibt was als Ergebnis bei diesen Funktionen herauskommt.
Wenn du dich weiter mit AutoIt auseinandersetzen willst, solltest du das tut machen, das amnesi gepostet hat.
|
|
|
|
|
11/20/2010, 14:05
|
#10
|
elite*gold: 0
Join Date: Aug 2010
Posts: 39
Received Thanks: 0
|
ok werd ich machen
danke
|
|
|
|
|
11/20/2010, 15:40
|
#11
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
|
und durch array´s kannste dir auch ne menge schreib arbeit sparen, wenn du dich damit auskennst... (ich kann es selber noch nicht so wirklich..)
hier ein kleines bsp ohne array´s :
PHP Code:
$Form1 = GUICreate("Form1", 189, 600, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 16, 16, 153, 49)
$Button2 = GUICtrlCreateButton("Button2", 16, 72, 153, 49)
$Button3 = GUICtrlCreateButton("Button3", 16, 128, 153, 49)
$Button4 = GUICtrlCreateButton("Button4", 16, 184, 153, 49)
$Button5 = GUICtrlCreateButton("Button5", 16, 240, 153, 49)
$Button6 = GUICtrlCreateButton("Button6", 16, 296, 153, 49)
$Button7 = GUICtrlCreateButton("Button7", 16, 352, 153, 49)
$Button8 = GUICtrlCreateButton("Button8", 16, 408, 153, 49)
$Button9 = GUICtrlCreateButton("Button9", 16, 464, 153, 49)
$Button10 = GUICtrlCreateButton("Button10", 16, 520, 153, 49)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $Button1
MsgBox("", "", 'Button1 wurde gedrückt')
Case $Button2
MsgBox("", "", 'Button2 wurde gedrückt')
Case $Button3
MsgBox("", "", 'Button3 wurde gedrückt')
Case $Button4
MsgBox("", "", 'Button4 wurde gedrückt')
Case $Button5
MsgBox("", "", 'Button5 wurde gedrückt')
Case $Button6
MsgBox("", "", 'Button6 wurde gedrückt')
Case $Button7
MsgBox("", "", 'Button7 wurde gedrückt')
Case $Button8
MsgBox("", "", 'Button8 wurde gedrückt')
Case $Button9
MsgBox("", "", 'Button9 wurde gedrückt')
Case $Button10
MsgBox("", "", 'Button10 wurde gedrückt')
EndSwitch
WEnd
hier genau das selbe mit array´s:
PHP Code:
Dim $button[10]
$Form1 = GUICreate("Form1", 189, 600, 192, 124)
For $i = 0 To 9
$button[$i] = GUICtrlCreateButton('Button' & 1 + $i, 16, 16 + 56 * $i, 153, 49)
Next
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
EndSwitch
For $i = 0 To 9
If $nMsg = $button[$i] Then
MsgBox("", "", 'Button ' & $i + 1 & ' wurde gedrückt')
EndIf
Next
WEnd
wie du siehst, nicht mal halb so viel geschrieben...
aber wiegesagt, ich kanns mit array selber noch nicht so gut, vllt gehts sogar noch einfacher.. ^^
|
|
|
|
 |
Similar Threads
|
Hilfe beim Warrock hack coden
01/27/2011 - WarRock - 2 Replies
Also ich bin gerade dabei einen wr hack zu coden
aber ich kapier nich ganz wie man das menü codet oder den bypass need help
ich code mit visual c++
wäre nett wenn mir jemand helfen könnte oder mir vllt eine .cpp von einem fertigen hack schicken kann
Lg yak44
|
Hilfe beim Coden vom 4Story Bot
11/05/2010 - 4Story - 9 Replies
Ich will einen 4Story Bot coden in VB08, aber wenn ich
My.Computer.Keyboard.sendkeys("1")'1=An griff geht das net, why ever...!
Welche Anweisung muss ich sonst nehmen???
Gibt es ein Tutorial mit AutoIt ?
Oder in VB08?
Danke im Vorraus
|
Hilfe beim coden
04/22/2010 - Kal Online - 6 Replies
Ich weiss das es hier genug leecher und sonstiges gibt, aber vorerst gehöre ich nicht zu denen. Da hier im board ja viele nen Kalbot haben wollte ich fragen ob sich irgendjemand mit mir in verbindung setzen kann und mir helfen kann einen bot zu coden oder für den anfang etwas leichteres- wie gesagt ich erwarte nur hilfe. Ich werde es selbst versuchen weil mich sowas schon seit langem fasziniert. Wäre wirklich freundlich
mfg PuppetMaster : )
|
Hilfe beim Coden
03/27/2010 - WarRock - 11 Replies
Hallo,
Ich habe gerade ein D3D Hack gecodet!
Leider ist der immer Detected..
Kann mir jemand helfen oder kann mir jemand einen empfehlen, der mir dabei helfen könnte?
Danke im Voraus.
|
Brauche hilfe beim coden !!
07/09/2008 - WarRock - 1 Replies
Kann mir jemand mal bitte alle aktuellen addys zum coden sagen :confused: ??
Danke schonmal im voraus !!
|
All times are GMT +1. The time now is 18:50.
|
|
