listbox y campo lógico

listbox y campo lógico

Postby Manuel Valdenebro » Thu Nov 17, 2005 8:13 pm

1) En un Listbox con varios campos quiero que se vea un campo lógico, pero sale en blanco.- ¿Hay que emplear algun comando de conversión?

2) En el caso de que quisiera sustituir el valor .t. por un bitmap y el .f. por otro, sería posible sin convertirlo en 1/2?

Gracias y un saludo para todos

Manuel
User avatar
Manuel Valdenebro
 
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España

Postby Willi Quintana » Fri Nov 18, 2005 12:53 am

.......
.......
REDEFINE LISTBOX oLbx :
FIELDS If(Base->campo_log, "1","2") ;
HEADERS "Estado" ;
.......
.......


Salu2
Willi Quintana
User avatar
Willi Quintana
 
Posts: 1003
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Postby Willi Quintana » Fri Nov 18, 2005 12:58 am

UPS,,, aqui va con bmp`s

oBmpOn := LoadBitMap(GetResources(),"Chk1")
oBmpOff := LoadBitMap(GetResources(),"Chk0")
...
...
REDEFINE LISTBOX oLbx;
FIELDS If(Base->campo_logo, oBmpOn,oBmpOff) ;
HEADRES "Estado" ;
...
...

Salu2
Willi Quintana
User avatar
Willi Quintana
 
Posts: 1003
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Postby Manuel Valdenebro » Fri Nov 18, 2005 3:38 am

Gracias Willi por tu respuesta. La primera opción funcionó, pero no la segunda con los bitmaps:

local oBmpSi := LOADBitmap( GetResources(), "\fw23\bitmaps\level1.bmp" )
local oBmpNo := LoadBitmap( GetResources(), "\fw23\bitmaps\level2.bmp" )

.....

@ 1,1 LISTBOX oLbx FIELDS IF (visitas->PENDIENTE, ;
oBmpSi , oBmpNo ),;
...


Un saludo y gracias de nuevo

Manuel
User avatar
Manuel Valdenebro
 
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España

Postby Willi Quintana » Fri Nov 18, 2005 4:45 am

Amigo.
Los BMP`s los debes tener en tu DLL o en tu RC, no en ficheros...

local oBmpOff := LoadBitMap(GetResources(),"Chk0")
local oBmpOn := LoadBitMap(GetResources(),"Chk1")

Chk0 y Chk1 son BMP`s que deben estar dentro del recurso xxxx.rc o xxxx.dll segun uses..

Salu2
Willi :lol:
User avatar
Willi Quintana
 
Posts: 1003
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Postby Willi Quintana » Fri Nov 18, 2005 4:51 am

Para cargar BMP`s desde ficheros seria : (aunque no lo uso)

local oBmpSi := LoadBmp("\fw23\bitmaps\level1.bmp" )
local oBmpNo := LoadBmp("\fw23\bitmaps\level2.bmp" )

.....

@ 1,1 LISTBOX oLbx ;
FIELDS IF (visitas->PENDIENTE, oBmpSi , oBmpNo ),;
...

Salu2
Willi :D
User avatar
Willi Quintana
 
Posts: 1003
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Postby Manuel Valdenebro » Fri Nov 18, 2005 5:16 pm

Willi, ahora, gracias a tí, si funciona, aunque he tenido que sustituir LoadBmp por ReadBitmap y ha quedado así:

local oBmpSi := ReadBitmap( 0, "\fw23\bitmaps\level1.bmp" )
local oBmpNo := ReadBitmap(0 "\fw23\bitmaps\level2.bmp" )

.....

@ 1,1 LISTBOX oLbx ;
FIELDS IF (visitas->PENDIENTE, oBmpSi , oBmpNo ),;
...


Muchas gracias por tu tiempo y ayuda.

Un saludo

Manuel
User avatar
Manuel Valdenebro
 
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España


Return to FiveWin para CA-Clipper

Who is online

Users browsing this forum: Google [Bot] and 1 guest