FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour FWH 7.09 TPreview Class
Posts: 36
Joined: Fri Jul 20, 2007 01:30 PM

FWH 7.09 TPreview Class

Posted: Mon Sep 17, 2007 04:58 AM
  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
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

FWH 7.09 TPreview Class

Posted: Mon Sep 17, 2007 06:50 AM
> 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.:
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.
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 36
Joined: Fri Jul 20, 2007 01:30 PM

FWH 7.09 TPreview Class

Posted: Mon Sep 17, 2007 02:16 PM

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


Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

FWH 7.09 TPreview Class

Posted: Mon Sep 17, 2007 04:13 PM

Is MDI the main window of your application ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 36
Joined: Fri Jul 20, 2007 01:30 PM

FWH 7.09 TPreview Class

Posted: Mon Sep 17, 2007 04:20 PM

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

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

FWH 7.09 TPreview Class

Posted: Mon Sep 17, 2007 04:50 PM
Please download FWH 7.09 again and test it this way. Click several times on the main window:
#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
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 36
Joined: Fri Jul 20, 2007 01:30 PM

FWH 7.09 TPreview Class

Posted: Mon Sep 17, 2007 05:18 PM

Have no error but preview windows still not maximized.

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

FWH 7.09 TPreview Class

Posted: Mon Sep 17, 2007 05:38 PM

Fixed. Please download FWH 7.09 again

Thanks for your feedback

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 36
Joined: Fri Jul 20, 2007 01:30 PM

FWH 7.09 TPreview Class

Posted: Tue Sep 18, 2007 03:02 AM

It work fine,

Thank you very much.

Continue the discussion