Walter,

My Crystal Report app is darn near ready to roll out & I hit a printer weirdness on one out of four test machines where the report previews & prints in landscape no matter what. The printer is the machines default and is suppose to default to Portrait, yet in my app and my app only it misbehaves :(

I have normal VFP Printer/Page setup tied into the form where my "print" button triggers Crystal, but even if we manually set page layout to Potrait, this darn machine sends it landscape. I was looking for a way in Crystal to force it to be portrait no matter what, I take it this FOCUS.FLL would be only way to force the printer to be Portrait?



>- Use the FOCUS.FLL library to retrieve printer information for setting the destination printer other than the default (Focus.fll is available in the files section or via WWW.fastwrite.com):
>
>

DECLARE _fpreset IN msvcrt20.dll
>
>SET LIBRARY TO FOCUS.FLL
>* This method set the printer where the report is going to be printed on.
>* For more information about the functions used in this method I refer to the Focus.fll
>* Documentation.
>* The _fpreset is used to reset the numeric coprocessor to prevent errors (despite SP3) when using certain HP printerdrivers.
>
>=_fpreset()
>cToken= PRN_GetPrnData(ALLTRIM(cPrintername),5001)
>=_fpreset()
>
>cOldSep= STR_setsep(",")
>nTokens= STR_numtok(cToken)
>
>=_fpreset()
>THIS.Report.Selectprinter(STR_ntoken(6,cToken), STR_ntoken(3,cToken), STR_ntoken(5,cToken))
>=_fpreset()
>IF PRN_GetPrnData(ALLTRIM(cPrintername),7) # nOrientation
>	=_fpreset()
>	oReport.paperorientation=nOrientation
>ENDIF
>=_fpreset()