Concatenar 2 o mas campos en xbrowse

Concatenar 2 o mas campos en xbrowse

Postby José Camilo » Mon Aug 01, 2022 4:17 am

Hola. Estoy tratando de mostrar 2 o mas campos de una dbf en una misma columna de xbrowse.
para que aparezca asi : "99/15-baldes" Estos son 3 campos distintos. 99 15 Baldes.
Gracias
José Camilo
 
Posts: 180
Joined: Wed Apr 07, 2021 3:56 pm

Re: Concatenar 2 o mas campos en xbrowse

Postby D.Fernandez » Tue Aug 02, 2022 11:57 pm

Hola, yo lo hago así....

Es un ejemplo funcionando, con mis datos.

oCol:=xbr:AddCol()
oCol:cHeader := "Nombre y Apellido"
oCol:cFooter := "Nombre y Apellido"
oCol:bStrData:= {|| rtrim(lTrim(oClientes:NOM)) + "/"+rtrim(lTrim( oClientes:APE)) +"-"+ oClientes:recipiente }
campo donde esta el 99 + "/" agregas la barra + campo donde esta el 16 + "-" + campo baldes

oCol:nDataStrAlign:= AL_LEFT
oCol:oDataFont:= oFont3
oCol:oHeaderFont := oFont4
oCol:oFooterFont := oFont4
oCol:nWidth:= 240


Saludos

Ruben Dario Fernandez
Dario Fernandez
FWH 22.12, Harbour, MVS2022 Community, BCC, MySql & MariaDB, Dbf/Cdx VSCode.
Maldonado - Uruguay
D.Fernandez
 
Posts: 455
Joined: Wed Jul 31, 2013 1:14 pm
Location: Maldonado - Uruguay

Re: Concatenar 2 o mas campos en xbrowse

Postby nageswaragunupudi » Thu Aug 04, 2022 4:10 pm

Code: Select all  Expand view
  USE CUSTOMER
   DEFINE DIALOG oDlg SIZE 400,400 PIXEL TRUEPIXEL
   @ 20,20 XBROWSE oBrw SIZE -20,-20 PIXEL OF oDlg ;
      DATASOURCE "CUSTOMER" ;
      COLUMNS "First", "LTRIM(STR(AGE)) + ' / ' + DTOC(HIREDATE)" ;
      HEADERS  nil, "AGE/DATE" ;
      LINES NOBORDER

   oBrw:CreateFromCode()

   ACTIVATE DIALOG oDlg
 


Image
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10247
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Concatenar 2 o mas campos en xbrowse

Postby nageswaragunupudi » Thu Aug 04, 2022 4:12 pm

D.Fernandez wrote:Hola, yo lo hago así....

Es un ejemplo funcionando, con mis datos.

oCol:=xbr:AddCol()
oCol:cHeader := "Nombre y Apellido"
oCol:cFooter := "Nombre y Apellido"
oCol:bStrData:= {|| rtrim(lTrim(oClientes:NOM)) + "/"+rtrim(lTrim( oClientes:APE)) +"-"+ oClientes:recipiente }
campo donde esta el 99 + "/" agregas la barra + campo donde esta el 16 + "-" + campo baldes

oCol:nDataStrAlign:= AL_LEFT
oCol:oDataFont:= oFont3
oCol:oHeaderFont := oFont4
oCol:oFooterFont := oFont4
oCol:nWidth:= 240


Saludos

Ruben Dario Fernandez


Unless you are using a very very old version of FWH, please do not use the approach "oBrw:AddCol().oBrw:bStrDate".
Please use COLUMNS clause in the XBROWSE command to get the best of XBrowse.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10247
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Concatenar 2 o mas campos en xbrowse

Postby José Camilo » Sat Aug 06, 2022 8:27 pm

Muchas Gracias Ruben Dario y Mr. Rao.
José Camilo
 
Posts: 180
Joined: Wed Apr 07, 2021 3:56 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 58 guests