Saludos foxeros!
Les comparto está función para los que usan el reporteador nativo de Vfp.
FUNCTION anclar_preview
If WExist("Print Preview")
lcAnclado=1
lcRC=0&&Row/Column
lcDockCount=ADOCKSTATE(lcDock)
IF VARTYPE(lcDock)="C"
FOR lcCountIni=1 TO lcDockCount
IF "print preview"=LOWER(lcDock(lcCountIni,1))
lcAnclado=lcDock(lcCountIni,2)
Exit
EndIf
ENDFOR
ENDIF
IF lcAnclado=0
Move Window "Print Preview" To lcRC,lcRC
IF WEXIST('Report Designer')
Mouse DblClick At lcRC+1,lcRC+3 WINDOW 'Report Designer'
ELSE
Mouse DblClick At lcRC-3,lcRC+3
ENDIF
Mouse At 30,50
ENDIF
RELEASE lcRC,lcDockCount,lcDock,lcCountIni
ENDIF
ENDFUNC
Se invoca en el "on entry" del encabezado del reporte (ver imagen)
Ya sea visualicen en la ventana por default del reporteador:
REPORT FORM el informe PREVIEW
o en un form especifico:
REPORT FORM el informe PREVIEW WINDOW("elform")
ya antes había compartido una similar, pero con esta no requieren pasar parámetros a la función.
Espero le sea de utilidad.
zarlu
Chetumal, Quintana Roo, México