Jump to content
Sign in to follow this  
EDD

Flashing message box.

Recommended Posts

EDD

Is het possible to let a message box (msgbox function) flash (flicker) and how?

Or do i have to made a Graphical User Interface with flash function in it?

Share this post


Link to post
Share on other sites
Generator

Is het possible to let a message box (msgbox function) flash (flicker) and how?

Or do i have to made a Graphical User Interface with flash function in it?

Make a GUI and set state as Hide and Show really fast

Share this post


Link to post
Share on other sites
star2

check this example

#include <Misc.au3>
$dll = DllOpen ("user32.dll")
Do
MsgBox (-1,"test","test",1)
Sleep (500)
Until _IsPressed (71 , $dll)
DllClose($dll)

when MSGBOX starts flashing and u want to stop keep on pressing F2

is this what u need or what?

Edited by star2

[quote]Baby you're all that I want, When you're lyin' here in my armsI'm findin' it hard to believe, We're in heavenAnd love is all that I need , And I found it there in your heartIt isn't too hard to see, We're in heaven .Bryan Adams[/quote].............................................................................[u]AUTOIT[/u]

Share this post


Link to post
Share on other sites
gsglive

u could use this code

- gsglive

Do
    $msg = MsgBox (0, "!", "Text", 10)
until $msg = 1
Edited by gsglive

- gsglive

Share this post


Link to post
Share on other sites
herewasplato

That is pretty good gsglive.

You might want to lower the timeout to 1 second:

Do
    $msg = MsgBox(0, "!", "Text", 1)
    Sleep(200)
Until $msg = 1

[size="1"][font="Arial"].[u].[/u][/font][/size]

Share this post


Link to post
Share on other sites
PsaltyDS

Or, if you want the Uber-cool flashing GUI:

#include <guiconstants.au3>

Opt("GuiOnEventMode", 1)

$hGUI = GUICreate("Test Message", 300, 80)
GUICtrlCreateLabel("This is a flashing message!", 10, 10, 280, 20, $SS_CENTER)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Quit")
GUICtrlCreateButton("OK", 120, 40, 60, 30)
GUICtrlSetOnEvent(-1, "_Quit")
GUISetState()
$Trans = 100
$Incr = 10
While 1
    If $Trans > 245 Or $Trans < 100 Then $Incr = $Incr * -1
    $Trans += $Incr
    WinSetTrans("Test Message", "This is a flashing", $Trans)
    Sleep(50)
WEnd

Func _Quit()
    Exit
EndFunc   ;==>_Quit

:)

Edit: Tweaked the flash to fade.

Edited by PsaltyDS

Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law

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  

×