[WR3.0] プレビュー機能

[T.I]

WingReport ver3.0 のプレビューオブジェクトは、プレビュー表示を指定(OpenPreview)してから、プレビューするレポートオブジェクトを指定(ReportPrint)する･･･という使用の仕方をすると思います。
※サンプルソースで、そのような処理をしています。

そうなるとプレビュー画面が表示中にデータがはき出されて、右下に表示されるページ数の情報がカウントアップされる状態になります。
よって、プレビュー画面の終了ボタンを押下した時は、データの表示が終了しているかもしれないし、終了していないかもしれないので、プレビューオブジェクトの解放処理はPreviewWndCloseイベントで行えません。
基本的にオブジェクトは使用前に作成して、使用後に解放したいと考えています。
表示するデータをプレビューオブジェクトにはきだし終わってから、プレビュー画面を表示することは可能ですか？
単純にプレビューオブジェクトで、プレビューするレポートオブジェクトを指定(ReportPrint)してから、プレビュー表示を指定(OpenPreview)する･･･という使用の方法で可能でしょうか？

[石黒＠ソフトウィング]

お世話になります。

>レポートオブジェクトを指定(ReportPrint)してから、プレ
>ビュー表示を指定(OpenPreview)する
レポートオブジェクトの出力(ReportPrint)は、プレビュー表示(OpenPreview)前に指定することは出来ません。

>表示するデータをプレビューオブジェクトにはきだし終わっ
>てから、プレビュー画面を表示する
プレビューオブジェクトは通常(OpenPreview)を指定するとプレビューウィンドウが表示されてしまいます。そのため、上記ようなプレビューウィンドウの表示は行えません。
方法としては、プレビューウィンドウを指定したウィンドウ内に表示するように処理を行えば可能です。

以上です。宜しくお願い致します。

[T.I]

OpenPreview時に指定する『オーバーラップウィンドウで表示』と『指定したウィンドウ内に表示』の意味を教えてください。

[石黒＠ソフトウィング]

お世話になります。

オーバーラップウィンドウは、新規にウィンドウが作成されプレビューが表示されます。
指定したウィンドウ内に表示は、プレビューオブジェクトのParentWindowプロパティで設定した親ウィンドウに表示します。

以上です。宜しくお願い致します。

[T.I]

指定したウィンドウ内にプレビュー表示する場合、
プレビューオブジェクトのParentWindowプロパティに親ウィンドウを設定しますが、親ウィンドウの設定の仕方がわかりません。

ロジックベースで教えてください。
下記のように指定したら、『親ウィンドウハンドルが無効』のエラーになりました。

Dim waxWRPreview as WRPreview

If waxWRPreview Is Nothing Then
Set waxWRPreview = WR3AXCL1.CreatePreview
End If

With waxWRPreview
.ParentWindow = .hWnd
.OpenPreview wrPREVIEWMODE_CHILD
End With

[石黒＠ソフトウィング]

お世話になります。

ParentWindowは、表示する親ウィンドウを設定しますので、例えばForm1にプレビューを表示したい場合は、

waxWRPreview.ParentWindow = Form1.hWnd

と、親ウィンドウを設定します。

以上、宜しくお願いいたします。

[T.I]

理解できました！
ありがとうございます。

[T.I]

すみません･･･もう一つ質問があります。
『指定したウィンドウ内に表示』タイプは、通常タイプ（『オーバーラップウィンドウで表示』）と比較して、どういうメリットがありますか？また、デメリットはありますか？

[石黒＠ソフトウィング]

お世話になります。

メリットは、指定したウィンドウにプレビューを表示できることです。
デメリットは、親ウィンドウをユーザー側で用意する必要があることです。

以上、宜しくお願いいたします。

[投稿者]

投稿