すべてのアイテムのデサインインターフェースにOnFindメソッドを実行
タイル (PRIM_TILE) のメンバ
名前 |
タイプ |
データタイプ |
記述 |
Result |
*Result (任意) |
正数の結果を返す最初のデザインインスタンスへの参照 |
|
Key |
*Input |
バリアント |
検索する値 |
StartItem |
*Input (任意) |
検索の最初として使用されるアイテムへの参照 |
FindItem メソッドは、デザインインスタンスによって実装された Prim_Tile.iTileDesign インターフェイスの OnFind メソッドを呼び出します。
デザインインスタンスによって True が返された場合、 TileItem が Result として返されます。
項目が返されたり見つからない場合は、 FindItem 処理は停止します。
この例では、見つかった項目にはハイライトするスタイルが与えられています。
Mthroutine Name(Find)
Define_Map For(*Input) Class(#Prim_Alph) Name(#Key)
Define_Com Class(#prim_Tile.TileItem) Name(#FoundItem) Reference(*Dynamic)
Begin_Loop
#FoundItem <= #Tile.FindItem( #Key #FoundItem )
Leave If(#FoundItem *Is *Null)
#FoundItem.Style <= #MyStyles<Highlight>
End_Loop
Endroutine