FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 : NamedStyleCollectionEventHandler デリゲート |
'Declaration Public Delegate Sub NamedStyleCollectionEventHandler( _ ByVal sender As Object, _ ByVal e As NamedStyleCollectionEventArgs _ )
'使用法 Dim instance As New NamedStyleCollectionEventHandler(AddressOf HandlerMethod)
public delegate void NamedStyleCollectionEventHandler( object sender, NamedStyleCollectionEventArgs e )
FarPoint.Win.Spread.NamedStyleCollection nsc; FarPoint.Win.Spread.NamedStyle[] ns = {new FarPoint.Win.Spread.NamedStyle("Style1"), new FarPoint.Win.Spread.NamedStyle("Style2"), new FarPoint.Win.Spread.NamedStyle("Style3")}; nsc = new FarPoint.Win.Spread.NamedStyleCollection(); this.nsc.Changed += new FarPoint.Win.Spread.NamedStyleCollectionEventHandler(this.nscChanged); ns[0].Font = new Font("Comic Sans Serif", 12); ns[0].Name = "StyleHeaders"; ns[0].Parent = "HeaderDefault"; nsc.AddRange(ns); fpSpread1.NamedStyles = nsc; fpSpread1.ActiveSheet.ColumnHeader.DefaultStyle = ns[0]; private void nscChanged(object sender, FarPoint.Win.Spread.NamedStyleCollectionEventArgs e) { MessageBox.Show(e.NewStyle.Name); }
Friend WithEvents nsc As FarPoint.Win.Spread.NamedStyleCollection Dim ns As FarPoint.Win.Spread.NamedStyle() = {New FarPoint.Win.Spread.NamedStyle("Style1"), New FarPoint.Win.Spread.NamedStyle("Style2"), New FarPoint.Win.Spread.NamedStyle("Style3")} nsc = New FarPoint.Win.Spread.NamedStyleCollection Dim eh As FarPoint.Win.Spread.NamedStyleCollectionEventHandler = AddressOf nscChanged AddHandler nsc.Changed, eh ns(0).Font = New Font("Comic Sans Serif", 12) ns(0).Name = "StyleHeaders" ns(0).Parent = "HeaderDefault" nsc.AddRange(ns) FpSpread1.NamedStyles = nsc FpSpread1.ActiveSheet.ColumnHeader.DefaultStyle = ns(0) Private Sub nscChanged(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.NamedStyleCollectionEventArgs) Handles nsc.Changed MessageBox.Show(e.NewStyle.Name) End Sub