topic-44333

Board index FiveWin para Harbour/xHarbour Eliminar Botones de xBrowse

Posts: 851

Joined: Sun Nov 09, 2014 05:01 PM

Eliminar Botones de xBrowse
Posted: Mon Mar 11, 2024 01:47 PM

Saludos estimados amigos.

tengo este codigo sencillo:

    aDbfTxt := cDbfTxt->( FW_DbfToArray() )
    xBrowser aDbfTxt

el cual me muestra esta imagen:

quisiera eliminar la barra de botones del browse, que solo muestre esto:

gracias por la ayuda...

"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Eliminar Botones de xBrowse
Posted: Mon Mar 11, 2024 03:03 PM

Code (fw): Select all Collapse

XBROWSER aDbfText SETUP XbrNoBar( oBrw )

Code (fw): Select all Collapse

function XbrNoBar( oBrw )

   oBrw:oWnd:bInit := < |oDlg|
      WITH OBJECT oDlg
         :oBar:Hide()
         oBrw:nTop -= :oBar:nHeight
         oBrw:nHeight += :oBar:nHeight
      END
      return nil
      >

return nil

Regards

G. N. Rao.

Hyderabad, India

JoseAlvarez

Posts: 851

Joined: Sun Nov 09, 2014 05:01 PM

Re: Eliminar Botones de xBrowse
Posted: Mon Mar 11, 2024 03:26 PM

Excelent Mr. Rao !!

Thanks a lot !

"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.

FiveTech Support Forums

Continue the discussion