Delphi Programming / Object Pascal
サイトのトップページへ リンクのページへ ロゴマーク
[掲載 2000年12月12日] [更新 2003年09月01日] 印刷プレビュー制御コンポーネント
印刷プレビュー制御コンポーネント
四角形
動作確認等 -







塗潰しの四角形 ( 枠線描画 )


Rectangle(X1, X2, Y1, Y2)

指定の長方形の領域を,現在の TBrush の色と Brush スタイルで塗潰します.また,現在のペンの設定値で枠線を描画します.TplPrev の追加メソッドでは,引数の座標値が X 座標値,Y 座標値の順になっています.

引数 説明
X1 Integer 矩形の左端の X 座標値
X2 Integer 矩形の右端の X 座標値
Y1 Integer 矩形の上端の Y 座標値
Y2 Integer 矩形の下端の Y 座標値




塗潰しの四角形 ( 枠線なし )


FillRect (X1, X2, Y1, Y2) 

指定の長方形を,現在の TBrush の色と Brush スタイルで塗潰します.枠線は引きません.矩形の右端と下端は塗潰ししません.TplPrev の追加メソッドでは,引数の座標値が X 座標値,Y 座標値の順になっています.

引数 説明
X1 Integer 矩形の左端の X 座標値
X2 Integer 矩形の右端の X 座標値
Y1 Integer 矩形の上端の Y 座標値
Y2 Integer 矩形の下端の Y 座標値




四角形の描画 ( 塗潰しなし )


RectLine(X1, X2, Y1, Y2)

現在のペンの設定を用いて矩形の枠線を描画します.内部の塗潰しはしません.TplPrev の追加メソッドでは,引数の座標値が X 座標値,Y 座標値の順になっています.

引数 説明
X1 Integer 矩形の左端の X 座標値
X2 Integer 矩形の右端の X 座標値
Y1 Integer 矩形の上端の Y 座標値
Y2 Integer 矩形の下端の Y 座標値




0.1mmの四角形 ( 塗潰しなし )


FrameRect(X1, X2, Y1, Y2)

現在のペンの色を用いて,太さ 0.1 mm の長方形を描画します.内部の塗潰しはしません.TplPrev の追加メソッドでは,引数の座標値が X 座標値,Y 座標値の順になっています.

引数 説明
X1 Integer 矩形の左端の X 座標値
X2 Integer 矩形の右端の X 座標値
Y1 Integer 矩形の上端の Y 座標値
Y2 Integer 矩形の下端の Y 座標値




角の丸い長方形


TplPrev の TCanvasは,Delphi の TCanvas を継承しています.したがって角の丸い四角形は,TCanvas のメソッドである RoundRect を使用して描画可能です.もちろん,これ以外の TCanvas のメソッドやプロパティも使用できます.
座標値が X, Y の順となっているメソッドを別に用意したのは,帳票類を作成する際,既存の帳票の寸法を計る時に,定規を当てて,まず横方向の値を,次に縦方向という手順で行いためです.