行数を0に設定した状態でSaveTextFileメソッドを使用すると例外が発生する
文書番号 : 39258
文書種別 : 不具合
登録日 : 2016/01/25
最終更新日 : 2016/02/12
対象製品
SPREAD for Windows Forms 7.0J
状況
修正済み
詳細
行数を0に設定した状態でSaveTextFileメソッドを使用すると例外が発生します。
【手順】
1.新規フォームにSPREADとButtonを配置します
2.下記サンプルコードをコピーし、アプリケーションを実行します
3.Buttonをクリックします
--例外（System.ArgumentOutOfRangeException）が発生します
【サンプルコード】
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' 行数と列数の設定
FpSpread1.ActiveSheet.RowCount = 0
FpSpread1.ActiveSheet.ColumnCount = 0
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
FpSpread1.ActiveSheet.SaveTextFile("test.txt", FarPoint.Win.Spread.TextFileFlags.None)
End Sub
【手順】
1.新規フォームにSPREADとButtonを配置します
2.下記サンプルコードをコピーし、アプリケーションを実行します
3.Buttonをクリックします
--例外（System.ArgumentOutOfRangeException）が発生します
【サンプルコード】
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' 行数と列数の設定
FpSpread1.ActiveSheet.RowCount = 0
FpSpread1.ActiveSheet.ColumnCount = 0
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
FpSpread1.ActiveSheet.SaveTextFile("test.txt", FarPoint.Win.Spread.TextFileFlags.None)
End Sub
回避方法
Service Pack 6（v7.0.2019.2008）で修正済み。
Service Pack 6（v7.0.2019.2008）より前のバージョンでは次の回避方法が有効です。
------------------------------------------
SaveTextFileRangeメソッドを使用します。
【サンプルコード】
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
' 回避策
FpSpread1.ActiveSheet.SaveTextFileRange(-1, -1, -1, -1, "test.txt", FarPoint.Win.Spread.TextFileFlags.None, FarPoint.Win.Spread.Model.IncludeHeaders.None, System.Environment.NewLine, vbTab, "")
End Sub
Service Pack 6（v7.0.2019.2008）より前のバージョンでは次の回避方法が有効です。
------------------------------------------
SaveTextFileRangeメソッドを使用します。
【サンプルコード】
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
' 回避策
FpSpread1.ActiveSheet.SaveTextFileRange(-1, -1, -1, -1, "test.txt", FarPoint.Win.Spread.TextFileFlags.None, FarPoint.Win.Spread.Model.IncludeHeaders.None, System.Environment.NewLine, vbTab, "")
End Sub