4D Doc Center : PV SET COLUMNS WIDTH

4D View v14

PV SET COLUMNS WIDTH


PV SET COLUMNS WIDTH ( area ; first ; last ; width )

引数	型	説明
area	倍長整数	4D View エリア
first	倍長整数	最初の列番号
last	倍長整数	最後の列番号
width	整数	列幅（ピクセル単位）

説明

PV SET COLUMNS WIDTHコマンドを使用して、area内のfirst とlast の間にある列の幅（ピクセル単位）をwidthに変更することができます。

Note : 引数first とlast に0（ゼロ）を渡すと、指定したwidth が area の全列に対して適用され、この値がそのエリアの列の新しいデフォルト幅になります。ユーザが列の右側のセパレータをダブルクリックした際には、このデフォルト幅が適用されます。

例題

この例題では、行と列のサイズを変更する方法を説明します:

 C_LONGINT($Column;$Row) `主要ループのインデックス

 C_LONGINT($Width;$Height) `列と行を拡張するループのインデックス

 C_LONGINT($StartWidth) `X 番目の列の元の幅

 C_LONGINT($RequestWidth) `X 番目の列に求められる幅

 

  `初期化を行う

 $StartWidth:=5 `元の幅を設定する

 $RequestWidth:=$StartWidth+5 `最初の列を10 ポイントの幅に設定

 

 For($Column;1;5) `最初の5列を処理する

    $Row:=$Column  `最初の5行だけを処理する

    For($Width;$StartWidth;$RequestWidth;2) `“$Column”...番目の列

       $Height:=$Width-5 `高さを更新

       PV SET ROWS HEIGHT(area;$Row;$Row;PV Get row height(area;$Row)+$Height) `1 行

       PV SET COLUMNS WIDTH(area;$Column;$Column;PV Get column width(area;$Row)+$Width) `1 列

       PV REDRAW(area) `リフレッシュ

    End for

    $StartWidth:=$RequestWidth  `最初から開始しない

    $RequestWidth:=$RequestWidth+5 `次の列を拡張する

 End for