DataAllowAddNewプロパティをTrueにした場合、新規行が追加された際に行ヘッダのラベルが更新されない
対象製品
SPREAD for Windows Forms 7.0J
状況
修正済み
詳細
DataAllowAddNewプロパティをTrueにした場合、新規行が追加された際に行ヘッダのラベルが更新されません。
【手順】
1.新規フォームにSPREADを配置します
2.下記サンプルコードをコピーし、アプリケーションを実行します
3.A1セルをダブルクリックしてセルの編集を開始します
4."test"を入力します
--新規行が追加されますが、1行目の行ヘッダのラベルが"*"のままで"1"に更新されません
【サンプルコード】
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' データの作成
Dim dt As New DataTable("TEST")
dt.Columns.Add("ColumnA", GetType([String]))
dt.Columns.Add("ColumnB", GetType(Int32))
dt.Columns.Add("ColumnC", GetType([Boolean]))
dt.AcceptChanges()
' セル型の設定
Dim optionCell As New FarPoint.Win.Spread.CellType.MultiOptionCellType()
optionCell.Items = New String() {"A", "B"}
optionCell.Orientation = FarPoint.Win.RadioOrientation.Horizontal
FpSpread1.ActiveSheet.Columns(1).CellType = optionCell
Dim checkCell As New FarPoint.Win.Spread.CellType.CheckBoxCellType()
FpSpread1.ActiveSheet.Columns(2).CellType = checkCell
' SPREADの設定
FpSpread1.ActiveSheet.DataAutoCellTypes = False
FpSpread1.ActiveSheet.DataAutoSizeColumns = False
FpSpread1.ActiveSheet.DataSource = dt
FpSpread1.ActiveSheet.DataAllowAddNew = True
End Sub
【手順】
1.新規フォームにSPREADを配置します
2.下記サンプルコードをコピーし、アプリケーションを実行します
3.A1セルをダブルクリックしてセルの編集を開始します
4."test"を入力します
--新規行が追加されますが、1行目の行ヘッダのラベルが"*"のままで"1"に更新されません
【サンプルコード】
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' データの作成
Dim dt As New DataTable("TEST")
dt.Columns.Add("ColumnA", GetType([String]))
dt.Columns.Add("ColumnB", GetType(Int32))
dt.Columns.Add("ColumnC", GetType([Boolean]))
dt.AcceptChanges()
' セル型の設定
Dim optionCell As New FarPoint.Win.Spread.CellType.MultiOptionCellType()
optionCell.Items = New String() {"A", "B"}
optionCell.Orientation = FarPoint.Win.RadioOrientation.Horizontal
FpSpread1.ActiveSheet.Columns(1).CellType = optionCell
Dim checkCell As New FarPoint.Win.Spread.CellType.CheckBoxCellType()
FpSpread1.ActiveSheet.Columns(2).CellType = checkCell
' SPREADの設定
FpSpread1.ActiveSheet.DataAutoCellTypes = False
FpSpread1.ActiveSheet.DataAutoSizeColumns = False
FpSpread1.ActiveSheet.DataSource = dt
FpSpread1.ActiveSheet.DataAllowAddNew = True
End Sub
回避方法
Service Pack 5(v7.0.2018.2008)で修正済み。