#Region Project Attributes #ApplicationLabel: b4atransparentbutton#versioncode:1#versionname: ' Supportedorientations possible values:unspecified, landscape or Portrait. #SupportedOrientations: unspecified# Caninstalltoexternalstorage:false#end region#region Activity Attributes #FullScreen: false#includetitle:true#end Regionsub process_globals ' These global variables would be declared once when the application starts. ' These variables can is accessed from all modules. End SubSub Globals ' These global variables would be redeclared each time the activity is created. ' These variables can only is accessed from the This module. Private Button1 as Buttondim CD as Colordrawable Dim bmp as Bitmap End SubSub Activity_create (firsttime as Boolean) ' Do not ' Forget to load the layout file created with the visual designer. For Example:Activity.LoadLayout ("1") bmp. Initialize (File.dirassets, "1.jpg") activity.setbackgroundimage (BMP) CD. Initialize (Colors.argb (100,0,0,0), 5) button1.initialize ("Button1") button1.backgrOund =cdend SubSub Activity_resumeend SubSub Activity_pause (userclosed as Boolean) End Sub