FiveTech Software tech support forums

... If(nKey==VK_RETURN,(COMPONENTES[oBrw:nArrayAt][ 3]:=xVal,oBrw:Refresh(),oBrw:MakeTotals()),)} oBrw:aCols[ 3]:nFooterType :=AGGR_SUM oBrw:aCols[ 3]:nFootStrAlign :=AL_RIGHT oBrw:Maketotals() Muchas gracias! Roberto

... } oCol:bEditValid := { | oGet, oCol | (CargaPrecio(oGet,oBrw,aData,oFld:nOption)) } oCol:cFooter := 'Total' oCol:nFootStrAlign:= AL_CENTER ElseIf n ==4 oCol:bFooter := { || TRANSFORM( oSumaTotal,"999,999,999") } Endif next oFld:aDialogs[ I ]:bInit := ...

... lInvert ) CLASS TXBrwColumn you see that cFooter := ::footerStr() and ::PaintBmpAndText( { nRow, nCol, nRow + nHeight, nRight }, ; cFooter, ::nFootStrAlign, ::bLeftText, oFont, aColors[ 1 ], ; nBmpNo, ::nFootBmpAlign, .t., ::nAlphaLevelFooter, .f. ) paints your footer. If you trace ::footerStr() ...

Hi,

Why this

Lista2:aCols[7]:nFooterType:= AGGR_SUM
Lista2:aCols[7]:nFootStrAlign := AL_RIGHT
Lista2:aCols[7]:cFooterPicture := "@e 999,999.99"

Show me 52.99 in footer?
How I can display 52,99?

Thanks in advance.

Saludos...

Header
aCols[n]:nHeadStrAlign := AL_CENTER, etc

VALIDA SI SE CENTRAN TODOS LOS head AUTOMATICAMENTE
AEval( oBrw:aCols, {|o| o:nHeadStrAlign := AL_CENTER } )


Footer
aCols[n]:nFootStrAlign := AL_RIGHT, etc

saludos...gracias...

... oBrowse:aCols[2]:lBmpTransparent := .t. oBrowse:aCols[2]:nDataBmpAlign := AL_CENTER oBrowse:aCols[2]:nHeadStrAlign := AL_CENTER oBrowse:aCols[2]:nFootStrAlign := AL_RIGHT oBrowse:aCols[2]:nDataStrAlign := oBrowse:aCols[2]:DefStyle(AL_LEFT,.f.) oBrowse:aCols[2]:cHeader := 'Vencimento' oBrowse:aCols[2]:nBtnWidth ...

... oBrowse:aCols[2]:lBmpTransparent := .t. oBrowse:aCols[2]:nDataBmpAlign := AL_CENTER oBrowse:aCols[2]:nHeadStrAlign := AL_CENTER oBrowse:aCols[2]:nFootStrAlign := AL_RIGHT oBrowse:aCols[2]:nDataStrAlign := oBrowse:aCols[2]:DefStyle(AL_LEFT,.f.) oBrowse:aCols[2]:cHeader := 'Vencimento' oBrowse:aCols[2]:nBtnWidth ...

... := { |v,o| o:Value > 0 } Filter 1 ( text ) :aCols[7]:nFooterType := AGGR_COUNT :aCols[7]:bSumCondition := { |v,o| !EMPTY( o:Value ) } :aCols[7]:nFootStrAlign := AL_RIGHT Filter 2 ( text ) :aCols[8]:nFooterType := AGGR_COUNT :aCols[8]:bSumCondition := { |v,o| !EMPTY( o:Value ) } :aCols[8]:nFootStrAlign ...

... := 150 oCol:nDataStrAlign := AL_RIGHT oCol:cEditPicture := PictEuros() oCol:lTotal := .t. oCol:nTotal :=0 oCol:nFooterType := AGGR_SUM oCol:nFootStrAlign := AL_RIGHT FUNCTION PictEuros() RETURN( "@E 9,999,999,999.99" ) Another test I change on this type oCol := oBrowse:AddCol() ...

... { || oOcorrencia:dia_ocorrencia } oCol:oDataFont := oSistema():oFonte3 oCol:nDataStrAlign := AL_CENTER oCol:cFooter := "Registros:" oCol:nFootStrAlign := AL_CENTER oCol:= oBrowse:AddCol() oCol:nWidth := 80 oCol:cHeader := "Matricula" oCol:oHeaderFont := oSistema():oFonte4 oCol:nHeadStrAlign ...

... translated as assigning x to <data> of every column. Instead of assigning a single value, we can also assign an array of values. oBrw:nFootStrAligns := { AL_CENTER, AL_RIGHT, AL_LEFT } is same as assigning oBrw:oCol( 1 ):nFootStrAlign := AL_CENTER, oBrw:oCol( 2 ):nFootStrAlign := AL_RIGHT, ...

... want an unusual alignment of numbers to left/center or text to right/center. Fine tuning of alignments: nHeadStrAlign nDataStrAlign nDataBmpAlign nFootStrAlign Please also note that the above syntax is fully portable across RDD, TDataBase, ADO. By simply changing the variable following "DATASOURCE" ...

... If required, we can specify justifications for each column. oCol:nHeadStrAlign := AL_LEFT / AL_CENTER / AL_RIGHT oCol:nDataStrAlign := ... oCol:nFootStrAlign Instead of specifying justification for each column separately we can use short cut oBrw:nHeadStrAligns := AL_CENTER // Aligns all headers ...

...y para complementar...saludos...

nFootStrAlign := AL_RIGHT //FOOTER(pie) DE LA COLUMNA...