FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Concatenar 2 o mas campos en xbrowse
Posts: 212
Joined: Wed Apr 07, 2021 03:56 PM

Concatenar 2 o mas campos en xbrowse

Posted: Mon Aug 01, 2022 04: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

Posts: 555
Joined: Wed Jul 31, 2013 01:14 PM

Re: Concatenar 2 o mas campos en xbrowse

Posted: 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 2501, Harbour, MVS2022 Community, MySql & MariaDB, Dbf/Cdx VSCode.

Maldonado - Uruguay
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM

Re: Concatenar 2 o mas campos en xbrowse

Posted: Thu Aug 04, 2022 04:10 PM
Code (fw): Select all Collapse
   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


Regards



G. N. Rao.

Hyderabad, India
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM

Re: Concatenar 2 o mas campos en xbrowse

Posted: Thu Aug 04, 2022 04: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:= {|| 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:= 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
Posts: 212
Joined: Wed Apr 07, 2021 03:56 PM

Re: Concatenar 2 o mas campos en xbrowse

Posted: Sat Aug 06, 2022 08:27 PM

Muchas Gracias Ruben Dario y Mr. Rao.

Continue the discussion