MESCIUS SPREAD for Windows Forms 15.0J
Contains(SmartPrintRule) メソッド
使用例 

チェックするルール(SheetSkinオブジェクト)
コレクションに指定したルール(SmartPrintRuleオブジェクト)が含まれているかどうかを判定します。
構文
'宣言
 
Public Overloads Function Contains( _
   ByVal value As SmartPrintRule _
) As Boolean
public bool Contains( 
   SmartPrintRule value
)

パラメータ

value
チェックするルール(SheetSkinオブジェクト)

戻り値の型

Boolean:コレクション内でオブジェクトが見つかった場合は True、それ以外の場合は False
使用例
FarPoint.Win.Spread.SmartPrintRulesCollection rules = new FarPoint.Win.Spread.SmartPrintRulesCollection();
FarPoint.Win.Spread.PrintInfo pi = new FarPoint.Win.Spread.PrintInfo();
FarPoint.Win.Spread.SmartPrintRule spr;
object obj = new object();
spr = new FarPoint.Win.Spread.BestFitColumnRule(FarPoint.Win.Spread.ResetOption.None);
rules.Add(new FarPoint.Win.Spread.ScaleRule(FarPoint.Win.Spread.ResetOption.None,1, 2, 0.5f));
rules.Add(spr);
obj = new FarPoint.Win.Spread.LandscapeRule(FarPoint.Win.Spread.ResetOption.None);
if( obj is FarPoint.Win.Spread.SmartPrintRule ) 
rules.Add(obj);
else
throw new ArgumentException("Invalid object type specified: " + obj.GetType().ToString() + " (must be SmartPrintRule).");
pi.SmartPrintRules = rules;
fpSpread1.ActiveSheet.PrintInfo = pi;
bool b;
b = rules.Contains(spr);
if (b == true)
{
MessageBox.Show("The object is in the collection");
}
Dim rules As New FarPoint.Win.Spread.SmartPrintRulesCollection
Dim pi As New FarPoint.Win.Spread.PrintInfo
Dim spr As FarPoint.Win.Spread.SmartPrintRule
Dim obj As New Object
spr = New FarPoint.Win.Spread.BestFitColumnRule(FarPoint.Win.Spread.ResetOption.None)
rules.Add(New FarPoint.Win.Spread.LandscapeRule(FarPoint.Win.Spread.ResetOption.None))
rules.Add(New FarPoint.Win.Spread.ScaleRule(FarPoint.Win.Spread.ResetOption.None, 1, 2, 0.5))
rules.Add(spr)
obj = New FarPoint.Win.Spread.LandscapeRule(FarPoint.Win.Spread.ResetOption.None)
If TypeOf obj Is FarPoint.Win.Spread.SmartPrintRule Then
rules.Add(obj)
Else
Throw New ArgumentException("Invalid object type specified: " + obj.GetType().ToString() + " (must be SmartPrintRule).")
End If
pi.SmartPrintRules = rules
fpSpread1.ActiveSheet.PrintInfo = pi
Dim b As Boolean
b = rules.Contains(spr)
If b = True Then
MessageBox.Show("The rule is in the collection")
End If
参照

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

 

 


© MESCIUS inc. All rights reserved.