FpSpread1.ActiveSheetView.ColumnHeader.RowCount = 4;
FpSpread1.ActiveSheetView.ColumnHeader.SetClipValue(0, 0, 2, 4, "one\ttwo\tthree\tfour\r\nfive\tsix\tseven\teight");
string s;
s = FpSpread1.ActiveSheetView.ColumnHeader.GetClipValue(0, 0, 2, 4);
ListBox1.Items.Add(s);
FpSpread1.ActiveSheetView.ColumnHeader.RowCount = 4
FpSpread1.ActiveSheetView.ColumnHeader.SetClipValue(0, 0, 2, 4, "one" + Chr(9) + "two" + Chr(9) + "three" + Chr(9) + "four"
+ vbCrLf + "five" + Chr(9) + "six" + Chr(9) + "seven" + Chr(9) + "eight")
Dim s As String
s = FpSpread1.ActiveSheetView.ColumnHeader.GetClipValue(0, 0, 2, 4)
ListBox1.Items.Add(s)