Change screen orientation programmatically??

[taximania]

Originally Posted by Put Claude

Hi,
I upload again the orientation programs, you have to use them with the
shell function:
If isppc = True Then Shell("Lndsc270.exe", "")

Put Claude Belgium

And, as usual for my device, the 'orientation programs' don't work.
I am programming on the device.

Sub Globals
	'Declare the global variables here.

End Sub

Sub App_Start
	Form1.Show
End Sub


Sub Button1_Click
if isppc = true then Shell("Lndsc270.exe", "")

End Sub

If 'isppc' is invalid, you mean cPPC. Which still doesn't work on my device.
I will post more tomorrow after work.
I get the time to program the device at work

[Put Claude]

hi taxmania,

Sorry if not understandable, this is a piece from the code, an I did not mentioning the variable 'isppc'...
Sub global

isppc=0

End Sub

Sub App_Start 'POINT to start

isppc = CPPC 'returns False or True=PPC, check if running on desktop or PPC
If isppc = True Then Shell("Lndsc270.exe", "")

work with variable, so I have not togo trough the cPPC function all the time...
Works with me on 4 different Pockets WM3 SE, WM 5, WM6 Pro....
Good luc....

Put Claude Belgium