FiveTech Software tech support forums
www.FiveTechSoft.com
Xbrowse
5 posts • Page 1 of 1
Xbrowse
by CarlosFossati » Wed Feb 16, 2022 6:21 pm
Quisiera parametrizar a traves de parametros los campos de un dbf. Gracias
- CarlosFossati
- Posts: 34
- Joined: Fri May 22, 2015 4:05 pm
Re: Xbrowse
by Antonio Linares » Wed Feb 16, 2022 7:16 pm
Carlos,
Puedes explicar lo que necesitas ?
Un ejemplo aunque sea de "pseudo" código ?
Puedes explicar lo que necesitas ?
Un ejemplo aunque sea de "pseudo" código ?
-
Antonio Linares - Site Admin
- Posts: 42118
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
Re: Xbrowse
by cnavarro » Wed Feb 16, 2022 8:38 pm
CarlosFossati wrote:Quisiera parametrizar a traves de parametros los campos de un dbf. Gracias
En el ejemplo que pone el compañero Ariel en respuesta a tu anterior post, aparece como aCols, es el array que pasarías en la clausula COLUMNS del xbrowse ( pueden ser nombres de campos, el numero de campo, e incluso alguna expresion como llamadas en codeblock a una function )
viewtopic.php?f=6&t=41397&sid=a84e82740ebbd5ddfd3282a55294f2d1#p248015
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
-
cnavarro - Posts: 6549
- Joined: Wed Feb 15, 2012 8:25 pm
- Location: España
Re: Xbrowse
by CarlosFossati » Sat Feb 19, 2022 1:07 am
aCol := {"StrZero(Productos->Codigo,8,0)","Productos->Descrip","StrZero(Productos->Rubro,4,0) + "-" +Traetabla("Rubros","Indi1","Rubros",Productos->Rubro)[2]","Productos->Precio1","Productos->Precio2"}
aHead:= {"Código","Descripción","Rubro","Precio 1","Precio 2"}
aSize:= { 90 * Factory,240 * Factory,240 * Factory,110 * Factory,110 * Factory }
aJust:= { AL_CENTER , AL_LEFT , AL_LEFT, AL_RIGHT , AL_RIGHT }
@ 0, 0 XBROWSE oBr COLUMNS aCol HEADERS aHead COLSIZES aSize JUSTRIFY aJust OF oDlg
aHead:= {"Código","Descripción","Rubro","Precio 1","Precio 2"}
aSize:= { 90 * Factory,240 * Factory,240 * Factory,110 * Factory,110 * Factory }
aJust:= { AL_CENTER , AL_LEFT , AL_LEFT, AL_RIGHT , AL_RIGHT }
@ 0, 0 XBROWSE oBr COLUMNS aCol HEADERS aHead COLSIZES aSize JUSTRIFY aJust OF oDlg
- CarlosFossati
- Posts: 34
- Joined: Fri May 22, 2015 4:05 pm
Re: Xbrowse
by cnavarro » Sat Feb 19, 2022 3:04 am
Evidentemente, sustituye
por
que fue un error tipográfico del compañero
Mirate el fichero en la carpeta include XBROWSE.CH
JUSTRIFY
por
JUSTIFY
que fue un error tipográfico del compañero
Mirate el fichero en la carpeta include XBROWSE.CH
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
-
cnavarro - Posts: 6549
- Joined: Wed Feb 15, 2012 8:25 pm
- Location: España
5 posts • Page 1 of 1
Return to FiveWin para Harbour/xHarbour
Who is online
Users browsing this forum: No registered users and 41 guests