Sign in to follow this  
Followers 0
ConsultingJoe

Fully Resizable Mini Speed Test

5 posts in this topic

#1 ·  Posted (edited)

A good example of the use of resizing.

#include <GUIConstants.au3>
#include <IE.au3>
$data = 0
Global Const $PBS_MARQUEE = 0x00000008 
$Form1 = GUICreate("Mini Speed test", 451, 251, -1, -1, BitOR($WS_MINIMIZEBOX,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_GROUP,$WS_CLIPSIBLINGS))
$Progress = GUICtrlCreateProgress( 450/4, 250/2, 450/2, 20, $PBS_MARQUEE )
$ie = _IECreateEmbedded()
$ieobject = GUICtrlCreateObj( $ie, 0, 0 )
GUICtrlSetResizing ( -1, 34 );34 docks the IE to the top left.
GUISetState(@SW_SHOW)
AdlibEnable( "load", 100 )
_IENavigate( $ie, "http://www.speedtest.net/mini/speedtest.swf" )
AdlibDisable( )
GUICtrlSetPos( $ieobject, 0, 0, 450, 250 )

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

Func load()
    If $data = 100 Then
        $data = 0
    Else
        $data = $data + 5
    EndIf
    GUICtrlSetData( $Progress, $data )
EndFunc
Edited by CyberZeroCool

[center]AutoIT + Finger Print Reader/Scanner = COOL STUFF -> Check Out Topic![/center][center][font=Arial Black]Check out ConsultingJoe.com[/font][/center][center]My Scripts~~~~~~~~~~~~~~Web Protocol Managing - Simple WiFi Scanner - AutoTunes - Remote PC Control V2 - Audio SpectrascopePie Chart UDF - At&t's TTS - Custom Progress Bar - Windows Media Player Embed[/center]

Share this post


Link to post
Share on other sites



Nice, I love the way those swf files resize with vector graphics... Thanks for sharing..

Share this post


Link to post
Share on other sites

Nice, I love the way those swf files resize with vector graphics... Thanks for sharing..

yeah, its great, too bad it flickers though.

[center]AutoIT + Finger Print Reader/Scanner = COOL STUFF -> Check Out Topic![/center][center][font=Arial Black]Check out ConsultingJoe.com[/font][/center][center]My Scripts~~~~~~~~~~~~~~Web Protocol Managing - Simple WiFi Scanner - AutoTunes - Remote PC Control V2 - Audio SpectrascopePie Chart UDF - At&t's TTS - Custom Progress Bar - Windows Media Player Embed[/center]

Share this post


Link to post
Share on other sites

doesn't flicker on mine...

Share this post


Link to post
Share on other sites

mine just does when you resize it.


[center]AutoIT + Finger Print Reader/Scanner = COOL STUFF -> Check Out Topic![/center][center][font=Arial Black]Check out ConsultingJoe.com[/font][/center][center]My Scripts~~~~~~~~~~~~~~Web Protocol Managing - Simple WiFi Scanner - AutoTunes - Remote PC Control V2 - Audio SpectrascopePie Chart UDF - At&t's TTS - Custom Progress Bar - Windows Media Player Embed[/center]

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  
Followers 0