FarPoint.Win.Spread.StyleInfo si = new FarPoint.Win.Spread.StyleInfo();
DialogResult dlg;
si.Font = new Font("Comic Sans MS", 12);
fpSpread1.ActiveSheet.DefaultStyle = si;
dlg = MessageBox.Show("Reset the font?");
if (dlg == DialogResult.OK)
{
si.ResetFont();
fpSpread1.ActiveSheet.DefaultStyle = si;
}
Dim si As New FarPoint.Win.Spread.StyleInfo
Dim dlg As DialogResult
si.Font = New Font("Comic Sans MS", 12)
fpSpread1.ActiveSheet.DefaultStyle = si
dlg = MessageBox.Show("Reset the font?")
If dlg = DialogResult.OK Then
si.ResetFont()
fpSpread1.ActiveSheet.DefaultStyle = si
End If