データ構造 |
レポートデザイナーで作成されるレポートファイルのレコード体設計情報です。
読み込み順序は下記の宣言降順となります。
|
var
ItemRange :Integer;
type
TPrintData = record
Name :String;
KeyName :String;
mmLeft :Extended;
mmTop :Extended;
mmWidth :Extended;
mmHeight :Extended;
FontName :String;
FontStyle :TFontStyles;
FontSize :Integer;
FontColor :TColor;
Alignment :Integer;
Shape :TShapeType;
PenStyle :TPenStyle;
PenWidth :Integer;
PenColor :TColor;
BrushStyle :TBrushStyle;
BrushColor :TColor;
CornerRound :Integer;
Orientation :Integer;
CellWidth :Extended;
CellHeight :Extended;
SendWidth :Extended;
SendHeight :Extended;
BlockCol :Integer;
BlockRow :Integer;
Lock :Boolean;
end;
//最後にPaleteModifiedがFalseの場合は背景用メタファイルを格納しています。
var
PaleteModified :Boolean;
BGMetaFile :TMetaFile;//背景情報を読み出します。
|
オリジナルレコード体TPrintData |
レポート情報を参照するために便利な配列があったらなぁということで、定義した配列です。
ちょっと癖があるので、そこだけ説明します。
配列の0行目はレポートデザイナーの用紙サイズとか、共通のトリック(ループ回数)の情報を入れてあります。
配列の1行目〜は、アイテム(各個の印字情報)について入れてあります。
|
TPrintDataクラス定義 |
名称 |
型 |
意味 |
0行目 |
Name |
String |
アイテムの日本語名称、管理用名称※検索に使ってもいいけど |
不使用 |
KeyName |
String |
半角英数字の名称、検索照合目的の名称 |
不使用 |
mmLeft |
Extended |
用紙の左からの距離(mm単位) |
不使用 |
mmTop |
Extended |
用紙の上からの距離(mm単位) |
不使用 |
mmWidth |
Extended |
アイテムの全幅(mm単位) |
用紙サイズの幅 |
mmHeight |
Extended |
アイテムの全高(mm単位) |
用紙サイズの高さ |
FontName |
String |
フォント名 |
全アイテム共通用 |
FontStyle |
TFontStyle |
文字の装飾オプション |
全アイテム共通用 |
FontSize |
Integer |
文字サイズ(ポイント単位) |
全アイテム共通用 |
FontColor |
TColor |
文字の色 |
全アイテム共通用 |
Alignment |
Integer |
文字の左寄せ・中寄せ・右寄せ選択 |
全アイテム共通用 |
Shape |
TShapeType |
アイテムの印字領域の塗り形状 |
全アイテム共通用 |
PenStyle |
TPenStyle |
罫線のパターン |
全アイテム共通用 |
PenWidth |
Integer |
罫線の太さ |
全アイテム共通用 |
PenColor |
TColor |
罫線の色 |
全アイテム共通用 |
BrushStyle |
TBrushStyle |
Shapeの塗りのパターン |
全アイテム共通用 |
BrushColor |
TColor |
Shapeの塗りの色 |
全アイテム共通用 |
CornerRound |
Integer |
Shapeが角丸だったら丸める量(ピクセル単位) |
全アイテム共通用 |
Orientation |
Integer |
ループの送り方向を指定します。 |
全アイテム共通用 |
CellWidth |
Extended |
印刷アイテムの印字領域幅(mm単位) |
全アイテム共通用 |
CellHeight |
Extended |
印刷アイテムの印字領域高(mm単位) |
全アイテム共通用 |
SendWidth |
Extended |
ループで回す際のセルの送り幅(mm単位) |
全アイテム共通用 |
SendHeight |
Extended |
ループで回す際のセルの送り高さ(mm単位) |
全アイテム共通用 |
BlockCol |
Integer |
ループで回す際のアイテムの横方向の回数 |
全アイテム共通用 |
BlockRow |
Integer |
ループで回す際のアイテムの縦方向の回数 |
全アイテム共通用 |
Lock |
Boolean
|
編集中にアイテムがうっかり移動しないようにロックするフラグです。 |
不使用 |
|