FarPoint.Web.Spread Assembly > FarPoint.Web.Spread Namespace > SmartPrintRulesCollection Class > CopyTo Method : CopyTo(ArrayList,Int32) Method |
'Usage Dim instance As SmartPrintRulesCollection Dim array As ArrayList Dim index As Integer instance.CopyTo(array, index)
FarPoint.Web.Spread.SmartPrintRulesCollection rules = new FarPoint.Web.Spread.SmartPrintRulesCollection(); FarPoint.Web.Spread.SmartPrintRule spr; spr = new FarPoint.Web.Spread.BestFitColumnRule(FarPoint.Web.Spread.ResetOption.None); rules.Add(new FarPoint.Web.Spread.LandscapeRule(FarPoint.Web.Spread.ResetOption.None)); rules.Add(new FarPoint.Web.Spread.ScaleRule(FarPoint.Web.Spread.ResetOption.None, 1, 2, 0.5f)); rules.Add(spr); ArrayList myarray = new ArrayList(rules); rules.CopyTo(myarray, 0); string msg = ("The name of the first rule in the collection is " + Convert.ToString(myarray.Item[0])); Response.Write(("<script language=\'javascript\'>alert(\'" + (msg + "\')</script>")));
Dim rules As New FarPoint.Web.Spread.SmartPrintRulesCollection Dim spr As FarPoint.Web.Spread.SmartPrintRule spr = New FarPoint.Web.Spread.BestFitColumnRule(FarPoint.Web.Spread.ResetOption.None) rules.Add(New FarPoint.Web.Spread.LandscapeRule(FarPoint.Web.Spread.ResetOption.None)) rules.Add(New FarPoint.Web.Spread.ScaleRule(FarPoint.Web.Spread.ResetOption.None, 1, 2, 0.5)) rules.Add(spr) Dim myarray As New ArrayList(rules) rules.CopyTo(myarray, 0) Dim msg As String = "The name of the first rule in the collection is " & Convert.ToString(myarray.Item(0)) Response.Write("<script language='javascript'>alert('" & msg & "')</script>")
Target Platforms: Windows 7, Windows 8, Windows Vista, Windows Server 2000, Windows 2000 Professional, Windows XP Professional, Windows NT 4.0 Workstation, SP6, Windows NT 4.0 Server, SP6