FoxPro/Visual FoxPro - REPORTE

teng un formulario de busqueda y necesito agragar un boton de imprimir que inprima unicamente el registro que acabo de presentar en pantalla.

como lo hago, recuerden ke soy novato en esto .......

Me supongo que el registro se encuentra en el formulario.

En el evwnto Click() de un botón:
Select 1
imprime=messagebox("Desea Imprimir este Registro?",4+48,"Imprimir")
If imprime=6
Select 1
Set Filter to Mi_tabla.Clave =Thisform.text1.value &&Escribe por el campo buscado
Wait Window "Mostrando Vista Previa de la Impresión" Timeout .8
Report Form Mi_reporte.frx Prev

Set Filter to
Thisform.Refresh

else
Thisform.text1.Setfocus()
Endif


Suerte►

Gracias ....... funciono perfectamente, justamente lo ke yo necesitaba