Xojo Conferences
XDCMay2019MiamiUSA

Platforms to show: All Mac Windows Linux Cross-Platform

/MacCG/CoreGraphics Overlay Window/Photoshop Splash Screen/Photoshop Splash Screen
Function:
Required plugins for this example: MBS MacCG Plugin, MBS Picture Plugin, MBS Util Plugin
You find this example project in your Plugins Download as a Xojo project file within the examples folder: /MacCG/CoreGraphics Overlay Window/Photoshop Splash Screen/Photoshop Splash Screen
This example is the version from Wed, 3rd May 2016.
Project "Photoshop Splash Screen.rbp"
Class Window1 Inherits Window
EventHandler Sub Open() // disable shadow self.HasNoShadowMBS = true 'self.nswindowmbs.hasShadow = false // make image for background dim pic, mask as Picture pic=SplashScreen.BitmapMBS mask=SplashScreenMask.BitmapMBS if 0 = me.MakeTransparentMBS then MsgBox "This demo requires Mac OS X!" quit Return end if cgimage=CGCreateImageMBS(pic,mask) Exception quit End EventHandler
EventHandler Sub Paint(g As Graphics, areas() As REALbasic.Rect) dim c as CGContextMBS dim r as CGRectMBS if cgimage<>nil then r=CGMakeRectMBS(0,0,g.Width,g.Height) c=me.CGContextMBS c.ClearRect r c.DrawPicture cgimage,r c.Flush end if End EventHandler
Property cgimage As cgimageMBS
End Class
MenuBar Menu
MenuItem UntitledMenu3 = ""
MenuItem UntitledMenu2 = "File"
MenuItem FileQuit = "Quit"
MenuItem UntitledMenu7 = ""
MenuItem UntitledMenu0 = "Edit"
MenuItem EditUndo = "Undo"
MenuItem UntitledMenu1 = "-"
MenuItem EditCut = "Cut"
MenuItem EditCopy = "Copy"
MenuItem EditPaste = "Paste"
MenuItem EditClear = "Clear"
MenuItem UntitledMenu6 = ""
MenuItem UntitledMenu5 = ""
MenuItem UntitledMenu4 = ""
End MenuBar
Class App Inherits Application
End Class
ExternalFile SplashScreen
End ExternalFile
ExternalFile SplashScreenMask
End ExternalFile
End Project

See also:

Feedback, Comments & Corrections

The items on this page are in the following plugins: MBS MacCG Plugin.




Links
MBS Xojo Plugins