|
Meteora
|
|
Un pic de ajutor in AutoIT, Iunie 21, 2008, 04:34:54 pm
|
|
Am inceput sa invat si eu AutoIT...am facut un program "care vrea" sa calculeze suma a 3 numere date de la tastaura(a,b,c) dar numai ca nu-mi iese Uitati codul sursa: #include
$gui = GUICreate("Adunare",250,75) $a_label = GUICtrlCreateLabel("a=",4,5,15,18) $a_input=GUICtrlCreateInput("",20,4,30,19) $b_label = GUICtrlCreateLabel("b=",54,5,15,18) $b_input = GUICtrlCreateInput("",70,4,30,19) $c_label = GUICtrlCreateLabel("c=",104,515,18) $c_input = GUICtrlCreateInput("",120,4,30,19) $calculate = GUICtrlCreateButton("Calculeaza",154,4,94,19) $adunare_box = GUICtrlCreateLabel("Rezultatul=",4,30,50,19) GUISetState()
Dim $a, $b, $c, $adunare
Func adunare() $a = GUICtrlRead($a_input) $b = guictrlread($b_input) $c = GUICtrlRead($c_input) $adunare = $a + $b + $c GUICtrlSetData($adunare_box,"Rezultatul=" & $adunare) EndFunc
while 1 $msg = GUIGetMsg() Select Case $msg = $calculate GUICtrlSetData($adunare_box, "") adunare() Case $msg = $GUI_EVENT_CLOSE ExitLoop endSelect WEnd Intru in program si scriu 3 cifre dar numai ca nu calculeaza..nu se intampla nimic..si in plus labelul c nici nu apare...spuneti-mi unde am gresit poza programului: 
|
|
|
|
|
Memorat
|
|
|
|
|
Smash
|
|
Un pic de ajutor in AutoIT, Iunie 21, 2008, 05:18:47 pm
|
|
Varianta corecta #include $gui = GUICreate("Adunare", 250, 75) $a_label = GUICtrlCreateLabel("a=", 4, 5, 15, 18) $a_input = GUICtrlCreateInput("", 20, 4, 30, 19) $b_label = GUICtrlCreateLabel("b=", 54, 5, 15, 18) $b_input = GUICtrlCreateInput("", 70, 4, 30, 19) $c_label = GUICtrlCreateLabel("c=", 104, 515, 18) $c_input = GUICtrlCreateInput("", 120, 4, 30, 19) $calculate = GUICtrlCreateButton("Calculeaza", 154, 4, 94, 19) $adunare_box = GUICtrlCreateLabel("Rezultatul=", 4, 30, 220, 20) GUISetState() While 1 $msg = GUIGetMsg() Select Case $msg = $calculate adunare() Case $msg = $GUI_EVENT_CLOSE ExitLoop EndSelect WEnd Func adunare() Local $a, $b, $c, $adunare $a = GUICtrlRead($a_input) $b = GUICtrlRead($b_input) $c = GUICtrlRead($c_input) $adunare = $a + $b + $c GUICtrlSetData($adunare_box,"Rezultatul=" & $adunare) EndFunc ;==>adunare
|
|
|
|
|
Memorat
|
|
|
|
|
Meteora
|
|
Un pic de ajutor in AutoIT, Iunie 21, 2008, 05:40:39 pm
|
|
mersi mult Smash..acum imi calculeaza suma dar totusi nus tiu de ce tot nu apare labelul "c" uite: 
|
|
|
|
|
Memorat
|
|
|
|
|
Smash
|
|
Un pic de ajutor in AutoIT, Iunie 21, 2008, 06:17:04 pm
|
|
pune $c_label = GUICtrlCreateLabel("c=", 104, 5, 18) in loc de $c_label = GUICtrlCreateLabel("c=", 104, 515, 18)
|
|
|
|
|
Memorat
|
|
|
|
|
Muzet
|
|
Un pic de ajutor in AutoIT, Iunie 21, 2008, 06:17:21 pm
|
|
Dacă vrei să scoţi c foloseşte asta: #include $gui = GUICreate("Adunare", 250, 75) $a_label = GUICtrlCreateLabel("a=", 4, 5, 15, 18) $a_input = GUICtrlCreateInput("", 20, 4, 30, 19) $b_label = GUICtrlCreateLabel("b=", 54, 5, 15, 18) $b_input = GUICtrlCreateInput("", 70, 4, 30, 19) $calculate = GUICtrlCreateButton("Calculeaza", 154, 4, 94, 19) $adunare_box = GUICtrlCreateLabel("Rezultatul=", 4, 30, 220, 20) GUISetState() While 1 $msg = GUIGetMsg() Select Case $msg = $calculate adunare() Case $msg = $GUI_EVENT_CLOSE ExitLoop EndSelect WEnd Func adunare() Local $a, $b, $c, $adunare $a = GUICtrlRead($a_input) $b = GUICtrlRead($b_input) $adunare = $a + $b GUICtrlSetData($adunare_box,"Rezultatul=" & $adunare) EndFunc ;==>adunare
|
|
|
|
|
Memorat
|
|
|
|
|
Meteora
|
|
Un pic de ajutor in AutoIT, Iunie 21, 2008, 06:23:23 pm
|
|
 acum merge...  am pus in loc de 5 - 515..normal aparea c-ul dar nu se putea vedea din cauza formului care avea dimensiuni mai miic 
|
|
|
|
|
Memorat
|
|
|
|
|
Muzet
|
|
Un pic de ajutor in AutoIT, Iunie 21, 2008, 06:25:14 pm
|
|
Credeam că vrei să scoţi C în cazul meu va fi suma a două numere a şi b.
|
|
|
|
|
Memorat
|
|
|
|
|
Meteora
|
|
Un pic de ajutor in AutoIT, Iunie 21, 2008, 06:47:15 pm
|
|
am vazut in unele programe :
Opt('MustDeclareVars', 1)
ce inseaman?> Opt-ul ala?
|
|
|
|
|
Memorat
|
|
|
|
shadow-hacker
Newbie
Deconectat
Mesaje: 5
|
|
Un pic de ajutor in AutoIT, Iunie 27, 2008, 09:14:54 pm
|
|
opt(...) este o comanda care o dai optional unui program schimbandu-i anumite caracteristici, ex: Opt(Mustdecalrevars, 1) spune ca trebuie sa declari toate variabilele obligatoriu
|
|
|
|
|
Memorat
|
|
|
|
HostGator
Newbie

Mesaje: Multe
|
Ai auzit de aligatorul care ofera hosting?
|
|
|
|
|
|