Bug in TWBrowse

[Enrico Maria Giordano]

Code: Select all  Expand view

// Headers are white

#include "Fivewin.ch"


FUNCTION MAIN()

    LOCAL oDlg, oBrw

    USE TEST

    DEFINE DIALOG oDlg

    @ 0, 0 LISTBOX oBrw FIELDS

    ACTIVATE DIALOG oDlg;
             ON INIT oDlg:SetControl( oBrw );
             CENTER

    CLOSE

    RETURN NIL

EMG

[Otto]

Enrico,
are you using VISTA ?
Regards,
Otto

http://forums.fivetechsoft.com/viewtopi ... ight=vista

[Enrico Maria Giordano]

No, XP SP3.

EMG

[Otto]

Enrico, ave you read the thread.
James reported also have seen this in XP.
In VISTA 8.o3 or 8.o4 (can't remember exactlly) resolved the problem.
Regards,
Otto

[Enrico Maria Giordano]

The problem started with this month FWH release.

EMG

[Antonio Linares]

Enrico,

Please try this change in source\classes\wbrowse line 2248:

Code: Select all  Expand view

   if nRowPos == 0             
      SetBkColor( hDC, If( ValType( nClrPane ) == "B",;
                  nClrPane := Eval( nClrPane ), nClrPane ) )
   endif               


[Enrico Maria Giordano]

It seems to work fine, thank you.

EMG