FiveTech Software tech support forums

Code: Select all | Expand

	@ 40,10 XBROWSE oBrw SIZE -10,-50 PIXEL ;
	  RECORDSET oRs ;
	  COLUMNS "cdcli", "rascl", "totale",  "pezzi" ;
	  HEADERS "CLIENTE", "RAGIONE SOCIALE", "TOTALE EURO", "TOTALE PEZZI" ;
	  PICTURE NIL,NIL, "@ZE 99,999,999.99", "@ZE 99999,999.999" ;
	  FOOTERS ;
	  OF oDlg2	  
	
	oBrw:nMarqueeStyle       := MARQSTYLE_HIGHLROW
	oBrw:nColDividerStyle    := LINESTYLE_BLACK
	oBrw:nRowDividerStyle    := LINESTYLE_BLACK
	oBrw:lColDividerComplete := .T. 
	oBrw:lRecordSelector     := .t.
	oBrw:lHScroll            := .T.
	oBrw:lVScroll            := .T.
	oBrw:lExcelCellWise 	 := .t.
	
	oBrw:bClrSelFocus = { || { 16777215, 15512898 } }   
	oBrw:bClrSel = { || { 16777215, 15512898 } }
	oBrw:bClrStd := {|| {CLR_BLACK, iif( oBrw:Keyno() % 2 = 0, CLR_SFBRWP, CLR_SFBRWD  ) } }
	
    oBrw:CreateFromCode()
	
    WITH OBJECT oBrw
		:aCols[03]:nFooterType := AGGR_SUM
		:aCols[04]:nFooterType := AGGR_SUM	
		:MakeTotals()
	END		

Code: Select all | Expand

'
   :aCols[03]:cEditPicture:="99,999,999.99"