Jump to content
Sign in to follow this  
vip3ron

Need help designing interface

Recommended Posts

vip3ron

10char

Edited by vip3ron

Share this post


Link to post
Share on other sites
liten

Shure, i would love to help, see you need to either open (if you have it) or download Koda GUI on Forums


My UDF:Freeze.au3-Freeze values like CE, ML, ETC[i][/i][u][/u]

Share this post


Link to post
Share on other sites
Randeniya

friend :) , how about this one :) ?

But it your script intervel is too long.

try with a timer function to Sleep()

SoRRy About my English......

#cs ----------------------------------------------------------------------------
    
    AutoIt Version: 3.3.0.0
    Author:         K_ZONE (Randeniya) k_zone_r@yahoo.com
    
    Script Function:
    Simple GUI script.
    
#ce ----------------------------------------------------------------------------

; Script Start here

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiButton.au3>

$Form1 = GUICreate("A simple GUI For Run A macro ", 521, 155, 193, 125)
$Button1 = GUICtrlCreateButton("Start", 344, 112, 73, 25, 0)
$Button2 = GUICtrlCreateButton("Close", 424, 112, 73, 25, 0)
$Group1 = GUICtrlCreateGroup("", 8, 8, 505, 137)
$Label1 = GUICtrlCreateLabel("You Are About to run A MaCrO", 16, 32, 476, 57)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Button3 = GUICtrlCreateButton("About", 264, 112, 73, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)

DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Form1, "int", 1000, "long", 262160)
GUISetState()
WinSetTrans($Form1, "", 210)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $Button1
            If $Button1 = "Start" Then
                _GUICtrlButton_SetText($Button1, "Open")
                _macro()
            Else
                _GUICtrlButton_SetText($Button1, "Close")
;~              ExitLoop
            EndIf
        Case $Button2
            _QUIT()
        Case $Button3
            MsgBox(0, "Hi", "By K_ZONEĀ®  k_zone_r@yahoo.com")
        Case $GUI_EVENT_CLOSE
            _QUIT()

    EndSwitch
WEnd

Func _macro()
    While 1;starts loop
        Sleep(1200000)
        Send("{F2}")
        Sleep(1200000)
        Send("{F3}")
    WEnd;where loop ends
EndFunc   ;==>_macro

Func _QUIT()
    DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Form1, "int", 1000, "long", 327696)
    Exit
EndFunc   ;==>_QUIT

Share this post


Link to post
Share on other sites
vip3ron

it doesn't work, but i will use this as an example thank you :)

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  

×

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.