FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Pocket PC Check for screen size. Is possible?
Posts: 35
Joined: Mon Jan 19, 2009 09:14 AM
Check for screen size. Is possible?
Posted: Tue Feb 24, 2009 12:31 PM

Hi everybody!

I make my "first aplication", and probe run on PC device.
All work.

But my device have screen lager than device emulator, and some controls like smaller.
For example browse control have white area on bottom of screen.
Can I test my device for screen size in any way?

Regards.
Andrej.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Check for screen size. Is possible?
Posted: Tue Feb 24, 2009 12:58 PM

Andrej,

Please try these values:

GetSysMetrics( 0 )
GetSysMetrics( 1 )

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 35
Joined: Mon Jan 19, 2009 09:14 AM
Re: Check for screen size. Is possible?
Posted: Wed Feb 25, 2009 07:44 AM

Thanks!

I wil try this.

Regards.

Andrej.

Posts: 35
Joined: Mon Jan 19, 2009 09:14 AM
Re: Check for screen size. Is possible?
Posted: Thu Feb 26, 2009 07:41 AM

It's work.

But system tray in WinCE 5 is smaller than system tray in lastest versions of WinCE.
Can I check for OS version ?

Regards.
Andrej

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Check for screen size. Is possible?
Posted: Thu Feb 26, 2009 11:07 AM
Andrej,

Code (fw): Select all Collapse
#include "FWCE.ch"

function Main()

   local oWnd
   
   DEFINE WINDOW oWnd TITLE "Version"
   
   @ 9, 2 BUTTON "Version" ;
      SIZE 210, 30 ACTION ShowVersion()

   ACTIVATE WINDOW oWnd
   
return nil   

function ShowVersion()

   local aVersion := GetVersion()
   
   MsgInfo( Str( aVersion[ 1 ] ) )
   MsgInfo( Str( aVersion[ 2 ] ) )
   MsgInfo( Str( aVersion[ 3 ] ) )
   MsgInfo( Str( aVersion[ 4 ] ) )
   
return nil
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 35
Joined: Mon Jan 19, 2009 09:14 AM
Re: Check for screen size. Is possible?
Posted: Thu Feb 26, 2009 11:13 AM

Thanks Antonio!
Saludos :)
Andrej.

Continue the discussion