FarPoint.Win.Spread.SheetSkin sk = new FarPoint.Win.Spread.SheetSkin("TestSkin", Color.White, Color.DarkGray, Color.Black,
Color.Blue, FarPoint.Win.Spread.GridLines.Both, Color.Blue, Color.Red, Color.White, Color.Black, Color.LightGray, Color.Gray,
false, false, true, true, true);
sk.Apply(fpSpread1);
SaveFileDialog sfd = new SaveFileDialog();
string s;
sfd.Filter = "skin files (*.skn)|*.skn";
sfd.FilterIndex = 2;
sfd.RestoreDirectory = true;
if (sfd.ShowDialog() == DialogResult.OK)
{
s = sfd.FileName;
FarPoint.Win.Spread.SheetSkin.Save(sk,s);
}
Dim sk As New FarPoint.Win.Spread.SheetSkin("TestSkin", Color.White, Color.DarkGray, Color.Black, Color.Blue, FarPoint.Win.Spread.GridLines.Both,
Color.Blue, Color.Red, Color.White, Color.Black, Color.LightGray, Color.Gray, False, False, True, True, True)
sk.Apply(FpSpread1)
Dim sd As New SaveFileDialog()
Dim s As String
sd.Filter = "skin files (*.skn)|*.skn"
sd.FilterIndex = 2
sd.RestoreDirectory = True
If sd.ShowDialog() = DialogResult.OK Then
s = sd.FileName
If Not (s Is Nothing) Then
FarPoint.Win.Spread.SheetSkin.Save(sk, s)
End If
End If