fix resolution for mobile device

[erich.wanker]

Hello,

 

i try to create a form with a fix width of 480 and a fix height of 820 pixel - so the form is "fixed" to the width of a mobileDeviceScreen and can be scrolled just in the height ..

i tryed a lot of things but can not realise this ..

 

and i get allways 1024 x 768 as screenresolution .. doesnt matter witch device

 

thanks for helping

 

erich

 

x:=screen.WorkAreaWidth;
y:=screen.WorkAreaHeight;
unimemo1.Lines.Append('Workarea:'+inttostr(x)+'  '+inttostr(y));

x:=screen.Width;
y:=screen.Height;
unimemo1.Lines.Append('Screen: '+inttostr(x)+'  '+inttostr(y));

UniApplication.SetScreenWH(480,640);