Para Manuel Mercado - Refrescar datos con TSBrowse
Posted: Tue Mar 18, 2008 1:59 pm
Buen día para todos...
REDEFINE GET oGet VAR cText ID 210 OF oDlg;
PICTURE "@!";
ON CHANGE (Self:Assign(),;
oBrw:SetFocus(),;
oBrw:ExpSeek(SubStr(cText, 1, oGet:nPos-1)),;
oGet:SetFocus())
Si lo coloco de esta forma el Browse se posiciona en el registro pero no se refresca. y si elimino el oGet:SetFocus() funciona bien pero el get queda sin el foco. Alguna recomendación???
Que tal Manuel, entiendo pero en mi caso realizo la búsqueda por medio de un oGet, como tendría que hacer???mmercado wrote:Hola Ernesto y Antonio:Prueba lo siguiente:ermatica wrote:Pero cuando hago una busqueda mediante el indice:
El browse no se refresca o pintan los datos, pero si está colocado el puntero, ya que al hacer un click sobre browse van apareciendo los registros y sus datos a partir del registro buscado.No necesitas más instrucciones, el Browse debe tener el foco y de lo demás se encarga oBrw:ExpSeek()Code: Select all
(oBrw:SetFocus(), oBrw:ExpSeek( str(nro1)+str(nro2) )
Saludos
Manuel Mercado
REDEFINE GET oGet VAR cText ID 210 OF oDlg;
PICTURE "@!";
ON CHANGE (Self:Assign(),;
oBrw:SetFocus(),;
oBrw:ExpSeek(SubStr(cText, 1, oGet:nPos-1)),;
oGet:SetFocus())
Si lo coloco de esta forma el Browse se posiciona en el registro pero no se refresca. y si elimino el oGet:SetFocus() funciona bien pero el get queda sin el foco. Alguna recomendación???