Color en xBrowse vacío (SOLUCIONADO)

Post Reply
User avatar
Bayron
Posts: 815
Joined: Thu Dec 24, 2009 12:46 am
Location: Philadelphia, PA

Color en xBrowse vacío (SOLUCIONADO)

Post by Bayron »

Me gustaría saber si hay alguna manera de cambiar el color del area vacia de un xBrowse...
Ahora es blanca y siendo un area tan grande de la pantalla me gustaría colocarle otro color...

Image
Last edited by Bayron on Sun Jun 24, 2012 2:10 am, edited 1 time in total.
=====>

Bayron Landaverry
(215)2226600 Philadelphia,PA, USA
+(502)46727275 Guatemala
MayaBuilders@gMail.com

FWH12.04||Harbour 3.2.0 (18754)||BCC6.5||UEstudio 10.10||
Windows 7 Ultimate

FiveWin, One line of code and it's done...
RuFerSo
Posts: 55
Joined: Mon Feb 20, 2012 2:56 pm

Re: Color en xBrowse vacío

Post by RuFerSo »

Hola Bayron, puedes ponerle una imagen de fondo, hay ejemplos en el foro, si lo necesitas busco uno y lo pongo aquí.

Saludos Ruben Fernandez
User avatar
Bayron
Posts: 815
Joined: Thu Dec 24, 2009 12:46 am
Location: Philadelphia, PA

Re: Color en xBrowse vacío

Post by Bayron »

Gracias Ruben, estoy intentando con:

Code: Select all

ListVen:SetBackGround( Camino + 'images\Presentacion.bmp', BCK_FILL )
ListVen:CreateFromCode()
 
Pero me da el siguiente error:

Code: Select all

Application
===========
   Path and name: L:\Violetas\Violetas.EXE (32 bits)
   Size: 4,657,152 bytes
   Compiler version: Harbour 3.2.0dev (Rev. 17660)
   FiveWin  Version: FWH 12.03
   Windows version: 6.1, Build 7600 

   Time from start: 0 hours 0 mins 2 secs 
   Error occurred at: 23/06/2012, 10:36:31
   Error description: Error BASE/1004  Message not found: NIL:EVAL
   Args:
     [   1] = U   

Stack Calls
===========
   Called from:  => __ERRRT_SBASE( 0 )
   Called from: ../../../tobject.prg => NIL:ERROR( 0 )
   Called from: ../../../tobject.prg => (b)HBOBJECT( 0 )
   Called from: ../../../tobject.prg => NIL:MSGNOTFOUND( 0 )
   Called from: ../../../tobject.prg => (b)EVAL( 0 )
   Called from: .\source\classes\XBROWSE.PRG => (b)TXBROWSE( 407 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:KEYCOUNT( 0 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:REFRESH( 1184 )
   Called from: .\source\classes\WINDOW.PRG => (b)TWINDOW( 562 )
   Called from: .\source\classes\WINDOW.PRG => TXBROWSE:SETBRUSH( 0 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:SETBACKGROUND( 5347 )
   Called from: L:\Violetas\prg\Ventas.prg => VENTAS( 0 )
   Called from: L:\Violetas\prg\MayaPOS.prg => (b)MAKERIBBON( 0 )
   Called from: .\source\classes\TRBTN.PRG => TRBTN:CLICK( 676 )
   Called from: .\source\classes\TRBTN.PRG => TRBTN:LBUTTONUP( 854 )
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1690 )
   Called from: .\source\classes\TRBTN.PRG => TRBTN:HANDLEEVENT( 1520 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3153 )
   Called from:  => WINRUN( 0 )
   Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 980 )
   Called from: L:\Violetas\prg\MayaPOS.prg => MAIN( 0 )

 
Seguramente es porque el xBrowse está vacío????

No creo que debería ser de esta manera, ya que el area del browse sigue estando ahí aunque esté vacío...
Last edited by Bayron on Sat Jun 23, 2012 5:04 pm, edited 1 time in total.
=====>

Bayron Landaverry
(215)2226600 Philadelphia,PA, USA
+(502)46727275 Guatemala
MayaBuilders@gMail.com

FWH12.04||Harbour 3.2.0 (18754)||BCC6.5||UEstudio 10.10||
Windows 7 Ultimate

FiveWin, One line of code and it's done...
User avatar
FranciscoA
Posts: 1964
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: Color en xBrowse vacío

Post by FranciscoA »

Bayron, intenta colocar el background despues de creado el browse.

ListVen:CreateFromCode()
ListVen:SetBackGround( Camino + 'images\Presentacion.bmp', BCK_FILL )

Saludos.
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh1204-MySql-TMySql
User avatar
Bayron
Posts: 815
Joined: Thu Dec 24, 2009 12:46 am
Location: Philadelphia, PA

Re: Color en xBrowse vacío

Post by Bayron »

FranciscoA wrote:Bayron, intenta colocar el background despues de creado el browse.

ListVen:CreateFromCode()
ListVen:SetBackGround( Camino + 'images\Presentacion.bmp', BCK_FILL )

Saludos.
Mismo error...
=====>

Bayron Landaverry
(215)2226600 Philadelphia,PA, USA
+(502)46727275 Guatemala
MayaBuilders@gMail.com

FWH12.04||Harbour 3.2.0 (18754)||BCC6.5||UEstudio 10.10||
Windows 7 Ultimate

FiveWin, One line of code and it's done...
User avatar
FranciscoA
Posts: 1964
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: Color en xBrowse vacío

Post by FranciscoA »

En un programa para restaurantes que tengo, lleno el xbrowse con la estructura vacía de una dbf y el background lo creo en el ON INIT del dialogo contenedor. Así me funciona. No sé en tu caso. Está hecho con FWXH1006.

Saludos.
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh1204-MySql-TMySql
User avatar
Bayron
Posts: 815
Joined: Thu Dec 24, 2009 12:46 am
Location: Philadelphia, PA

Re: Color en xBrowse vacío

Post by Bayron »

Así si funcionó...

Muchas gracias Francisco
=====>

Bayron Landaverry
(215)2226600 Philadelphia,PA, USA
+(502)46727275 Guatemala
MayaBuilders@gMail.com

FWH12.04||Harbour 3.2.0 (18754)||BCC6.5||UEstudio 10.10||
Windows 7 Ultimate

FiveWin, One line of code and it's done...
User avatar
Bayron
Posts: 815
Joined: Thu Dec 24, 2009 12:46 am
Location: Philadelphia, PA

Re: Color en xBrowse vacío

Post by Bayron »

Logré lo que quería al incluirlo así en el ON INIT:

Code: Select all

ListVen:SetBackGround( Camino + 'images\Presentacion.bmp', BCK_FILL ),;
ListVen:lTransparent := .F.,;
 
Image

Por supuesto que voy as utilizar otra imagen.....
=====>

Bayron Landaverry
(215)2226600 Philadelphia,PA, USA
+(502)46727275 Guatemala
MayaBuilders@gMail.com

FWH12.04||Harbour 3.2.0 (18754)||BCC6.5||UEstudio 10.10||
Windows 7 Ultimate

FiveWin, One line of code and it's done...
Post Reply