Jump to content
Sign in to follow this  
walle

Picture problem,

Recommended Posts

walle

The GUI won't view pictures in my GUI, here is the code

#include <GUIConstants.au3>
#include <Misc.au3>

$Form2 = GUICreate("Burnbuddy", 547, 359, 469, 236)
GUISetIcon("C:\Documents and Settings\TEEEST\Desktop\Burn buddy icon.ico")
$PageControl1 = GUICtrlCreateTab(8, 8, 508, 320)
$TabSheet1 = GUICtrlCreateTabItem("Main")
$Engelskt = GUICtrlCreateCheckbox("Engelskt", 392, 208, 113, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Utorrent1 = GUICtrlCreateInput("", 32, 72, 225, 23)GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Svenskt = GUICtrlCreateCheckbox("Svenskt", 392, 224, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$LokaliseraUtorrent = GUICtrlCreateLabel("Lokalisera Utorrent.exe", 32, 48, 131, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$IMG1 = GUICtrlCreateInput("", 32, 136, 225, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlCreateLabel("Lokalisera Img.exe", 36, 113, 108, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Label1 = GUICtrlCreateLabel("  Windows XP", 376, 184, 79, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label2 = GUICtrlCreateLabel("Beteckning på brännare", 37, 173, 135, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Burner1 = GUICtrlCreateInput("", 32, 200, 225, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Button8 = GUICtrlCreateButton("Bläddra", 272, 136, 75, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Button9 = GUICtrlCreateButton("Brännare", 273, 201, 75, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Button10 = GUICtrlCreateButton("Bläddra", 273, 73, 75, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label4 = GUICtrlCreateLabel("Utorrent", 378, 116, 48, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Checkbox1 = GUICtrlCreateCheckbox("Engelskt", 392, 140, 113, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Checkbox2 = GUICtrlCreateCheckbox("Svenskt", 392, 156, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Pic1 = GUICtrlCreatePic("C:\Documents and Settings\TEEEST\Desktop\Burn buddy icon.jpg", 432, 40, 68, 76,  ;The picture
BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Checkbox3 = GUICtrlCreateCheckbox("Engelskt", 392, 273, 113, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label5 = GUICtrlCreateLabel("  WinRAR", 386, 249, 56, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Checkbox4 = GUICtrlCreateCheckbox("Svenskt", 392, 289, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label8 = GUICtrlCreateLabel("", 32, 232, 250, 19)
$Progress = GUICtrlCreateProgress(32, 272, 150, 17, $PBS_SMOOTH,$WS_EX_WINDOWEDGE)
$TabSheet2 = GUICtrlCreateTabItem("Inställningar")
$Label6 = GUICtrlCreateLabel("Skicka sms när film är klar", 32, 64, 149, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$NR = GUICtrlCreateInput("NR", 32, 88, 177, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label7 = GUICtrlCreateLabel("Spela upp ett ljudklipp när filmen är klar", 32, 128, 220, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Checkbox5 = GUICtrlCreateCheckbox("Musik", 32, 152, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$TabSheet3 = GUICtrlCreateTabItem("Credits")
$TabSheet4 = GUICtrlCreateTabItem("Torrents")
$Button4 = GUICtrlCreateButton(">", 247, 64, 30, 25, 0)

$ListBox1 = GUICtrlCreateList("", 99, 57, 137, 201)
GUICtrlSetData(-1, "Next.2007.R5.CUSTOM.SWESUB.DVDR-Crowd|Pirates.Of.The.Caribbean.Dead.Mans.Chest.2006.PAL|The.Ex.2007.R5.CUSTOM.SWESUB.DVDR-aTerFalleT|The.Hills.Have.Eyes.II.2007.DVDSCR.CUSTOM.SWESUB.DVDR-C...|We.All.Love.Lactuz.2007.SWESUB.DVDR-SWEDVDR")
$Button5 = GUICtrlCreateButton(">>", 247, 97, 31, 25, 0)
$Button6 = GUICtrlCreateButton("<", 248, 130, 31, 25, 0)
GUICtrlSetState(-1, $GUI_DISABLE)
$Button7 = GUICtrlCreateButton("<<", 248, 163, 32, 25, 0)
$ListBox2 = GUICtrlCreateList("", 291, 57, 137, 201)
GUICtrlCreateLabel("Filmer för nedladdning,bränning", 16, 40, 151, 17)
$Label3 = GUICtrlCreateLabel("OBS!, Denna funktion är ännu i Beta stadiet och fungerar tyvärr inte i denna version utav Burnbuddy", 24, 272, 476, 17)
$Button11 = GUICtrlCreateButton("B", 251, 232, 30, 25, 0)
$TEST = GUICtrlCreateButton("TEST", 432, 296, 75, 25, 0)
GUICtrlCreateTabItem("")
$Button1 = GUICtrlCreateButton("&OK", 166, 328, 75, 25, 0)
$Button2 = GUICtrlCreateButton("&Cancel", 254, 328, 75, 25, 0)
$Button3 = GUICtrlCreateButton("&Start", 344, 328, 75, 25, 0)

GUISetState(@SW_SHOW)

Share this post


Link to post
Share on other sites
BrettF

I don't see why this shouldn't work. Where you commented, it was a bit funny, because you split the line over 2..... Try this, and make sure the picture exists :) 110% positive :)

EDIT: Forgot the code :">

#include <GUIConstants.au3>
#include <Misc.au3>

$Form2 = GUICreate("Burnbuddy", 547, 359, 469, 236)
GUISetIcon("C:\Documents and Settings\TEEEST\Desktop\Burn buddy icon.ico")
$PageControl1 = GUICtrlCreateTab(8, 8, 508, 320)
$TabSheet1 = GUICtrlCreateTabItem("Main")
$Engelskt = GUICtrlCreateCheckbox("Engelskt", 392, 208, 113, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Utorrent1 = GUICtrlCreateInput("", 32, 72, 225, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Svenskt = GUICtrlCreateCheckbox("Svenskt", 392, 224, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$LokaliseraUtorrent = GUICtrlCreateLabel("Lokalisera Utorrent.exe", 32, 48, 131, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$IMG1 = GUICtrlCreateInput("", 32, 136, 225, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlCreateLabel("Lokalisera Img.exe", 36, 113, 108, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Label1 = GUICtrlCreateLabel("  Windows XP", 376, 184, 79, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label2 = GUICtrlCreateLabel("Beteckning på brännare", 37, 173, 135, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Burner1 = GUICtrlCreateInput("", 32, 200, 225, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Button8 = GUICtrlCreateButton("Bläddra", 272, 136, 75, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Button9 = GUICtrlCreateButton("Brännare", 273, 201, 75, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Button10 = GUICtrlCreateButton("Bläddra", 273, 73, 75, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label4 = GUICtrlCreateLabel("Utorrent", 378, 116, 48, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Checkbox1 = GUICtrlCreateCheckbox("Engelskt", 392, 140, 113, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Checkbox2 = GUICtrlCreateCheckbox("Svenskt", 392, 156, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Pic1 = GUICtrlCreatePic("C:\Documents and Settings\TEEEST\Desktop\Burn buddy icon.jpg", 432, 40, 68, 76, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$Checkbox3 = GUICtrlCreateCheckbox("Engelskt", 392, 273, 113, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label5 = GUICtrlCreateLabel("  WinRAR", 386, 249, 56, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Checkbox4 = GUICtrlCreateCheckbox("Svenskt", 392, 289, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label8 = GUICtrlCreateLabel("", 32, 232, 250, 19)
$Progress = GUICtrlCreateProgress(32, 272, 150, 17, $PBS_SMOOTH, $WS_EX_WINDOWEDGE)
$TabSheet2 = GUICtrlCreateTabItem("Inställningar")
$Label6 = GUICtrlCreateLabel("Skicka sms när film är klar", 32, 64, 149, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$NR = GUICtrlCreateInput("NR", 32, 88, 177, 23)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label7 = GUICtrlCreateLabel("Spela upp ett ljudklipp när filmen är klar", 32, 128, 220, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Checkbox5 = GUICtrlCreateCheckbox("Musik", 32, 152, 97, 17)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$TabSheet3 = GUICtrlCreateTabItem("Credits")
$TabSheet4 = GUICtrlCreateTabItem("Torrents")
$Button4 = GUICtrlCreateButton(">", 247, 64, 30, 25, 0)

$ListBox1 = GUICtrlCreateList("", 99, 57, 137, 201)
GUICtrlSetData(-1, "Next.2007.R5.CUSTOM.SWESUB.DVDR-Crowd|Pirates.Of.The.Caribbean.Dead.Mans.Chest.2006.PAL|The.Ex.2007.R5.CUSTOM.SWESUB.DVDR-aTerFalleT|The.Hills.Have.Eyes.II.2007.DVDSCR.CUSTOM.SWESUB.DVDR-C...|We.All.Love.Lactuz.2007.SWESUB.DVDR-SWEDVDR")
$Button5 = GUICtrlCreateButton(">>", 247, 97, 31, 25, 0)
$Button6 = GUICtrlCreateButton("<", 248, 130, 31, 25, 0)
GUICtrlSetState(-1, $GUI_DISABLE)
$Button7 = GUICtrlCreateButton("<<", 248, 163, 32, 25, 0)
$ListBox2 = GUICtrlCreateList("", 291, 57, 137, 201)
GUICtrlCreateLabel("Filmer för nedladdning,bränning", 16, 40, 151, 17)
$Label3 = GUICtrlCreateLabel("OBS!, Denna funktion är ännu i Beta stadiet och fungerar tyvärr inte i denna version utav Burnbuddy", 24, 272, 476, 17)
$Button11 = GUICtrlCreateButton("B", 251, 232, 30, 25, 0)
$TEST = GUICtrlCreateButton("TEST", 432, 296, 75, 25, 0)
GUICtrlCreateTabItem("")
$Button1 = GUICtrlCreateButton("&OK", 166, 328, 75, 25, 0)
$Button2 = GUICtrlCreateButton("&Cancel", 254, 328, 75, 25, 0)
$Button3 = GUICtrlCreateButton("&Start", 344, 328, 75, 25, 0)

GUISetState(@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_Event_Close
            Exit
    EndSelect
WEnd
Edited by Bert

Share this post


Link to post
Share on other sites
BrettF
walle

$Pic1 = GUICtrlCreatePic("", 432, 40, 68, 76)
GUICtrlSetImage (-1, "C:\Documents and Settings\TEEEST\Desktop\Burn buddy icon.jpg")

:)

Wow, it works :)

Thanks again^!

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  

×