Forum Discussion
crawfishmedia
11 years agoBinge Watcher
Boner achieved!
screen = CreateObject("roScreen")
port = CreateObject("roMessagePort")
screen.SetMessagePort(port)
fontRegistry = CreateObject("roFontRegistry")
font = fontRegistry.GetDefaultFont()
bitmap = CreateObject("roBitmap", {width:1280, height:720, AlphaEnable: true})
bitmap.Clear(&h000000FF)
bitmap.DrawText("Credit: Full Name (username)",0,0,&hCBCBCBFF,font)
screen.DrawRotatedObject(128,70,270,bitmap)
screen.Finish()
Now I have to completely code my own slideshow handler instead of roCanvas or roSlideshow. Happy we resolved this but angry about the workarounds that have to be done.
Thanks!!!
screen = CreateObject("roScreen")
port = CreateObject("roMessagePort")
screen.SetMessagePort(port)
fontRegistry = CreateObject("roFontRegistry")
font = fontRegistry.GetDefaultFont()
bitmap = CreateObject("roBitmap", {width:1280, height:720, AlphaEnable: true})
bitmap.Clear(&h000000FF)
bitmap.DrawText("Credit: Full Name (username)",0,0,&hCBCBCBFF,font)
screen.DrawRotatedObject(128,70,270,bitmap)
screen.Finish()
Now I have to completely code my own slideshow handler instead of roCanvas or roSlideshow. Happy we resolved this but angry about the workarounds that have to be done.
Thanks!!!