Change Screen 1 background colour?

Richard_Summers · January 7, 2023, 12:30pm

Although I have made my own desktop apps in Xojo, I have never made an iOS app. I am struggling with how to change the background colour of the default Screen 1 in a new project.

Can anyone please help me?

Thanks in advance.

Liam_Sawrey · January 7, 2023, 12:38pm

Download iOSDesignExtensions from

Add the modules you want to use but the following allows you to change the background

github.com

jkleroy/iOSDesignExtensions/blob/master/iOSDesignExtensions/ViewExtensionsXC.xojo_code

#tag Module
Protected Module ViewExtensionsXC
	#tag Method, Flags = &h0, Description = 416464732061206269672070726F6772657373576865656C20696E207468652063656E746572206F662074686520436F6E7461696E6572
		Sub AddProgressXC(extends mView As MobileContainer, ByRef Progress As MobileProgressWheel, DarkBackground As Boolean = False)
		  
		  Progress = new MobileProgressWheel
		  
		  If DarkBackground Then
		    Progress.SetActivityIndicatorViewStyleXC(ControlExtensionsXC.UIActivityIndicatorViewStyle.whiteLarge)
		  Else
		    Progress.SetActivityIndicatorViewStyleXC(ControlExtensionsXC.UIActivityIndicatorViewStyle.whiteLarge)
		    
		    declare sub setColor lib "UIKit.framework" selector "setColor:" (obj_id as ptr, col as ptr)
		    setColor(Progress.handle, UIColor.Gray)
		    
		  end if
		  
		  mView.AddControl(Progress)
		  
		  Dim cons As new iOSLayoutConstraint(Progress, _

This file has been truncated. show original

Sub SetBackgroundColorXC(extends v As MobileScreen, c As Color)

On the Opening Event of the MobileScreen name Screen1
Eg: Screen1.SetBackgroundColorXC(Color.Red)

Richard_Summers · January 7, 2023, 12:47pm

Thanks - I will try that. Much appreciated.

Jeremie_L · January 7, 2023, 12:53pm

I recommend copy/pasting the entire iOSDesignExtensions folder into your own project.

You will then have more than a hundred extension methods you can use on all MobileUIControls and MobileScreen. All extension methods end with “XC” such as MobileScreen.SetBackgroundColorXC

The demo project showcases most of the available extensions.

Richard_Summers · January 7, 2023, 1:03pm

Ok, so I copy the entire iOSDesignExtensions folder into my project.
Then in the Screen1 opening event, I paste the following code:

Sub SetBackgroundColorXC(extends v As MobileScreen, c As Color)
Screen1.SetBackgroundColorXC(Color.Red)

Have I understood that correctly?
Been a few years since I last used Xojo, and Im a bit rusty

Liam_Sawrey · January 7, 2023, 1:30pm

If your MobileScreen was named Screen1 and it was a property in a module or app. Then you can use that object. Eg. Module1.Screen1.Set…

Or if on the opening event,

Me.SetBackgroundColorXC(Color.Red)