Na versão anterior da TS, ao editar um campo e dar um ENTER a mesma posicionava na proxima linha, com a versão nova (TS9.0)esta posicionando na proxima porem fica visivel apenas as duas primeiras linhas do browse, as outras linhas abaixo desaparecem, e se mover a seta para baixo, elas apararecem.
VS 8
VS9
PRG:
redefine browse obrw2 id 4002 of odlg celled 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 := 2
bColor := {|| If(oBrw2:nLogicPos() % 2 = 0,CLR_LGRAY,CLR_LGREEN) }
obRW2:SetColor( { 1, 3, 4, 5, 6, 9, 10, 13, 15, 11, 12, 14 }, ;
{ CLR_BLACK,;
CLR_BLACK,;
nRGB(211, 227, 247),;
CLR_WHITE,;
CLR_HBLUE,;
CLR_BLACK,;
nRGB(211, 227, 247),;
CLR_BLACK,;
CLR_BLACK,;
CLR_BLACK,;
bColor,;
CLR_CREME} )
obrw2:refresh()
add column to browse obrw2 data array element 2 title "Finalizadoras";
size 430 ;
colors CLR_BLACK, bColor;
3dlook TRUE;
align DT_LEFT,DT_LEFT,DT_RIGHT FOOTER "Total R$:"
bTotal:={|| trans(fwhtotalizafin(aResumo),"@E 999,999.99")}
add column to browse obrw2 data array element 3 title "Total" editable;
size 120 ;
VALID {|uVar| obrw2:refresh(),.t. } ;
colors CLR_BLACK,bColor move DT_MOVE_DOWN;
3dlook TRUE;
align DT_RIGHT,DT_RIGHT FOOTER bTotal picture "@e 999,999.99"
Obrigado
