FiveTech Software tech support forums

... He tenido que eliminar para que funcione lo siguiente, pero pierdo la cabecera: oLbx:lCellstyle:=.t. ///oLbx:nFreeze:=1 oLbx:nlineStyle:=3 ///Olbx:aHJustify:={2,2,2,2,2,2} ///olbx:bTextColor:={ |nRow,nCol| if(nCol==1,CLR_BLACK,)} ///olbx:bBkColor:={ |nRow,nCol| if(nCol==1,wClrBack,)} ///olbx:nHeaderHeight:=33 ...

... en tu condicion en una funcion puedes hacer esto oBrw:aHeaders := {} oBrw:aHeaders := aHeadersNew oBrw:Refresh() 2. para centrar encabezados oBrw:aHJustify := {2,2,2} donde 0->izquierda 1->derecha 2->centrado saludos paco Buenos dias Francisco,disculpa que apenas responda a tu respuesta,me ...

... en tu condicion en una funcion puedes hacer esto oBrw:aHeaders := {} oBrw:aHeaders := aHeadersNew oBrw:Refresh() 2. para centrar encabezados oBrw:aHJustify := {2,2,2} donde 0->izquierda 1->derecha 2->centrado saludos paco

... ; OF oWndFact01 ; SIZES 40,380,75,75,75 UPDATE oPreccos:SetBrowse( oLbx ) oLbx:nLineHeight := 16 oLbx:nHeaderHeight := 16 //oLbx:nFreeze := 4 oLbx:aHJustify:={2,2,2,2,2} oLbx:aJustify:={.t.,.f.,.t.,.t.,.t.} oLbx:bRClicked := { | nRow, nCol | menutomenuop( nRow, nCol ) } /////////////////////////////////// ...

... ; OF oWndFact01 ; SIZES 40,380,75,75,75 UPDATE oPreccos:SetBrowse( oLbx ) oLbx:nLineHeight := 16 oLbx:nHeaderHeight := 16 //oLbx:nFreeze := 4 oLbx:aHJustify:={2,2,2,2,2} oLbx:aJustify:={.t.,.f.,.t.,.t.,.t.} oLbx:lDrawFooters :=.T. //oLbx:aActions := Array( 6 ) //oLbx:aActions[1] := { || OrdenArEq( ...

... a la funcion ) ; SIZES 40,380,75,75,75,50 UPDATE oPreccos:SetBrowse( oLbx ) oLbx:nLineHeight := 16 oLbx:nHeaderHeight := 16 oLbx:nFreeze := 4 oLbx:aHJustify:={2,2,2,2,2} oLbx:aJustify:={.t.,.f.,.t.,.t.,.t.} oLbx:lDrawFooters :=.T. oLbx:aActions := Array( 6 ) oLbx:aActions[1] := { || OrdenArEq( ...

... , oWndFact01 ) ; SIZES 40,380,75,75,75,50 UPDATE oPreccos:SetBrowse( oLbx ) oLbx:nLineHeight := 16 oLbx:nHeaderHeight := 16 oLbx:nFreeze := 4 oLbx:aHJustify:={2,2,2,2,2} oLbx:aJustify:={.t.,.f.,.t.,.t.,.t.} oLbx:lDrawFooters :=.T. oLbx:aActions := Array( 6 ) oLbx:aActions[1] := { || OrdenArEq( ...

... 17 tcobRW1:nLineHeight := if(pVideo1>800,18,17) tcobRW1:nFreeze := 3 if cDigProdvd=="C" tcobRW1:aFJustify := {2,1,1} tcobRW1:aHJustify := {2,0,1} tcobRW1:aJustify := {2,0,1} tcobRW1:aHeaders := {"Cód.","Descrição","Qtde"} tcobRW1:nClrPane := {|| IF(tcobRW1:nat % 2 == 0,CLR_LGRAY,CLR_LGREEN)} ...

... AUDITOR->HORA, AUDITOR->ACCION} } oLbx:aHeaders := { "Usuario","Privilegio","Fecha","Hora","Acción Realizada" } oLbx:aHJustify := {2,2,2,2,2} oLbx:nClrPane := {|| IIF( (oLbx:cAlias)->(OrdKeyNo())%2=0, nRGB(255,255,255), ColorDia(AUDITOR->FECHA) ) } oLbx:lAdjLastCol ...

... .AND. !lPago) ID 108 OF oDlg oBTmp:cAlias := oDTmp oBTmp:SetFont(oFnt[2]) oBTmp:bLogicLen := { || (oDTmp)->(OrdKeyCount()) } oBTmp:aHJustify := { 2,2,2,2,2,2 } oBTmp:aJustify := { 2,0,2,1,1,1 } oBTmp:lAdjLastCol := .F. oBTmp:lDrawFocusRect:= .T. oBTmp:nHeaderHeight := 32

... oLbx:aJustify := {HA_LEFT,HA_RIGHT,HA_LEFT,HA_RIGHT,HA_RIGHT,HA_RIGHT,HA_RIGHT,HA_RIGHT,HA_RIGHT} oLbx:aHJustify :={HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER,HA_CENTER} oLbx:aColSizes := {170,80,85,80,85,110,92,85,130 ...

... 4013 PICTURE "9999999999999" redefine listBox tcobRW1 Fields OF oDlg1 id 4012 COLORS tcobRW1:lAdjBrowse := .f. tcobRW1:lAdjLastCol := .t. tcobRW1:aHJustify := {2,0,1} tcobRW1:aJustify := {2,0,1} tcobRW1:nHeaderStyle := 3 tcobRW1:nLineStyle := 2 tcobRW1:nclrbackfocus:= {|| CLR_HBLUE} tcobRW1:nClrNFBack ...

... lCellStyle:= .t., mostraba // una celda seleccionada si se presionaban las teclas de movimiento. Ha sido // solucionado. // 6) Nueva varaible ::aHJustify. Funciona igual que ::aJustify, es decir, un // array cuyos elementos asumen valores, que idicaran a la clase la // justificacion de la columna ...

... 95 ; ID 102 OF oDlt UPDATE ; ALIAS (nDSerD)->( ALIAS() ) dbServi:nLineStyle := 5 dbServi:nHeaderHeight := 30 dbServi:nLineHeight := 20 dbServi:aHJustify := { 0, 0, 0 } dbServi:lAdjLastCol := .F. dbServi:lAdjBrowse := .T. dbServi:lCellStyle := .T. nkey es la llave compuesta, alguna otra manera ...

Amigos estou fazendo assim: BMP :=loadbitmap(getresources(),"CHEOFF") redefine listBox oBfsu Fields Of oDla id 100 obfsu:aJustify := {0,2,0} obfsu:aHJustify := {0,2,0} obfsu:nHeaderHeight:= 30 obfsu:nLineHeight := 30 obfsu:bLine := {||{ BMP+CRLF+"MESA1",; <- NAO FUNCIONA BMP+CRLF+"MESA2",; BMP+CRLF+"MESA3"}} ...