Delphi Programming / Object Pascal
サイトのトップページへ リンクのページへ ロゴマーク
[掲載 2000年12月12日] [更新 2009年03月11日]　印刷プレビュー制御コンポーネント
   
印刷プレビュー制御コンポーネント
プレビューフォーム関係プロパティ
動作確認等 図は Windows 7 U64(SP1) + Delphi XE(UP1) Pro で作成




凡例 ■ published
□ public
▲ ReadOnly



プレビューフォーム関係のプロパティ


プレビューフォームを自動生成で表示する場合，プレビューフォームそのものを表示してサイズや位置を設定できません．そこで，プレビューフォーム関係のプロパティを実装しています．これらは，他のプロパティと区別しやすいように，ほとんどのプロパティの頭に Form をつけています．継承したプレビューフォームを使用する場合も，これらの値で設定してください．プレビューする前でしたら，実行時にも設定可能です．
設定が通常の TForm と違う場合があります．

下表以外のプロパティへのアクセスは，TplPrev.Form プロパティを使用します．


■ Title String キャプションで，印刷ドキュメント名
■ BtnOptions TplBtnOptions 各ボタンの表示フラグ
先読み方式の場合，[プリンタ・用紙] ボタンの設定は無効
■ FormTop Integer TForm の Top プロパティと同じ
■ FormLeft Integer TForm の Left プロパティと同じ
■ FormWidth Integer TForm の Width プロパティと同じ
■ FormHeight Integer TForm の Height プロパティと同じ
■ FormIcon TIcon TForm の Icon プロパティと同じ
■ FormBorderIcons TBorderIcons TForm の BorderIcon プロパティと同じ
■ FormBorderStyle TFormBorderStyle TForm の BorderStyle プロパティと同じ
■ FormPositon TPosition TForm の Position プロパティと同じ
フォームの位置とサイズを各プロパティの値にするには poDesigned にする
■ FormWindowState TFormWindowState TForm の WindowState プロパティと同じだが，プロパティの先頭文字列が fw となっている

fwFullScreen (フルスクリーン)
fwWorkArea (ワーエリア全体)
を追加している
■ FormIconBar Boolean フォーム上端のツールバーの表示フラグ
■ FormStatusBar Boolean フォーム下端のステータスバーの表示フラグ
■ FormCanMove Boolean フォームの移動を強制的に不可能にする
■ FormCanResize Boolean フォームのリサイズを強制的に不可能にする
■ StatusbarText String Form の Statsubar.Panels[1] に表示する文字列 Statusbar. Panels[0].Text を変更するプロパティ等は現在のところない
□ FormParent TWinControl TForm の Parent と同じ




フルスクリーンとワークエリア表示


プロパティ FormWindowsState に追加となっている fwFullScreen, fwWorkArea の動作は下図のようになっています．
マルチモニタ構成で，プレビューフォームの DefaultMonitor を dmDesktop にした場合，fwWorkArea は，DefaultMonitor = dmActiveForm の時と同じ動作となります．fwFullScreen では，仮想画面全体に表示されます．


図1
フルスクリーン表示
  • タスクバーも見えなくなる
図2
ワークエリア表示
  • タスクバー領域には表示しない
  • フォームのサイズは最大であるがフォームの枠は表示する