Page 1 of 1
FWH 7.09 TPreview Class
Posted: Mon Sep 17, 2007 4:58 am
by Surasak
1. In FWH 7.09 when I use PRINT command by prev32.dll the preview windows not MAXIMIZED How can I active this with MAXIMIZED like the old version.
2. Please give me the detail and sameple of avantage feature for TPREVIEW class in FWH 7.09
3. Have any problem when use application create by FWH 7.09 in windows VISTA
Posted: Mon Sep 17, 2007 6:50 am
by Antonio Linares
> 1. In FWH 7.09 when I use PRINT command by prev32.dll the preview windows not MAXIMIZED How can I active this with MAXIMIZED like the old version.
Please download FWH 7.09 again
> 2. Please give me the detail and sameple of avantage feature for TPREVIEW class in FWH 7.09
You can have as many previews simultaneously as you may need. i.e.:
Code: Select all
PRINT oPrn1 PREVIEW
PAGE
oPrn1:Say( 2, 2, "Test" )
ENDPAGE
ENDPRINT
MsgInfo( "one" )
PRINT oPrn2 PREVIEW
PAGE
oPrn2:Say( 2, 2, "Test" )
ENDPAGE
ENDPRINT
MsgInfo( "two" )
PRINT oPrn3 PREVIEW
PAGE
oPrn3:Say( 2, 2, "Test" )
ENDPAGE
ENDPRINT
MsgInfo( "three" )
> 3. Have any problem when use application create by FWH 7.09 in windows VISTA
We do all our tests in Vista and in XP. No problems in Vista.
Posted: Mon Sep 17, 2007 2:16 pm
by Surasak
I just download the last update for maximized the preview windows but found error
Application
===========
Path and name: C:\ProjectH\Test\test.exe (32 bits)
Size: 1,080,320 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 09/17/07, 21:11:01
Error description: Error BASE/1004 No exported method: OWNDCLIENT
Args:
[ 1] = U
Stack Calls
===========
Called from: => OWNDCLIENT(0)
Called from: => TMDICHILD:NEW(0)
Called from: => TPREVIEW:BUILDWINDOW(0)
Called from: => TPREVIEW:NEW(0)
Called from: .\source\classes\RPREVIEW.PRG => RPREVIEW(0)
Called from: .\source\classes\PRINTER.PRG => (b)TPRINTER(0)
Called from: => TPRINTER:PREVIEW(0)
Called from: .\source\classes\PRINTER.PRG => PRINTEND(0)
Called from: test.prg => MAIN(9)
System
======
CPU type: Intel(R) Pentium(R) M processor 1.70GHz 1700 Mhz
Hardware memory: 503 megs
Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %
Compiler version: Harbour devel build 1.1-1 Intl.
Windows version: 5.1, Build 2600 Service Pack 2
Windows total applications running: 0
Variables in use
================
Procedure Type Value
==========================
OWNDCLIENT
Local 1: U
TMDICHILD:NEW
Param 1: N 0
Param 2: N 0
Param 3: N 24
Param 4: N 80
Param 5: C "FiveWin Report"
Param 6: N 318701568
Param 7: O Class: TMENU
Param 8: U
Param 9: O Class: TICON
Param 10: L .T.
Param 11: N 0
Param 12: N 12632256
Param 13: U
Param 14: U
Param 15: L .F.
Param 16: L .T.
Param 17: U
Param 18: C "SINGLE"
Param 19: L .T.
Param 20: L .T.
Param 21: L .T.
Param 22: L .T.
Param 23: U
Local 1: O Class: TMDICHILD
Local 2: S
Local 3: O Class: TMDICHILD
TPREVIEW:BUILDWINDOW
Local 1: O Class: TPREVIEW
Local 2: U
Local 3: O Class: TICON
Local 4: C "FiveWin Report"
Local 5: U
Local 6: N 4194304
Local 7: O Class: TPREVIEW
Local 8: S
Local 9: O Class: TPREVIEW
TPREVIEW:NEW
Param 1: O Class: TPRINTER
Local 1: O Class: TPREVIEW
RPREVIEW
Param 1: O Class: TPRINTER
Local 1: U
(b)TPRINTER
Param 1: O Class: TPRINTER
TPRINTER:PREVIEW
PRINTEND
MAIN
Linked RDDs
===========
DBF
DBFFPT
DBFBLOB
DBFNTX
DataBases in use
================
Classes in use:
===============
1 ERROR
2 HBCLASS
3 HBOBJECT
4 TPRINTER
5 TPREVIEW
6 TWINDOW
7 TCONTROL
8 TICON
9 TBRUSH
10 TFONT
11 TMDICHILD
12 TMENU
13 TMENUITEM
14 TREG32
Memory Analysis
===============
82 Static variables
Dynamic memory consume:
Actual Value: 0 bytes
Highest Value: 0 bytes
Posted: Mon Sep 17, 2007 4:13 pm
by Antonio Linares
Is MDI the main window of your application ?
Posted: Mon Sep 17, 2007 4:20 pm
by Surasak
I use your sample below and also testpre2.prg and all of my source with printer command
#include "FiveWin.ch"
function Main()
local oPrn1,oPrn2,oPrn3
PRINT oPrn1 PREVIEW
PAGE
oPrn1:Say( 2, 2, "Test" )
ENDPAGE
ENDPRINT
MsgInfo( "one" )
PRINT oPrn2 PREVIEW
PAGE
oPrn2:Say( 2, 2, "Test" )
ENDPAGE
ENDPRINT
MsgInfo( "two" )
PRINT oPrn3 PREVIEW
PAGE
oPrn3:Say( 2, 2, "Test" )
ENDPAGE
ENDPRINT
MsgInfo( "three" )
return nil
Posted: Mon Sep 17, 2007 4:50 pm
by Antonio Linares
Please download FWH 7.09 again and test it this way. Click several times on the main window:
Code: Select all
#include "FiveWin.ch"
function Main()
DEFINE WINDOW oWnd TITLE "Click Me"
ACTIVATE WINDOW oWnd ;
ON CLICK PrintPV()
return nil
function PrintPV()
local oPrn
PRINT oPrn PREVIEW
PAGE
oPrn:Say( 2, 2, "Test" )
ENDPAGE
ENDPRINT
return nil
Posted: Mon Sep 17, 2007 5:18 pm
by Surasak
Have no error but preview windows still not maximized.
Posted: Mon Sep 17, 2007 5:38 pm
by Antonio Linares
Fixed. Please download FWH 7.09 again
Thanks for your feedback
Posted: Tue Sep 18, 2007 3:02 am
by Surasak
It work fine,
Thank you very much.