Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Rekomendowane odpowiedzi

Opublikowano

Mam 2 pytania

1 co trzeba zrobic aby w edytorze KODA taki pasek PROGRESS sie ruszal np tak jak podczas instalacji jakiegos programu kombinuje z tym juz z 2h i nic nie moge wykombinowac :D

2 Jak zrobic aby w/w edytorze zrobic ten imput aby wpisywac w niego tekst ja proboje zrobic takie cos

wpisuje w input np moje imie

wpisuje w 2 input moje nazwisko

klikam ok i wyskakuje :

Twoje imie to: np Józio

Twoje nazwisko to: Kowalski

Za kazda pomoc +

 

PS.Jak oceniacie ten skrypcik w autoit narazie sie ucze robic wiec sie nie czepiac o wyglad chodzi mi czy dobrze funkcjonuje

 

To jest ukryta treść, proszę

Kocham mpcforum.pl!!!

18706.png

Opublikowano

1

 

 

#include <GUIConstantsEx.au3>

#include <ProgressConstants.au3>

 

Opt('MustDeclareVars', 1)

 

Example()

 

Func Example()

Local $progressbar1, $progressbar2, $button, $wait, $s, $msg, $m

 

GUICreate("My GUI Progressbar", 220, 100, 100, 200)

$progressbar1 = GUICtrlCreateProgress(10, 10, 200, 20)

GUICtrlSetColor(-1, 32250); not working with Windows XP Style

$progressbar2 = GUICtrlCreateProgress(10, 40, 200, 20, $PBS_SMOOTH)

$button = GUICtrlCreateButton("Start", 75, 70, 70, 20)

GUISetState()

 

$wait = 20; wait 20ms for next progressstep

$s = 0; progressbar-saveposition

Do

$msg = GUIGetMsg()

If $msg = $button Then

GUICtrlSetData($button, "Stop")

For $i = $s To 100

If GUICtrlRead($progressbar1) = 50 Then MsgBox(0, "Info", "The half is done...", 1)

$m = GUIGetMsg()

 

If $m = -3 Then ExitLoop

 

If $m = $button Then

GUICtrlSetData($button, "Next")

$s = $i;save the current bar-position to $s

ExitLoop

Else

$s = 0

GUICtrlSetData($progressbar1, $i)

GUICtrlSetData($progressbar2, (100 - $i))

Sleep($wait)

EndIf

Next

If $i > 100 Then

; $s=0

GUICtrlSetData($button, "Start")

EndIf

EndIf

Until $msg = $GUI_EVENT_CLOSE

EndFunc ;==>Example

 

z helpa

Opublikowano

do pytania 2

$abc1=InputBox("asdf","asdf","","",150,150,500,500)

$abc2=InputBox("adsf","asdf","","",150,150,500,500)

msgbox(0,"asdf","Imię: " & $abc1 &" "& @lf & "Nazwisko: "& $abc2 )

Gość
Ten temat został zamknięty. Brak możliwości dodania odpowiedzi.
×
×
  • Dodaj nową pozycję...