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

Witam po raz kolejny mam zaszczyt Napisać Do was i chciałbym się was zapytać jak zrobić okienko programu nie chodzi mi o funkcje powitalna msgbox bo to umiem ale o mniejwiecej takie cos'

Poniżej podam mój skrypt ;co Musze dopisać żeby mieć podobne okienko jak screen poniżej ??

 

 

To jest ukryta treść, proszę

 

 

http://img217.imageshack.us/img217/1407/fleufs.jpg

 

 

 

 

 

Za każdą pomoc odwdzięcze sie +

Opublikowano

Jak chcesz zrobić okno to otwórz zapisany skrypt w formacie .au3, naciśnij Tools i tam znajdź Koda(FromDesigner) chwila zabawy i masz gotowe GUI. Jeśli już zrobisz kliknij taki zielony znaczek jakby play to zamieni ci GUI na skrypt.

 

@UP

Jeżeli dajesz HotKeye na końcu to muszą być w pętli

sygnaturakopia.jpg
Opublikowano

@EDIT

 

MAM PROBLEM Z PROGRAMEM JAK SKOMPILOWALEM DO EXE GUI DZIALA ALE PROGRAM JUZ NIE MACIE KOD PONIZEJ

 

#include <GUIConstants.au3>

 

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("AutoPickUP", 616, 301, 307, 182)

GUISetIcon("C:\Documents and Settings\Admin\Moje dokumenty\koda\FD.exe", 1)

GUISetFont(11, 800, 2, "Arial")

$Progress1 = GUICtrlCreateProgress(56, 368, 345, 17)

GUICtrlSetCursor (-1, 0)

$Progress2 = GUICtrlCreateProgress(40, 192, 473, 65)

$Label1 = GUICtrlCreateLabel("", 64, 40, 4, 4)

$Label2 = GUICtrlCreateLabel("HOME-START BOTA END-KONIEC BOTA ", 48, 48, 406, 21)

$OK = GUICtrlCreateButton("OK", 256, 136, 75, 25, 0)

GUICtrlSetColor(-1, 0x008000)

GUICtrlSetBkColor(-1, 0xFFFBF0)

GUICtrlSetCursor (-1, 0)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

 

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

 

EndSwitch

WEnd

MSG

MsgBox(0,"AutoPickup By OSK@R","Home-Uruchom Bota End-Zakańcza pracę Bota")

Func ex()

Exit

EndFunc

 

func start()

While 1

Send ("{`}")

Sleep (10)

WEnd

EndFunc

while 1

HotKeySet("{home}", "start")

HotKeySet("{end}", "ex")

WEnd

Opublikowano

Pomożecie z tym GUI ? Sry że napisałem 2 razy ale myślałem że jestem zalogowany na siebie a nie jako gośc

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