window resolution

Post Reply
User avatar
Richard Chidiak
Posts: 946
Joined: Thu Oct 06, 2005 7:05 pm
Location: France
Contact:

window resolution

Post by Richard Chidiak »

Hello Antonio,

Ownd:nvertres() and OWND:nhorzRes() are not active in fwppc.

Is there a way to know the vertical height and horizontal ?

Thanks

Richard
http://www.cbati.com

Uestudio
Fwh 13.05 Harbour 3.2 MSVC 2013
User avatar
Enrico Maria Giordano
Posts: 8753
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia
Has thanked: 1 time
Been thanked: 4 times
Contact:

Re: window resolution

Post by Enrico Maria Giordano »

This is a working sample:

Code: Select all | Expand

#include "Fwce.ch"


#define SM_CXSCREEN 0
#define SM_CYSCREEN 1


FUNCTION MAIN()

    LOCAL oWnd

    DEFINE WINDOW oWnd

    @ 1, 1 BUTTON "Show sizes";
           SIZE 120, 30;
           ACTION ( MSGINFO( GETSYSMETRICS( SM_CXSCREEN ) ),;
                    MSGINFO( GETSYSMETRICS( SM_CYSCREEN ) ) )

    ACTIVATE WINDOW oWnd

    RETURN NIL


EMG
User avatar
Richard Chidiak
Posts: 946
Joined: Thu Oct 06, 2005 7:05 pm
Location: France
Contact:

Re: window resolution

Post by Richard Chidiak »

EnricoMaria wrote:This is a working sample:

Code: Select all | Expand

#include "Fwce.ch"


#define SM_CXSCREEN 0
#define SM_CYSCREEN 1


FUNCTION MAIN()

    LOCAL oWnd

    DEFINE WINDOW oWnd

    @ 1, 1 BUTTON "Show sizes";
           SIZE 120, 30;
           ACTION ( MSGINFO( GETSYSMETRICS( SM_CXSCREEN ) ),;
                    MSGINFO( GETSYSMETRICS( SM_CYSCREEN ) ) )

    ACTIVATE WINDOW oWnd

    RETURN NIL


EMG


Thanks Enrico

I did not think about getsysmetrics !
http://www.cbati.com

Uestudio
Fwh 13.05 Harbour 3.2 MSVC 2013
User avatar
Antonio Linares
Site Admin
Posts: 42519
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Has thanked: 31 times
Been thanked: 75 times
Contact:

Post by Antonio Linares »

Richard,

There is a new FWPPC build that you may already download that implements those methods and some new features.
regards, saludos

Antonio Linares
www.fivetechsoft.com
Post Reply