Sr. Manuel.
Como eu poderia fazer um incremental search com o TSBROWSE ?
*
**browse
*
redefine browse obrw2 id 4005 of odlg 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 := 4
bColor := {|| If(oBrw2:nLogicPos() % 2 = 0,CLR_LGRAY,CLR_LGREEN) }
obRW2:bKeyDown := {|nKey| if(nKey==VK_INSERT,fwhtradicmanut(.t.,oBrw2),;
if(nKey==VK_RETURN,fwhtradicmanut(.f.,oBrw2),;
if(nKey==VK_DELETE,fwhtraddel(oBrw2),)))}
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 srdic->traduzir title "Palavra";
size 165;
3dlook TRUE;
colors CLR_BLACK, bColor;
align DT_LEFT,DT_LEFT,DT_RIGHT
add column to browse obrw2 data srdic->tradp title "PortuguĂŞs";
size 170;
3dlook TRUE;
colors CLR_BLACK, bColor;
align DT_LEFT,DT_LEFT
add column to browse obrw2 data srdic->trade title "Espanhol";
size 170;
3dlook TRUE;
colors CLR_BLACK, bColor;
align DT_LEFT,DT_LEFT
add column to browse obrw2 data srdic->tradi title "InglĂŞs";
size 200;
3dlook TRUE;
colors CLR_BLACK, bColor;
align DT_LEFT,DT_LEFT
