Little bitmap misalignment in TMsgItem

[Enrico Maria Giordano]

In the following sample, the bitmap and the text in the msgbar are not aligned:

Code: Select all  Expand view

#include "Fivewin.ch"


FUNCTION MAIN()

    LOCAL oWnd

    DEFINE WINDOW oWnd

    SET MESSAGE OF oWnd 2007

    DEFINE MSGITEM OF oWnd:oMsgBar;
           SIZE 20;
           BITMAP "c:\fwh\bitmaps\16x16\lock.bmp"

    DEFINE MSGITEM OF oWnd:oMsgBar;
           SIZE 55;
           PROMPT "TEST"

    ACTIVATE WINDOW oWnd

    RETURN NIL

This seems a proper fix (method Paint() of TMsgItem):

Code: Select all  Expand view

DrawMasked( hDC, hBmp, 2, nLeft + 1 )

EMG

[Antonio Linares]

Enrico,

Implemented. Thanks!

[Enrico Maria Giordano]

Thank you!

EMG