2 番目の領域

2 番目の領域は、RowColumn ウィジェットと 5 つの ToggleButton ウィジェット、および 1 番目のとは別の Separator ウィジェットから成ります。

図 4-6 script_find ウィンドウの 2 番目の領域

ガジェットは、その属性の多くをその親に依存するウィジェットなので、メモリ・リソースを節約できます。

RowColumn ウィジェットは、Form ウィジェットの子として作成され、1 番目の領域で作成された Separator ウィジェットの直下に位置付けられます。

XtCreateManagedWidget RC
rc XmRowColumn $FORM ¥
         orientation:HORIZONTAL ¥
         numColumns:3 ¥
         packing:PACK_COLUMN ¥
   $(DtkshUnder $SEP 10) ¥
   $(DtkshSpanWidth 10 10) ¥ 
   navigationType:EXCLUSIVE_TAB_GROUP

5 つの ToggleButton ガジェットは、次のように簡易関数 DtkshAddButtons を使用して RowColumn の子として作成されます。

DtkshAddButtons -w $RC XmToggleButtonGadget ¥
   T1 "Cross Mount Points"           ""¥
   T2 "Print Matching Filenames"     ""¥
   T3 "Search Hidden Subdirectories" ""¥
   T4 "Follow Symbolic Links"        ""¥
   T5 "Descend Subdirectories First" ""

1 番目とは別の Separator が次に作成され、2 番目と 3 番目の領域を分割します。この Separator ウィジェット ID は SEP2 と呼ばれていますので注意してください。

XtCreateManagedWidget SEP2 sep XmSeparator $FORM ¥
   separatorType:SINGLE_DASHED_LINE ¥
   $(DtkshUnder $RC 10) ¥
   $(DtkshSpanWidth)