FarPoint.Win.Spread.SmartPrintRulesCollection rules = new FarPoint.Win.Spread.SmartPrintRulesCollection(); FarPoint.Win.Spread.ScaleRule sr = new FarPoint.Win.Spread.ScaleRule(); FarPoint.Win.Spread.PrintInfo pi = new FarPoint.Win.Spread.PrintInfo(); sr.EndFactor = 0.5; sr.Interval = 0.1; sr.ResetOption = FarPoint.Win.Spread.ResetOption.None; sr.StartFactor = 1.0; rules.Add(sr); pi.SmartPrintRules = rules; pi.UseSmartPrint = true; fpSpread1.ActiveSheet.PrintInfo = pi;
Dim rules As New FarPoint.Win.Spread.SmartPrintRulesCollection Dim sr As New FarPoint.Win.Spread.ScaleRule Dim pi As New FarPoint.Win.Spread.PrintInfo sr.EndFactor = 0.5 sr.Interval = 0.1 sr.ResetOption = FarPoint.Win.Spread.ResetOption.None sr.StartFactor = 1.0 rules.Add(sr) pi.SmartPrintRules = rules pi.UseSmartPrint = True FpSpread1.ActiveSheet.PrintInfo = pi