Ocultar solo algunos botones de un xbrowser

Ocultar solo algunos botones de un xbrowser

Postby Enrrique Vertiz » Sun Dec 22, 2024 1:20 pm

Estimados, saludos

Aqui abajo esta la imagen de un xbrowser, si coloco: "oDlg:aControls[ 1 ]:Hide()" no muestra ningun boton y si coloco: "oDlg:aControls[ 1 ]:show()", muestra 10 botones , 9 a la izquierda y 1 (un check) a la derecha, como hago para solo mostrar algunos y no todos, por ejemplo, SI mostrar los 4 primeros que son navegacion, NO mostrar los 3 siguientes que son aumentar, modificar y eliminar y SI mostrar el de imprimir y exportar a excel, asi como el check.
Gracias

https://imageshack.com/i/pnJ4gzWig
Enrrique Vertiz Pitta
Lima-Peru
xHb 1.23.1026X, Fwh 24.09, BCC74, MySQL 8.0.X, SQLLIB 1.9m
Enrrique Vertiz
 
Posts: 548
Joined: Fri Oct 07, 2005 2:17 pm
Location: Lima - Peru

Re: Ocultar solo algunos botones de un xbrowser

Postby Antonio Linares » Sun Dec 22, 2024 2:12 pm

Code: Select all  Expand view  RUN
#include "FiveWin.ch"

function Main()

   USE Customer

   XBROWSER Alias() SETUP oBrw:oWnd:aControls[ 1 ]:aControls[ 1 ]:End()

return nil  
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42203
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Ocultar solo algunos botones de un xbrowser

Postby Enrrique Vertiz » Sun Dec 22, 2024 2:30 pm

Saludos Antonio

Gracias, asi oculte 1x1 : Dlg:aControls[1]:aControls[5]:Hide()
Enrrique Vertiz Pitta
Lima-Peru
xHb 1.23.1026X, Fwh 24.09, BCC74, MySQL 8.0.X, SQLLIB 1.9m
Enrrique Vertiz
 
Posts: 548
Joined: Fri Oct 07, 2005 2:17 pm
Location: Lima - Peru

Re: Ocultar solo algunos botones de un xbrowser

Postby Antonio Linares » Sun Dec 22, 2024 2:57 pm

Siguiendo las indicaciones de Rao:

XBROWSER "customer.dbf" SETUP ( oBrw:bInit := { |o| o:oWnd:oBar:aControls[ 1 ]:Hide() } )
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42203
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 95 guests