FiveTech Software tech support forums

... MOVE DT_MOVE_RIGHT oBROWSE:aColumns[i]:cFooting:=COLU_FOT(i) oBROWSE:aColumns[i]:nFAlign :=JUST_FIL[i] next oBROWSE:lInitGoTop :=.f. oBROWSE:lMChange :=.t. oBROWSE:bChange :={||oBROWSE:DrawFooters()} oBROWSE:nRowPos :=RENG_INICIO oBROWSE:nLineStyle :=ESTILO_LINEA oBROWSE:SetAlign(0,2,DT_CENTER) ...

... MOVE DT_MOVE_RIGHT oBROWSE:aColumns[i]:cFooting:=COLU_FOT(i) oBROWSE:aColumns[i]:nFAlign :=JUST_FIL[i] next oBROWSE:lInitGoTop :=.f. oBROWSE:lMChange :=.t. oBROWSE:bChange :={||oBROWSE:DrawFooters()} oBROWSE:nRowPos :=RENG_INICIO oBROWSE:nLineStyle :=ESTILO_LINEA oBROWSE:SetAlign(0,2,DT_CENTER) ...

... color CLR_BLACK,CLR_LGREEN font ofonte_res obRW2:setArray(aResumo) obRW2:nHeightCell := 28 obRW2:nHeightHead := 25 obRW2:nHeightFoot := 28 obRW2:lMChange := .f. obRW2:lDrawHeaders:= .t. obRW2:lNoChangeOrd:= .t. obRW2:lFooting := .t. obRW2:lNoMoveCols := .t. obRW2:lNoHScroll := .t. obRW2:nFreeze ...

... color CLR_BLACK,CLR_LGREEN font ofonte_res alias "srdic" obRW2:nHeightCell := 28 obRW2:nHeightHead := 27 obRW2:nHeightSuper:= 27 obRW2:lMChange := .t. obRW2:lDrawHeaders:= .t. obRW2:lNoChangeOrd:= .t. obRW2:lFooting := .f. obRW2:lNoMoveCols := .f. obRW2:lNoHScroll := .t. obRW2:nFreeze ...

... ou não ser um combobox, ex: redefine browse oBrw2 id 4003 of oDlg font ofonte_por CELLED obRW2:setArray(aDadoscli) obRW2:nHeightCell := 33 obRW2:lMChange := .T. obRW2:lDrawHeaders:= .F. obRW2:lNoMoveCols := .T. obRW2:lNoHScroll := .T. oBrw2:nFreeze := 1 oBrw2:lLockFreeze := .T. obRW2:refresh() ...

... DATA l3DLook AS LOGICAL INIT .F. READONLY // internally control state of ::Look3D() in "Phantom" column DATA lHitTop, lHitBottom, lCaptured, lMChange // browsing flags DATA lAppendMode AS LOGICAL INIT .F. READONLY // automatic append flag DATA lAutoCtx AS LOGICAL // compatibility with TCBrowse ...

... Is there a way to lock a column from being resized in the wbrowse class? Just set ::lMChange to FALSE (this is also valid for TCBrowse) Not for the whole browse just for a single column? I think that can only be achieved with TCBrowse ...

... ,oBtn1:move(arect[3] -aRect[1]- 61,430 ,,,.t.); //4002 ,oBrw:refresh() } //103 endif * oBrw:lMChange := .t. // disable mousemove oBrw:nFreeze := 2 // freeze first column * oBrw:nAdjColumn := 1 // expand this column to flush ...

... a barra vertical de ralagem: obRW2: lNoVScroll := .T. //Tem que estar aqui obRW2:setArray(subgrupos) obRW2:Refresh() obRW2:nHeightCell := 55 obRW2:lMChange := .F. obRW2:lDrawHeaders:= .F. obRW2:lFooting := .F. obRW2:lNoMoveCols := .T. obRW2:bchange := {|| carregaprodutos(If( Len(subgrupos)<1 ...

... aqui obRW2:setArray(acaixas) obRW2:Refresh() obRW2:nHeightCell := 24 obRW2:nHeightHead := 24 obRW2:nHeightFoot := 24 obRW2:nHeightSuper:= 29 obRW2:lMChange := .F. obRW2:lDrawHeaders:= .T. obRW2:lFooting := .T. obRW2:lNoMoveCols := .T. **obRW2:bchange := {|| } **obRW2:bKeyDown := {|nKey| } **oBrw2:bOnEscape ...

... ID 4002 OF oDlg FONT fonte_TCS COLOR CLRT,CLRT1 obRW3:setArray(asubgrupos) obRW3:Refresh() obRW3:nHeightCell := 60 obRW3:lInitGoTop := .F. obRW3:lMChange := .F. obRW3:lDrawHeaders:= .F. obRW3:lFooting := .F. obRW3:lNoMoveCols := .T. obRW3:bchange := {|| carregaprodutos(If( Len(asubgrupos)<1 ...

... BROWSE oBrw2 ID 4016 OF oDlg1 FONT fonte_TCS COLOR CLR_LGRAY , CLR_LGREEN obRW2:setArray(subgrupos) obRW2:Refresh() obRW2:nHeightCell := 55 obRW2:lMChange := .F. obRW2:lDrawHeaders:= .F. obRW2:lFooting := .F. obRW2:lNoMoveCols := .t. obRW2:bchange := {|| carregaprodutos(If( Len(subgrupos)<1 ...

... OF oWndChild REDEFINE BROWSE oBrw2 ID 4016 OF oDlg1 FONT fonte_TCS obRW2:setArray(subgrupos) obRW2:Refresh() obRW2:nHeightCell := 55 obRW2:lMChange := .F. obRW2:lDrawHeaders:= .F. obRW2:lFooting := .F. obRW2:lNoMoveCols := .t. OBRW2:LNORESETPOS := .T. obRW2:bKeyDown := {|nKey| if(nKey==VK_ESCAPE,oWndChild:end(),.T.)} ...

... BROWSE oBrw CELLED ALIAS "SAIPRO" ID 46 OF oDlg obRW:nHeightHead := 28 obRW:nHeightCell := 23 obRW:nHeightFoot := 26 obRW:nColPos := 1 obRW:lMChange := .f. obRW:lDrawHeaders:= .t. obRW:lFooting := .t. obRW:lNoMoveCols := .t. obRW:bKeyDown := {|nKey| TSTeclasEdit803(nKey,obRW,oDlg,odgets,.f.,nAliqForaUF, ...

... columnas freeze // fjhg 28-may-07 DATA nMaxFilter // Maximum number of records to count // on indexed filters DATA lHitTop, lHitBottom, lCaptured, lMChange DATA lAutoEdit, lAutoSkip DATA lCellStyle AS LOGICAL INIT .f. DATA aHeaders, aColSizes DATA nClrBackHead, nClrForeHead DATA nClrBackFocus, ...