Victor,

The value of 'SB_SETBKCOLOR' is hexadecimal 0x2001.

>#DEFINE	   SB_SETBKCOLOR    0x2001

>I would like to know how to change the color of a statusbar control dropped in a Top-Level form ...
>
>Thanks in advance for your help
>
>I have tried several approches, including the following code, but get no result :
>
>In the Form.Init procedure

>DECLARE INTEGER SendMessage IN user32;
>    INTEGER hWnd,;
>    INTEGER Msg,;
>    INTEGER wParam,;
>    INTEGER lParam
>
>#DEFINE	   SB_SETBKCOLOR    2001
>
>*-- Call API to Change Color of Status Bar
>= SENDMESSAGE (THISFORM.StatusBar1.hWnd, SB_SETBKCOLOR, 0, RGB(246,246,246))