[WR3.0]VISUAL C++を使ったサンプルについて

[佐久間]

ＷＲ3.0 で、ＶＩＳＵＡＬ Ｃ＋＋でプログラムを作成したいのですがそのような形のサンプルプログラムは無いでしょうか？
１つ前の質問の「マルチページ印刷機能の使用方法について」の例を元にＣ＋＋を利用して、オブジェクト指向でプログラムを作成したのですがうまく実行できません。もし、あれば教えてください。

[Hirayama]

いつもお世話になっております。

うまく実行できないとのことですが、具体的にどのあたりがうまくいかないのか
教えていただけないでしょうか？

また、オブジェクト指向でプログラムを作成されているとのことですが、WingReportは
OCXを使用されているのでしょうか？

[佐久間]

お世話になっております。
返事が遅れてしまって申し訳ありません。

ACTIVE X の挿入は行ないました。
(SoftWing WingReport 3.0 Control ｵﾌﾞｼﾞｪｸﾄ）です。

でプログラムは以下のような形で作りました。

///////////////////////////////////////////////////////////s

sif( ! WRInit( &dwWRError ) ){
ssWRExit( &dwWRError );
ssreturn FALSE;
s}

sCWRReportsobjReport1;
sCWRReportsobjReport2;
sCWRPreviewsobjPreview;s
//sCWR3AXCLsobj3AXCL;

sCStringstext;

sUpdateData(FALSE);

sobjReport1 =sm_wr3axcl.LoadReport(“送付状.w30”);
s
sstext =sm_wr3axcl.GetLastErrorText();
s//sobjReport2 =sm_wr3axcl.LoadReport(“送付状.w30”);

sobjPreview =sm_wr3axcl.CreatePreview();
sstext =sm_wr3axcl.GetLastErrorText();

sobjPreview.ReportPrint( objReport1 );
sstext =sm_wr3axcl.GetLastErrorText();
//sobjPreview.ReportPrint( objReport2 );

///////////////////////////////////////////////////////////s

そうしますと
内容の無い小さな警告？（赤丸に×）のウインドウが出てきてOKをクリックすると、
その後ウインドウが出るのですが何もありません。

もしかするとプログラムの作り方自体がおかしいのかとも思うのですがどのように作って行けばいいのか解りません。

Visual C++ ではどのように作成していけばいいか御教授願えないでしょうか。

よろしくお願いします。

[佐久間]

すいません内容がおかしくなってました。
もう内容をもう一度送ります。

///////////////////////////////////////////////////////////s

if(!WRInit(&dwWRError)){
WRExit( &dwWRError );
return FALSE;
}

CWRReport objReport1;
CWRReport objReport2;
CWRPreview objPreview;s

CString text;

UpdateData(FALSE);

objReport1 = m_wr3axcl.LoadReport(“送付状.w30”);

text = m_wr3axcl.GetLastErrorText();

objPreview = m_wr3axcl.CreatePreview();
text = m_wr3axcl.GetLastErrorText();

objPreview.ReportPrint( objReport1 );
text = m_wr3axcl.GetLastErrorText();

///////////////////////////////////////////////////////////s

[Hirayama]

いつもお世話になっております。

コードを下記の様に変更してみましたのでお試し頂けますでしょうか？

//OCXを使用する場合には下記のコードは必要有りません。
/*
if(!WRInit(&dwWRError)){
WRExit( &dwWRError );
return FALSE;
}
*/

CWRReport objReport1;
CWRReport objReport2;
CWRPreview objPreview;
CString text;

//WingReportでエラーが生じると例外が発生します。
try
{

UpdateData(FALSE);

objReport1 = m_wr3axcl.LoadReport(“送付状.W30”);

objPreview = m_wr3axcl.CreatePreview();

//プレビューをオープンします。
objPreview.OpenPreview( 1 ) ;

objPreview.ReportPrint( objReport1 );

//オブジェクトを削除します。
objReport1.Delete() ;

}

catch( CException* Excption )
{

text = m_wr3axcl.GetLastErrorText();

MessageBox( text ) ;

objReport1.Delete() ;

objPreview.Delete() ;

}

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

[投稿者]

投稿