Sign in to follow this  
Followers 0
amdead

How do I use internet jpegs in my application without them in the same file?

11 posts in this topic

am making a media player, and i want to add a jpeg to it without having the jpeg downloaded. So it can just show when connected to the internet. I want to like a theme, like xmas, helloween ect. unless theres a way to have flash (swf)?

Share this post


Link to post
Share on other sites



am making a media player, and i want to add a jpeg to it without having the jpeg downloaded. So it can just show when connected to the internet. I want to like a theme, like xmas, helloween ect. unless theres a way to have flash (swf)?

I'm not sure.. but I think you might have to have it downloaded. What you could do is have it download the images each time you run it to @Temp and when the user closes the application it will delete them from the @Temp directory.


AutoIt Scripts:Aimbot: Proof of Concept - PixelSearching Aimbot with several search/autoshoot/lock-on techniques.Sliding Toolbar - Add a nice Sliding Toolbar to your next script. Click the link to see an animation of it in action!FontInfo UDF - Get list of system fonts, or search to see if a particular font is installed.Get Extended Property UDF - Retrieve a files extended properties (e.g., video/image dimensions, file version, bitrate of song/video, etc)

Share this post


Link to post
Share on other sites

am making a media player, and i want to add a jpeg to it without having the jpeg downloaded. So it can just show when connected to the internet. I want to like a theme, like xmas, helloween ect. unless theres a way to have flash (swf)?

Here is a way to use flash(swf) , not written by me

#include <GUIConstants.au3>
$oRP = ObjCreate("ShockwaveFlash.ShockwaveFlash.1")
GUICreate ("Golf Game", 820, 600, -1, -1)
$GUIActiveX = GUICtrlCreateObj( $oRP, 10, 10 , 800 , 580)

With $oRP; Object tag pool
    .bgcolor = "#000000"; change background color to white FFFFFF
    .Movie = 'd:\autoit\minigolf.swf'; the wave file from inet / could be on disk
    .ScaleMode = 2
    .Loop = True
    .wmode = "Opaque"; Opaque / transparent
;.Stop / .Play
EndWith

GUISetState ();Show GUI

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
    EndSelect
WEnd

$oRP = 0; FREE THE OBJECT
GUIDelete ()
Exit


Get Beta versions Here Get latest SciTE editor Here AutoIt 1-2-3 by Valuater - A great starting point.

Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

Share this post


Link to post
Share on other sites

Thanks, I will use the flash seems the easyest.

Share this post


Link to post
Share on other sites

And one other thing, which part do I use? am a noob.

Share this post


Link to post
Share on other sites

And one other thing, which part do I use? am a noob.

Pick a flash file and replace minigolf.swf then try it and see what happens. After that you just have to change things to get them to look as you want.


Get Beta versions Here Get latest SciTE editor Here AutoIt 1-2-3 by Valuater - A great starting point.

Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

Share this post


Link to post
Share on other sites

yea i know that. I mean whitch part of the script would I put into my own?

Share this post


Link to post
Share on other sites

yea i know that. I mean whitch part of the script would I put into my own?

You will need almost all of it apart from using your own GUI and while loop.


Get Beta versions Here Get latest SciTE editor Here AutoIt 1-2-3 by Valuater - A great starting point.

Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

Share this post


Link to post
Share on other sites

Thanks BigDod :D

Share this post


Link to post
Share on other sites

You could also embed a webbrowser control to display your jpeg image...

$oIE = ObjCreate("Shell.Explorer.2") in place of the flash plugin.

You'd then use $oIE.Navigate("http://some.site.com/folder/image.jpg")

There would likely be other properties you'd want to set on the control to get it looking the way you want it...

Dale


Free Internet Tools: DebugBar, AutoIt IE Builder, HTTP UDF, MODIV2, IE Developer Toolbar, IEDocMon, Fiddler, HTML Validator, WGet, curl

MSDN docs: InternetExplorer Object, Document Object, Overviews and Tutorials, DHTML Objects, DHTML Events, WinHttpRequest, XmlHttpRequest, Cross-Frame Scripting, Office object model

Automate input type=file (Related)

Alternative to _IECreateEmbedded? better: _IECreatePseudoEmbedded  Better Better?

IE.au3 issues with Vista - Workarounds

SciTe Debug mode - it's magic: #AutoIt3Wrapper_run_debug_mode=Y Doesn't work needs to be ripped out of the troubleshooting lexicon. It means that what you tried did not produce the results you expected. It begs the questions 1) what did you try?, 2) what did you expect? and 3) what happened instead?

Reproducer: a small (the smallest?) piece of stand-alone code that demonstrates your trouble

Share this post


Link to post
Share on other sites

You could also embed a webbrowser control to display your jpeg image...

$oIE = ObjCreate("Shell.Explorer.2") in place of the flash plugin.

You'd then use $oIE.Navigate("http://some.site.com/folder/image.jpg")

There would likely be other properties you'd want to set on the control to get it looking the way you want it...

Dale

Ya, like getting rid of the margins.
Func GUICtrlCreateInetPic($filename, $left, $top, $width, $height)
    $oIE = ObjCreate("Shell.Explorer.2")
    $ctrlID = GUICtrlCreateObj($oIE, $left, $top, $width, $height)
    $oIE.navigate("about:blank")
    $oIE.document.write('<base href="' & @WorkingDir & '">' & _
    '<body topmargin="0" leftmargin="0" marginwidth="0" marginheight="0">' & _
    '<img src="' & $filename & '" /></body>')
    Dim $return[2] = [$ctrlID, $oIE]
    Return $return
EndFunc

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