Code: Select all | Expand
The HD_LAYOUT structure contains information used to set the size and position of a header control.
typedef struct _HD_LAYOUT { // hdl
RECT FAR* prc;
WINDOWPOS FAR* pwpos;
} HD_LAYOUT;
Members
prc
Pointer to a RECT structure that contains the coordinates of a rectangle that the header control is to occupy.
pwpos
Pointer to a WINDOWPOS structure that receives information about the appropriate size and position of the header control.
Remarks
This structure is used with the HDM_LAYOUT message.
Code: Select all | Expand
#ifdef __HARBOUR__
CLIPPER HEADERLAYOUT( PARAMS ) // hWnd [, aRect] --> aInfo
#else
CLIPPER HEADERLAYO( PARAMS ) // UT()
#endif
{
RECT prc;
WINDOWPOS pwpos;
HDLAYOUT hdlayout;
hdlayout.prc = &prc;
hdlayout.pwpos = &pwpos;
if( PCOUNT() > 1 )
{
hdlayout.prc->left = _parnl( 2, 1 );
hdlayout.prc->top = _parnl( 2, 2 );
hdlayout.prc->right = _parnl( 2, 3 );
hdlayout.prc->bottom = _parnl( 2, 4 );
}
SendMessage( ( HWND ) _parnl( 1 ), ( LONG ) HDM_LAYOUT, 0, ( LPARAM ) &hdlayout );
_reta( 7 );
_stornl( ( LONG ) hdlayout.pwpos->hwnd, -1, 1 );
_stornl( ( LONG ) hdlayout.pwpos->hwndInsertAfter, -1, 2 );
_storni( hdlayout.pwpos->x, -1, 3 );
_storni( hdlayout.pwpos->y, -1, 4 );
_storni( hdlayout.pwpos->cx, -1, 5 );
_storni( hdlayout.pwpos->cy, -1, 6 );
_stornl( hdlayout.pwpos->flags, -1, 7 );
}
Code: Select all | Expand
**************
function ROLAR( cLado )
**************
if cLado = "D" && Rolar para direita
nPos += 10
else && Senão para a esquerda
nPos -= 10
endif
SetWindowPos( oHeader:hWnd, 0, 40, nPos, 1000, 40, SWP_FRAMECHANGED )
return NIL
Code: Select all | Expand
SET PORTUGUESE ON
Assim que eu tiver concluído as mudanças, irei compartilhar com todos os interessados ok ? :D
Abraços,
Rossine.
Code: Select all | Expand
SET ENGLISH ON
Like this that I will have concluded the changes, I am going to share with everybody them interested ok? :D
With best regards,
Rossine.
