Page 1 of 1

XBROWSE memory leak - SOLVED

Posted: Wed Sep 02, 2020 9:46 pm
by MGA
Sr. Antonio, utilizo la versión de FIVEWIN 17.04, y noté una pérdida de memoria en xbrowse, al usar GDIVIEW, noté que (PEN) no liberó memoria.

Quizás ya lo haya corregido, pero el problema estaba en el método:

METHOD Adjust() CLASE TXBrowse
...

//aqui***********************************
if ::hRowPen != nil
DeleteObject( ::hRowPen )
::hRowPen := nil
endif
********************************************
do case
case nStyle == LINESTYLE_BLACK .or. nStyle == LINESTYLE_RAISED .or. nStyle == LINESTYLE_INSET
::hRowPen := CreatePen( If( ::nColorPen == nil, PS_NULL, PS_SOLID ), ::nSizePen, ::nColorPen )
case nStyle == LINESTYLE_DARKGRAY
::hRowPen := CreatePen( PS_SOLID, ::nSizePen, CLR_GRAY )
case nStyle == LINESTYLE_FORECOLOR
::hRowPen := CreatePen( PS_SOLID, ::nSizePen, ::nClrText )
case nStyle == LINESTYLE_LIGHTGRAY
::hRowPen := CreatePen( PS_SOLID, ::nSizePen, CLR_LIGHTGRAY )

end case

Re: XBROWSE memory leak - SOLVED

Posted: Wed Sep 09, 2020 1:33 pm
by MGA
aparentemente no es interesante para fivetech.

Re: XBROWSE memory leak - SOLVED

Posted: Wed Sep 09, 2020 2:02 pm
by Antonio Linares
A veces se nos pasa algún mensaje :-)

gracias por el recordatorio

Re: XBROWSE memory leak - SOLVED

Posted: Thu Sep 10, 2020 3:13 am
by nageswaragunupudi
Included in FWH2008.
Thanks.