カルーセルデザインインターフェース - OnSortメソッド 

親リストでSortメソッドが起動されると実行されます

カルーセルデザインインターフェース (PRIM_CARO.ICarouselDesign) のメンバ

パラメータ

名前

タイプ

データタイプ

記述

Result

*Result

列挙

2つの値を比較した結果-Less(小さい)、Equal(等しい)またはGreater(大きい)

CarouselItem

*Input

PRIM_CARO.CarouselItem

アイテムへの参照

CompareTo

*Input

PRIM_CARO.CarouselItem

比較対象のリストアイテムへの参照

Key

*Input

PRIM_VAR

必要となるソートの種類

詳細

OnItemSort メソッドは、項目が含まれているカルーセルで実行中のソートで項目が参照されるたびに実行されます。 

ソートは完全にユーザー定義されているもののため、ソートルーチンに Key （ソートされる 'value' ） と Order を指定する必要があります。そして、この情報は OnSort メソッドで使用されます。

例

デザインの再利用可能パーツのメソッドを再定義する。 

この例では、 EMPNO 、 SURNAME および GIVENAME の3つの異なるソートをサポートしています。 これらの Key 値は完全に任意ですが、簡単にするために、特定のフィールド名と一致しています。ここでの並べ替えは昇順のみです。 

それぞれの場合、ローカル変数値は、同等の変数値、この場合はデザインインスタンスのプロパティとして公開された値と比較され、各値が他方よりも小さいか等しいか、または大きいかどうかが判定されます。 

ソートプロセスが各項目を評価するときに、各項目に対して OnSort メソッドが何度も呼び出されることがあります。 

     Mthroutine Name(OnSort) Options(*Redefine) 
        Case (#Key)
        When (= EMPNO)
           #Result := #Empno.Compare( (#CompareTo.Design *As #EmployeePart).Empno ) 
        When (= GIVENAME)
           #Result := #Givename.Compare( (#CompareTo.Design *As #EmployeePart).Givename ) 
        When (= SURNAME)
           #Result := #Surname.Compare( (#CompareTo.Design *As #EmployeePart).Surname ) 
        Endcase 
     Endroutine


参照

すべてのコンポーネント クラス
テクニカルリファレンス

  • No labels