SortAsColumn プロパティ
SortAsColumnはソートに使用するカラムを制御します。
SortAsColumnプロパティを使用して、このカラムのソートに使用される別のカラムを指定します。
あるカラムのソートを別のカラム(表示されている必要はありません)を使ってソートしたい場合もあります。 例えば、あるカラムが日付をDDMMYYYY形式で表示している時、実際のソートはYYYYMMDD形式の日付カラムを利用して行うでしょう。
次の例をコピー・貼り付けして、SortAsColumnプロパティがどのように作動するかを確認することができます。
Function Options(*DIRECT)
Begin_Com Role(*EXTENDS #PRIM_FORM) Clientheight(166) Clientwidth(468) Height(193) Left(364) Top(167) Visible(False) Width(476)
Define_Com Class(#PRIM_LTVW) Name(#LTVW_1) Columnbuttonheight(21) Componentversion(1) Displayposition(1) Height(121) Left(8) Parent(#COM_OWNER) Tabposition(1) Top(16) Width(449)
Define_Com Class(#PRIM_LVCL) Name(#LVCL_1) Displayposition(1) Parent(#ltVW_1) Readonly(False) Sortonclick(True) Source(#YYYYMMDD) Width(32)
Define_Com Class(#PRIM_LVCL) Name(#LVCL_2) Displayposition(2) Parent(#ltVW_1) Sortonclick(True) Source(#STD_TEXT) Width(19)
Define_Com Class(#PRIM_LVCL) Name(#LVCL_3) Displayposition(3) Parent(#ltVW_1) Sortonclick(True) Source(#DDMMYYYY) Width(33) Widthtype(Remainder)
Define_Com Class(#PRIM_CKBX) Name(#CKBX_1) Caption('Sort third column as YYYYMMDD') Displayposition(2) Height(15) Left(248) Parent(#COM_OWNER) Tabposition(2) Top(144) Width(209)
Evtroutine Handling(#com_owner.Initialize)
Change Field(#std_text) To(NSW)
Change Field(#ddmmyyyy) To(01012001)
Change Field(#yyyymmdd) To(20010101)
Add_Entry To_List(#LTVW_1)
Change Field(#std_text) To(VIC)
Change Field(#ddmmyyyy) To(03042004)
Change Field(#yyyymmdd) To(20040304)
Add_Entry To_List(#LTVW_1)
Change Field(#std_text) To(TAS)
Change Field(#ddmmyyyy) To(02022005)
Change Field(#yyyymmdd) To(20050202)
Add_Entry To_List(#LTVW_1)
Change Field(#std_text) To(WA)
Change Field(#STD_NUM) To(4)
Change Field(#ddmmyyyy) To(06072000)
Change Field(#yyyymmdd) To(20000606)
Add_Entry To_List(#LTVW_1)
Endroutine
EVTROUTINE HANDLING(#CKBX_1.Click)
if cond('#ckbx_1.buttonstate *eq Checked')
Set Com(#LVCL_3) Sortascolumn(#LVCL_1)
else
Set Com(#LVCL_3) Sortascolumn(*null)
endif
ENDROUTINE
End_Com