FarPoint.Win.Spread アセンブリ > FarPoint.Win.Spread 名前空間 > SheetView クラス > SaveTextFileRange メソッド : SaveTextFileRange(Int32,Int32,Int32,Int32,Stream,TextFileFlags,IncludeHeaders,String,String,String) メソッド |
'宣言
Public Overloads Function SaveTextFileRange( _ ByVal row As Integer, _ ByVal column As Integer, _ ByVal rowCount As Integer, _ ByVal columnCount As Integer, _ ByVal stream As Stream, _ ByVal textFileFlags As TextFileFlags, _ ByVal includeHeaders As IncludeHeaders, _ ByVal rowDelimiter As String, _ ByVal columnDelimiter As String, _ ByVal cellDelimiter As String _ ) As Boolean
public bool SaveTextFileRange( int row, int column, int rowCount, int columnCount, Stream stream, TextFileFlags textFileFlags, IncludeHeaders includeHeaders, string rowDelimiter, string columnDelimiter, string cellDelimiter )
SaveFileDialog sfd = new SaveFileDialog(); System.IO.Stream s; sfd.Filter = "text files (*.txt)|*.txt"; sfd.FilterIndex = 2; sfd.RestoreDirectory = true; if (sfd.ShowDialog() == DialogResult.OK) { s = sfd.OpenFile(); fpSpread1.ActiveSheet.SaveTextFileRange(0,0, 5, 5, s, FarPoint.Win.Spread.TextFileFlags.Unformatted, FarPoint.Win.Spread.Model.IncludeHeaders.BothCustomOnly, "\r",",", ""); s.Close(); }
Dim sd As New SaveFileDialog() Dim s As System.IO.Stream sd.Filter = "text files (*.txt)|*.txt" sd.FilterIndex = 2 sd.RestoreDirectory = True If sd.ShowDialog() = DialogResult.OK Then s = sd.OpenFile FpSpread1.ActiveSheet.SaveTextFileRange(0, 0, 5, 5, s, FarPoint.Win.Spread.TextFileFlags.Unformatted, FarPoint.Win.Spread.Model.IncludeHeaders.BothCustomOnly, Chr(13), ",", "") s.Close() End If