タイトル | : Re: DATAGrid |
記事No | : 1461 |
投稿日 | : 2005/03/11(Fri) 10:10 |
投稿者 | : gtk |
順当なやり方と思われる方法はTableStyleおよび、ColumnStyleを設定する方法かと思われます。 ColumnStyleには、DataGridTextBoxColumnを使用し、特定のColumn用のDataGridTextBoxColumnの ReadOnlyプロパティをTrueにすれば編集不可能となります。 表示するデータが入っているDataSetオブジェクトをDataSet1、DataGridをDataGrid1とした場合 のサンプルが下のプログラムとなります。 もし、DataSetオブジェクト以外のデータオブジェクト(ArrayListなど)を使用している場合は、 適宜修正してください。
Dim ts As DataGridTableStyle = New DataGridTableStyle() Dim tbl As DataTable = DataSet1.Tables(0) Dim col As DataColumn
ts.MappingName = dataSet11.Tables[0].TableName For Each col In tbl.Columns dgTextBox As DataGridTextBoxColumn = New DataGridTextBoxColumn() dgTextBox.MappingName = col.ColumnName 'ここで、特定のColumnのときにReadOnlyプロパティをTrueにする If col.ColumnName = "編集不可能にしたいColumn名" Then dgTextBox.ReadOnly = True End If ts.GridColumnStyles.Add(dgTextBox) Next 'TableStylesに上で作成したtsを追加する Me.DataGrid1.TableStyles.Add(ts)
|