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 mały problem z rozsuwanym menu i "timeru" gdy ustawiam sekundy minuty lub godziny i tak odlicza mi wg wzoru minut

Naprawdę niewiem czemu ,bardzo prosze o pomoc .Podaje source:

 

 

 

; Script Start - Add your code below here

#include <GuiConstantsEx.au3>

HotKeySet("{End}","stop")

$GUI_Tytul = "Shutdown'er by adwi32"

$sekund = "sekund"

$odlicznie = 0

$szerokosc_gui=360

$godzin = "godzin"

$wysokosc_gui=175

$przycisk_start_wys=55

$przycisk_start_szer=85

$gui=GUICreate($GUI_Tytul,$szerokosc_gui,$wysokosc_gui)

$pole_text = GUICtrlCreateInput("",20,40,200,23,0x2000)

GUICtrlCreateLabel("Tu wpisz czas za po jakim twój komputer ma się wyłączyć (w minutach)",15,20)

$czas =GUICtrlCreateCombo("minut",225,42,80,20)

GUICtrlSetData(-1,$godzin)

GUICtrlSetData(-1,$sekund)

$przycisk_start = GUICtrlCreateButton("Start!",250,70,$przycisk_start_szer,$przycisk_start_wys)

GUISetState(@SW_SHOW)

GUICtrlSetTip($przycisk_start, "Kliknij by uruchomic odliczanie")

$czas1 = GUICtrlRead($czas)

While 1

$msg = GUIGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

Exit

Case $msg = $przycisk_start

If $czas1 = "minut" Then

$odlicznie = 60000

EndIf

If $czas1 = "godzin" Then

$odlicznie = 3600000

EndIf

If $czas1 = "sekund" Then

$odliczanie = 1000

EndIf

$licznik = GUICtrlRead($pole_text)

 

While $licznik >0

GUIDelete()

ToolTip("Wyłaczę komputer za:" &$licznik,0,0,$GUI_Tytul,1)

Sleep($odlicznie)

$licznik = $licznik- 1

WEnd

ToolTip("")

MsgBox(1,"Test","test ok")

Exit

 

 

EndSelect

WEnd

Func stop ()

Exit

EndFunc

liczylem na barce lecz ona niemogla wygrac.

Przez kibicow ktorzy przy rzutach roznych wolnych swiecili w messiego laserami

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