TStringGridで特定の列のカラム数を変えるには (ID:36757)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 >固定行(0行目)のカラムはどっちに合わせたいの？ 奇数行はカラムの数が４つ、偶数行は２つ、って言うふうにして、奇数行はステータス、偶数行は直前のステータスの中の内容を表示するようにしたかったのです。 >DefaultDrawingをFalseにして、OnDrawCellイベントで書き直します。 >OnDrawCellイベントで値をセットするのは無しです。 DefaultDrawingをFalseにしてみても、Form1.Createの中で値をセットしてみたりしたけど、思うようになりませんでした。 procedure TForm1.FormCreate(Sender: TObject); var i: integer; begin for i:=0 to SG1.RowCount-1 do begin if i mod 2=0 then begin SG1.ColWidths[0] := 150; SG1.ColWidths[1] := 150; SG1.ColWidths[2] := 0; SG1.ColWidths[3] := 0; end; end; end;