Bom dia,
Fiz a seguinte pesquisa so que o cursor na cai na pesquisa desejada
Function BTN_Pesquisar_Prestador()
Local cBuscar
cBuscar := upper(allTrim(inputbox('Digite a sua pesquisa:','Pesquisar')))
// Posiciona Indices
OrdSetFocus('Prest2')
Prestador->(DbGoTop())
If .not. empty(cBuscar)
If Prestador->(DbSeek(cBuscar))
Frm_Prestador.Grid_Prestador.Setfocus
Frm_Prestador.Grid_Prestador.value := Prestador->(recno())
Else
MsgExclamation('Prestador não encontrado !!!','Mensagem')
Endif
Endif
Return(nil)
observei que quando coloco por exemplo : AUREA ele posiciona certo no registro mais o cursor cai muito a cima do nome 'AUREA'
agradeço desde ja a ajuda
Grato Marco Maciel