diffrent GUI

[ashley]

how do i make a GUI like this one.

http://www.autoitscript.com/forum/index.ph...mp;hl=autominer

thanks

[Madza91]

expandcollapse popup

#include <GuiConstants.au3>

Global $CurrentColor = "0xAF0000"
Global $ScanWidth = 110, $ScanHeight = 120
Global $ScanWidth = 110, $ScanHeight = 120
Global $x = 0, $y = 0

$GUI = GUICreate("Easy:-)",110,40,$x,$y,$WS_POPUP)
$ColorLabel = GUICtrlCreateLabel("Color",0,1,110,20,$SS_CENTER)
SetColor()
$Sleep = GUICtrlCreateEdit("Stopped", 0, 20,110,20,$ES_AUTOVSCROLL+$ES_AUTOHSCROLL+$ES_READONLY+$ES_CENTER)
GUICtrlSetBkColor(-1,0xFFFFFF)

GuiSetState()
    $Top = GUICreate("Top Line", $ScanWidth, 2,$x,$y + 40,$WS_POPUP,-1,$GUI)
    GUISetBkColor(0xFF0000)
    GUISetState()
    $Left = GUICreate("Left Line", 2, $ScanHeight,$x,$y + 40,$WS_POPUP,-1,$GUI)
    GUISetBkColor(0xFF0000)
    GUISetState()
    $Right = GUICreate("Right Line", 2, $ScanHeight,$x + $ScanWidth - 2,$y + 40,$WS_POPUP,-1,$GUI)
    GUISetBkColor(0xFF0000)
    GUISetState()
    $Bottom = GUICreate("Bottom Line", $ScanWidth, 2,$x,$y + 40 + $ScanHeight,$WS_POPUP,-1,$GUI)
    GUISetBkColor(0xFF0000)
    GUISetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
    ;;;
    EndSelect
WEnd
Exit

Func SetColor()
    GUICtrlSetBkColor($ColorLabel,$CurrentColor)
    GUISetBkColor($CurrentColor,$GUI)
EndFunc