FiveTech Software tech support forums

Silvio, It uses the same source code. It does not work like that. It is very complicated to change. It's an open case. Best regards, Otto sorry U are usinf printer class instead report class i know how it must be done with the printer class, but in this context i am calling a report from an xbrowse...

Silvio,
It uses the same source code.
It does not work like that. It is very complicated to change.
It's an open case.
Best regards,
Otto

Silvio, please look here: http://forums.fivetechsupport.com/viewtopic.php?f=3&t=40526&p=242094&hilit=orientation&sid=e2593be1086c9bedebb3a003fb838c89#p242094 Best regards, Otto Otto, I use a xbrowse and call report class from it, no prn bSetUp := {|oRep, oBrw, n, ...

Silvio, please look here:
viewtopic.php?f=3&t=40526&p=242094&hilit=orientation&sid=e2593be1086c9bedebb3a003fb838c89#p242094
Best regards,
Otto

If I make local lLandscape :=.t. ... DEFINE DIALOG oDlgStampa @ 14,70 CHECKBOX oGetland VAR lLandscape PROMPT "Stampa in Orizzontale"; SIZE 120,26 of oDlgStampa ACTIVATE DIALOG oDlgStampa CENTER IF oDlgStampa:nresult == IDOK ?llandscape // here is .t. bSetUp := {|oRep, oBrw, n, llandscape|...

PERHAPS YOU NOT READ THE QUESTION.
I make

oBrw:Report( 'Stampa elenco ', , , ;
{ |oRep, oBrw | MySetUp( oRep, oBrw, lLandscape ) } )

I know how make the orientation if i must use the prg you wrote, but I call report() from oBrw directly

Maybe: // \samples\RPTLINHA.PRG#include "FiveWin.ch"#include "Report.ch"STATIC oReport, oDlgFUNCTION Main()   SET CENTURY ON   SET DATE BRITISH   SET TIME FORMAT TO "HH:MM:SS"   SET EPOCH TO Year( Date() ) ...

.

Hello forum I'm trying to use FWHMaria and oMeter unsuccessfully. If someone has created it before and can give me an orientation, I appreciate it. #include "FiveWin.ch"REQUEST DBFCDX   function Export()   local cHost      := "127.0.0.1"   local cUser   ...

the user can select lLandscape for the orientation of report oBrw:Report( 'Test', , , ; { |oRep, oBrw | MySetUp( oRep, oBrw, lLandscape ) } ) MySetUp( oRep, oBrw, lLandscape ) If lLandscape oRep:SetLanscape() Else oRep:SetPortrait() endif return ...

After the PRINT command, please try setting paper size ( A4 or Letter ) and orientation to portrait.

In future programs, we advise you to use physical units like INCHES,CM,MM and let the printer class handle the complex calculations. That will be a lot easier.

Hello Manuel, Thank you for your help. At the moment I call up DAT files saved with RUNDLL32.EXE PRINTUI.DLL, PrintUIEntry to change the orientation. I wanted to call the new function PRNSETORIENTATION (1), but I get errors when compiling and linking. Can you please show me how I can insert ...

Dear Antonio,
maybe I explained myself bad.
It is not working.
Only if I change the orientation manually I can see with getorient() right orientaion. But Setorient() is not working.
What should I do?

Best regards,
Otto

... did what you suggested but Setorient() in my case does not work. If I change directly the Printer setup in the setup window then you get the right orientation from GetOrient() function. Best regards, Otto function SetOrient(nOrient) local cret, oprn //#define DMORIENT_PORTRAIT 1 //#define DMORIENT_LANDSCAPE ...