Round region

[Silvio]

wich are the parameters for CreateRoundRectRgn function ?

[mmercado]

Hi Silvio:

Code: Select all  Expand view

CreateRoundRectRgn( nLeftRect, nTopRect, nRightRect, nBottomRect, ;
                    nWidthEllipse, nHeightEllipse )

Regards.

Manuel Mercado

[Silvio]

this from xharbour or from c file ?

[mmercado]

this from xharbour or from c file ?

It's a C function, up to my knowledge there is not such a function in FWH.

Regards.

Manuel Mercado

[Antonio Linares]

Silvio,

It is a Windows API function:

http://msdn.microsoft.com/en-us/library/dd183516(VS.85).aspx

[Silvio]

I made this but I not Know if it run ok
I think there are other steps to create a round region ..

HB_FUNC ( CREATEROUNDRECTRGN )
{
HWND hWnd = ( HWND ) hb_parnl( 1 ) ;
HRGN hRgn;
RECT rct;

GetClientRect( hWnd, &rct ) ;

hRgn = CreateRoundRectRgn( rct.left, rct.top,
rct.right - rct.left + 1,
rct.bottom - rct.top + 1, hb_parnl( 2 ), hb_parnl( 3 ) ) ;

hb_retnl ((long) hRgn);
}