FiveTech Software tech support forums

... oBrw:cHeaders := { "FUNCTION", "RESULT", "TYPE" }, ;
oBrw:aCols[ 1 ]:bStrData := { |x,o| 'uCharToVal( "' + o:Value + '" ) =' }, ;
oBrw:aCols[ 1 ]:nDataStrAlign := AL_RIGHT, ;
oBrw:aCols[ 3 ]:nDataStrAlign := AL_CENTER )

return nil

https://imagizer.imageshack.com/v2/xq70/922/PYqtHR.png

... 2 ] ), NIL ) }

WITH OBJECT:ak_start
:nEditType := EDIT_DATE
:bClrSel := { || { CLR_BLACK, CLR_HGRAY }}
ENDWITH

WITH OBJECT :Prijs1
:nDataStrAlign := AL_CENTER
:SetProgBar( 100,500, { || { MY_GREEN, CLR_WHITE } } ) // Saples in FW
:cEditPicture := "999.99 %"
//:bClrSel := :bClrSelFocus ...

... XBROWSER "STATES.DBF" SETUP oBrw:nRowHeight := 100

Result:
https://imagizer.imageshack.com/v2/xq70/923/BmKmJ2.png

In your browse, the text is top aligned. That means you specified top-alignment somewhere in your program. Please recheck your program if you set any values to col:nDataStrAlign.

... TRANSFORM( field->imp_eff, "@ZE 999,999,999.99" ) }
oCol:cHeader = "TOTALE CLIENTE"
oCol:nEditType = EDIT_NONE
oCol:nWidth = 100
oCol:nDataStrAlign := AL_RIGHT

How can I add another column that read / edit the value of field->seleziona Logical type?
I want to see the classic two bitmap ...

... oBrw:aCols[2]:cHeader := "Código"
oBrw:aCols[2]:bStrData := { || cTab_Art:cod_art }
oBrw:aCols[2]:nHeadStrAlign := AL_CENTER
oBrw:aCols[2]:nDataStrAlign := AL_LEFT //LEFT
oBrw:aCols[2]:nWidth := 100
oBrw:aCols[2]:cSortOrder := "cod_art"
oBrw:aCols[2]:bLClickHeader := {|| oBrw:GoTop() }
oBrw ...

... 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 ...

... 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

... CLR_BLACK, { { 1, RGB( 252, 235, 220 ), RGB( 255, 0,0 ) } }}}
endif
NEXT
:CreateFromCode()
:aCols[ 1 ]:nWidth := 100
:aCols[ 1 ]:nDataStrAlign := AL_LEFT
:SetStyle( 2018 )
end with


static function ChangeColor( oBrw, n )
return {|| { CLR_BLACK, ColorCell( oBrw:aRow[ n ]:VALUE ...

... CLR_BLACK, { { 1, RGB( 252, 235, 220 ), RGB( 255, 0,0 ) } }}}
endif
NEXT
:CreateFromCode()
:aCols[ 1 ]:nWidth := 100
:aCols[ 1 ]:nDataStrAlign := AL_LEFT
:SetStyle( 2018 )
end with


static function ChangeColor( oBrw, n )
return {|| { CLR_BLACK, ColorCell( oBrw:aRow[ n ]:VALUE ...

Marc Venken wrote:No code to test, but have you tried the combination of 2 parameters ?.

this is xbrowse and mayby also used for folders. Give it a try

:nDataStrAlign := AL_CENTER + AL_BOTTOM

ON METHOD PaintTB() CLASS TFolderEx THERE ARE ONLY DT_SINGLELINE, DT_VCENTER, DT_CENTER

No code to test, but have you tried the combination of 2 parameters ?.

this is xbrowse and mayby also used for folders. Give it a try

:nDataStrAlign := AL_CENTER + AL_BOTTOM

... HeaderFont := oFonte_padrao
:nHeadStrAlign := AL_CENTER
:nWidth := 80
:bStrData := { || AllTrim( DToC( oMensagem:getValueByPos( 2 ) ) ) }
:nDataStrAlign := AL_TOP
:nCellheight := 20
DataFont := oFonte_botao
:SetColsAsRows( { 1, 2 } )
END

WITH OBJECT :aCols[ 2 ]
:cHeader := ""
HeaderFont ...

... Nueva DATA en TXBrwColumn: bDataStrAlign.
Si se asigna, el bloque de código se evalúa con oCol como parámetro y el resultado anula
nDataStrAlign.

- SqlRdd: Compatibilidad mejorada para barras de desplazamiento vertical.

* Corrección: uCharToVal( cDate, "D" ) no siempre devuelve el ...

... p232806

- New data of TXBrwColumn: bDataStrAlign.
If assigned, the codeblock is evaluated with oCol as parameter and the result
overrides nDataStrAlign

- SqlRdd: Enhanced compatibility for Vertical Scrollbars.

* Fix: uCharToVal( cDate, "D" ) is not always returning the correct result.
static ...

I allready tested with

WITH OBJECT oBrowse:aCols[ 11]
:nFooterType := AGGR_SUM
:cEditPicture := "€ 999,999.99"
:nDataStrAlign := AL_RIGHT
END

the xbrowse is

@ 120, 02 XBROWSE oBrowse OF oDlg ;
COLUMNS 1,2,3,4,5,6,7,8,9,10,11;
HEADERS "Ico","Tipo","Servizio","Q.tà","Costo","Tot p q.tà ...