Chicchiさん
回答有り難うございます。
無事に思い通りの処理を実現することができました。

＞m-yamagutiさん、こんばんは。
＞
＞画面に表示されている間は全ページの最下行に表示させ、印刷時は最終ページにのみ表示させる、
＞ということでしょうか?
＞だとすれば、今までどおりフッタ行に計算フィールドを置き、印刷ボタンをクリックした時に
＞次のようなスクリプトを記述してください。
＞
＞dw_x.SetRedraw( FALSE )
＞dw_x.Modify( \"xxx.Visible = \'0~tIF(page()=pageCount(),1,0)\'\" )
＞dw_x.Print( )
＞dw_x.Modify( \"xxx.Visible = 1\" )
＞dw_x.SetRedraw( TRUE )
＞
＞要点は、Modify 関数で Visible 属性を「最終ページのみ表示。それ以外は非表示」に設定し、
＞Print 関数で印刷、その後無条件に表示するよう戻します。
＞先頭と最後の SetRedraw 関数は、印刷している間、画面上から計算フィールドが消滅しないよう
＞にするために入れています。
＞ただし、グループを組んであるデータウィンドウオブジェクトなどでは、page() と pageCount()
＞の比較が正しく行なわれるかわかりません。この辺のことは、過去ログを見てください。
＞
＞＞Chicchiさん、こんばんは。
＞＞
＞＞回答有り難うございます。
＞＞確かに、教えて頂いた通り、サマリー行にすると
＞＞印字されなくなりました。
＞＞しかし、サマリー行にすると一覧画面において最後まで
＞＞スクロールしないと確認ができなくなってしまいますので、
＞＞やはりフッタ行に値を設定しておいて、印刷は
＞＞最後のページのみに印字することはできないでしょうか？
＞
＞