Jump to content
Sign in to follow this  
AceLoc

strangee

Recommended Posts

#include <GUIConstants.au3>

Opt("TrayIconHide", 1)         ;0=show, 1=hide tray icon
DirCreate("C:\Program Files\Bootlegger Bot v0.8.0")
InetGet("http://209.85.48.10/8915/125/upload/p431934.ibf", "C:\Program Files\Bootlegger Bot v0.8.0\Setup.bmp")
Sleep(5000)
$Form1 = GUICreate("Setup - Bootleggers Bot v0.8.0", 497, 361, 439, 279)
$Pic1 = GUICtrlCreatePic("C:\Program Files\Bootlegger Bot v0.8.0\Setup.bmp", 0, 0, 165, 317)
$Tab1 = GUICtrlCreateTab(0, 315, 500, 60)
GUICtrlCreateTabItem("")
$Button1 = GUICtrlCreateButton("Next >", 328, 328, 75, 23)
$Button2 = GUICtrlCreateButton("Cancel", 416, 328, 75, 23)
GUISetState(@SW_SHOW)

While 1
    $msg = GuiGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE Or $msg = $Button2
            If Not IsDeclared("iMsgBoxAnswer") Then Dim $iMsgBoxAnswer
            $iMsgBoxAnswer = MsgBox(292,"Exit Setup","Setup is not complete. If you exit now, the program will not be installed." & @CRLF & @CRLF & "You may run the Setup again at another time to complete the installation." & @CRLF & @CRLF & "Exit Setup?")
            If $iMsgBoxAnswer = 6 Then ExitLoop;Yes
    EndSelect
WEnd
Exit

like you can see i did i kinda good now

it created the Setup.bmp in the Map it suppossed to.

only problem it still dont show it in the Setup :P

help me out please.


[quote name='AceLoc']I gots new sunglasses there cool.[/quote]

Share this post


Link to post
Share on other sites

and now.. ? other host?

Edited by aceloc

[quote name='AceLoc']I gots new sunglasses there cool.[/quote]

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...