PowerTools SPREAD for Windows Forms 10.0J
Save(SheetSkin,Stream) メソッド


スキンの名前
スキンの保存先のストリーム
スキンをストリームに保存します。
構文
'Declaration
 
Public Overloads Shared Sub Save( _
   ByVal skin As SheetSkin, _
   ByVal stream As Stream _
) 
'使用法
 
Dim skin As SheetSkin
Dim stream As Stream
 
SheetSkin.Save(skin, stream)
public static void Save( 
   SheetSkin skin,
   Stream stream
)

パラメータ

skin
スキンの名前
stream
スキンの保存先のストリーム
次のサンプルコードは、スキンを保存します。
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();
System.IO.Stream s;
sfd.Filter = "skin files (*.skn)|*.skn";
sfd.FilterIndex = 2;
sfd.RestoreDirectory = true;
if (sfd.ShowDialog() == DialogResult.OK) 
{
    s = sfd.OpenFile();
    FarPoint.Win.Spread.SheetSkin.Save(sk,s);
    s.Close();
}
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 System.IO.Stream
sd.Filter = "skin files (*.skn)|*.skn"
sd.FilterIndex = 2
sd.RestoreDirectory = True
If sd.ShowDialog() = DialogResult.OK Then
   s = sd.OpenFile
   If Not (s Is Nothing) Then
      sk.Save(sk, s)
      s.Close()
   End If
End If
参照

SheetSkin クラス
SheetSkin メンバ
オーバーロード一覧

開発者ガイド

スキンの保存

 

 


© 2004-2017, GrapeCity inc. All rights reserved.