17. UserSet/Display line number
$event:=Form event
Case of
: ($event=On Display Detail)
OBJECT SET VISIBLE(*;"BgEven";Displayed line number%2=1)
OBJECT SET VISIBLE(*;"BgOdd";Displayed line number%2#1)
: ($event=On Close Detail)
CREATE EMPTY SET([Flight];"UserSet")
GOTO SELECTED RECORD([Flight];Selected record number([Flight]))
ADD TO SET([Flight];"UserSet")
HIGHLIGHT RECORDS([Flight];"UserSet")
End case
画⾯面遷移と同時にカレントレコードを移動
リストフォームのハイライトカラー
交互に背景⾊色を切切り替え