"jbrave" wrote:
No, I've got it working, it's pretty badass, you can change for certain the primary and secondary logo image using a URL in near real time. I can't confirm the slice URL yet though.
"jbrave" wrote:
Each poster item has an image URL associated with it, I send it to the app manager and refresh using pretty much the code I posted.
newTheme(mainposter[m.li].info[itemindex+checkindex(m.co[m.li])].imageURL)
m.audioplayer.SetNext(ItemIndex+checkindex(m.co[m.li]))
m.audioplayer.play()
displaybox()
function NewTheme(url as string)
app = CreateObject("roAppManager")
theme = CreateObject("roAssociativeArray")
theme.OverhangOffsetSD_X = "72"
theme.OverhangOffsetSD_Y = "31"
theme.OverhangSliceSD = "pkg:/images/Overhang_Background_SD.png"
theme.OverhangLogoSD = "pkg:/images/Overhang_Logo_SD.png"
theme.OverhangSecondaryLogoOffsetHD_Y="0"
theme.OverhangSecondaryLogoOffsetHD_y="0"
theme.OverhangSecondaryLogoOffsetSD_x="0"
theme.OverhandSecondaryLogoOffsetSD_y="0"
theme.OverhangOffsetHD_X = "75"
theme.OverhangOffsetHD_Y = "31"
theme.OverhangSliceHD = "pkg:/images/Overhang_Background_HD.png"
theme.OverhangLogoHD = "pkg:/images/Overhang_Logo_HD.png"
theme.OverhangSecondaryLogoHD=url
theme.OverhangSecondaryLogoSD=url
app.SetTheme(theme)
end function
sub displaybox()
lp=createobject("romessageport")
dialog=CreateObject("roOneLineDialog")
dialog.SetTitle("busy")
dialog.setmessageport(lp)
dialog.show()
dialog.close()
end sub
Sub RunUserInterface()
NewTheme( "http://kb.worldsecuresystems.com/844/cpsid_84445/images/Image8a.png" )
screenFacade = CreateObject( "roPosterScreen" )
screenFacade.SetMessagePort( CreateObject( "roMessagePort" ) )
screenFacade.Show()
wait( 0, screenFacade.GetMessagePort() )
End Sub
function NewTheme(url as string)
app = CreateObject("roAppManager")
theme = CreateObject("roAssociativeArray")
theme.OverhangOffsetSD_X = "72"
theme.OverhangOffsetSD_Y = "31"
theme.OverhangSliceSD = "pkg:/images/Overhang_Background_SD.png"
theme.OverhangLogoSD = "pkg:/images/Overhang_Logo_SD.png"
theme.OverhangSecondaryLogoOffsetHD_Y="0"
theme.OverhangSecondaryLogoOffsetHD_y="0"
theme.OverhangSecondaryLogoOffsetSD_x="0"
theme.OverhandSecondaryLogoOffsetSD_y="0"
theme.OverhangOffsetHD_X = "75"
theme.OverhangOffsetHD_Y = "31"
theme.OverhangSliceHD = "pkg:/images/Overhang_Background_HD.png"
theme.OverhangLogoHD = "pkg:/images/Overhang_Logo_HD.png"
theme.OverhangSecondaryLogoHD=url
theme.OverhangSecondaryLogoSD=url
app.SetTheme(theme)
end function