Doc list1 {
/*ページ番号を表示させるためのオブジェクト*/
    Label Label_page {
        X = 1010;
        Y = 39;
        Width = 61;
        Height = 32;
        Border = $FALSE;
        HorizontalAlign = $CENTER;
        BgColor = $WHITE;
        FontSize = 28;
    }

    /*改ページ時の処理*/
    Function OnPageChange( e ) {
        /*ページ番号を表示*/
        list1.Label_page.value = list1.PageNumber;
    }
}

/* 総ページ数 */
Number p;
Function OnEndBreak ( e ) {
 p = this.PageNumber;
}

Doc list2 {
 Number p = 0;
 
 Spread Spread1 {
  ・・・略・・・
 }

 Label Label1 {
  ・・・略・・・
 }
 
 Function OnPageChange( e ) {
 /* 改ページしたページ番号が最終行のページだった場合、
  最終ページに総ページ数を表示 */
  if(this.PageNumber == p){
   this.Label1.Value = "総ページ数　　　　　　　　"+ str(p);
   this.Label1.Visible = $TRUE;
  }
 }
 Function OnKeyBreak( e ) {
  if( e.CurrentIndex != -1 ) {
   /* キーブレイク時に改ページする */
   list2.ShowPage();
  }
  Spread1.SpreadRow1.truncate();
 }
 Function OnEndBreak ( e ) {
  /* 最終行のデータ設定が終わった後、
   ページ番号を取得する */
  p = this.PageNumber;
 }
}

Form Form1{   
 ・・・略・・・
 Button Button1 {  
　・・・略・・・   
  Function OnTouch( e ) { 
   /* ボタン押下後、プリンターに直接印刷される */
   ^.Get("Doc_List2.crs");
   ^.list2.ShowPage();
   ^.list2.Delete();
  } 
 }