名前 題名 ▼ Syakeさん > > ▼ Mr.XRAYさん > > > ですが,コードが画像なので,やる気起こりません. > > > > そんなマスターのために > > 忘れてました。 > > Gridの作成 > のコードを実行すると上記の内容が描画されます。 > > > procedure TForm1.Button1Click(Sender: TObject); > var > i :Integer; > begin > with StringGrid1 do > begin > RowCount := 20; > for i := 0 to 7 do > begin > AddObject(TStringColumn.Create(StringGrid1)); > Columns[i].Width := 100; > (Columns[i] as TColumn).Header := 'Title' + IntToStr((Columns[i] as TColumn).Index); > (Columns[i] as TStringColumn).ReadOnly := True; > end; > ShowHeader := False; // ヘッダーを表示するか > ShowVertLines := False; // Cellの境界縦線を描画するか(True,False) > //ShowHorzLines Cellの境界横線を描画するか(True,False) > //ShowScrollBars スクロールバーを表示するか > //ShowSelectedCell アクチブなCellを白抜き表示するか(True,False) > end; > end; > > > ・・・多分 GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link