Delphi Programming / Object Pascal [掲載 2001年02月23日] [更新 2009年11月09日]　タックシール印刷コンポーネント 目次表示切換 前のページ 次のページ タックシール印刷コンポーネント 基本的なプロパティ 動作確認等 -  基本的なプロパティ 凡例 ■ published □ public ▲ ReadOnly 基本的なプロパティ ■ SealType TSealType stSeal　: タックシールタイプ stNoCut : 単票形式で 1 頁に 1 枚のシール stNoCut にするとシール (ラベル) のサイズは用紙のサイズと同じになる ■ DataSet TDatSet データセット 設計時にはリストから選択可能脳 このデータセットのデータ数から PageCount が決まる 指定しない場合または nil 場合，LabelCount で指定した数のラベルを作成する □ Canvas TCanvas 描画用のキャンバス 実体は TMetaFileCanvas ■ plSetPrinter TplSetPrinter 印刷に使用するプリンタとそのプロパティを設定 プリンタとプロパティはコードでも設定可能 ■ FormName TComponentName プレビュー用のフォーム名 詳しくは印刷プレビュー制御コンポーネントの [基本的なプロパティ] 参照 ▲ PageNumber Integer 頁番号 ▲ PageCount Integer 頁数 OriginPageCount に AddPageCount を加えた値 ▲ OriginPageCount Integer 総頁数 レコード数やラベルの数から自動計算した頁数 SealType が stNoCut の場合は LabelCount と同じ値 □ AddPageCount Integer データやラベルを印刷後，追加する頁数 各種の説明等の頁に使用可能 デフォルトは 0 追加の頁にはデータを印刷しない したがって以下のイベントは発生しない OnBeforeDataDraw OnbeforeLabelDraw OnAfterLabelDraw ■ Title String 印刷ドキュメントの名前 プレビューフォームのキャプションにもなる ■ Cursor TCursor 処理中に表示するカーソルの指定 ■ ZoomType TZoomType 用紙の表示タイプで以下の3種類で 起動時の ztOther は ztWholePage に変更される ztWholePage　: 頁全体を表示 ztPageWidth　: 頁幅を基準とした表示 ztOther　　　: その他の表示 □ ImageVisible Boolean False にすると用紙のイメージを表示しない デフォルトは True ■ ImageDrag Boolean False にするとマウスによる移動はできない デフォルトは True ■ ImageShade Boolean False にすると用紙の影部分を表示しない デフォルトは True ページ先頭 前のページ 次のページ