Hola Segrio gracias por responder ya hice un selec de esta forma
selec temp1
report form mireporte preview for consultas.cliente=thisform.grid1.column2.text1.value
direcionando el codigo pero nada solo marca el primier registro
x1=alltrim(Thisform.grid1.column2.text1.value)
Select *from consultas where alltrim(consultas.cliente)=x1 into cursor cTemp
select cTemp
report form mireporte prev
Note:
Debes ser mas explicito en la forma que deseas imprimir el cliente, es decir, seria mejor al momento de dar click al grid seleccionando al cliente y de esa forma enviar el reporte