ShowButtonSelection プロパティ

LANSA

ShowButtonSelection プロパティ

ShowButtonSelectionはカラム・ヘッダー・ボタンの外観を制御します。

カラム内の項目が選択された時に、そのカラム・ヘッダー・ボタンのキャプションが強調表示されるようにするには、ShowButtonSelectionをTrueに設定します。

このプロパティの使用方法を確認するには、次のソースをコピーしてフォームに貼り付け、フォームをコンパイルして実行してください。

FUNCTION options(*DIRECT) 

BEGIN_COM role(*EXTENDS #PRIM_FORM) HEIGHT(258) LEFT(336) TOP(124) WIDTH(472)
DEFINE_COM class(#PRIM_GRID) name(#GRID_1) COLUMNBUTTONHEIGHT(18) COLUMNBUTTONPRESS(True) DISPLAYPOSITION(1) HEIGHT(201) LEFT(32) PARENT(#COM_OWNER) ROWRESIZE(True) SHOWBUTTONSELECTION(False) SHOWSELECTION(True) TABPOSITION(1) TOP(16) WIDTH(281)
DEFINE_COM class(#PRIM_GDCL) name(#GDCL_1) CAPTIONALIGN(Left) DISPLAYPOSITION(1) PARENT(#GRID_1) SORTONCLICK(True) SOURCE(#EMPNO) WIDTH(29)
DEFINE_COM class(#PRIM_GDCL) name(#GDCL_2) CAPTIONALIGN(Left) DISPLAYPOSITION(2) PARENT(#GRID_1) SOURCE(#SURNAME) WIDTH(65) WIDTHTYPE(Remainder)
DEFINE_COM class(#PRIM_GPBX) name(#GPBX_1) CAPTION('ShowButtonSelection') DISPLAYPOSITION(2) HEIGHT(73) LEFT(320) PARENT(#COM_OWNER) TABPOSITION(2) TABSTOP(False) TOP(16) WIDTH(121)
DEFINE_COM class(#PRIM_RDBN) name(#RDBN_2) BUTTONCHECKED(True) CAPTION('False') DISPLAYPOSITION(1) LEFT(8) PARENT(#GPBX_1) TABPOSITION(1) TOP(40) WIDTH(65)
DEFINE_COM class(#PRIM_RDBN) name(#RDBN_1) CAPTION('True') DISPLAYPOSITION(2) LEFT(8) PARENT(#GPBX_1) TABPOSITION(2) TOP(16) WIDTH(81)
EVTROUTINE handling(#COM_OWNER.Initialize) options(*NOCLEARMESSAGES *NOCLEARERRORS)
SELECT fields(#GRID_1) from_file(PSLMST)
ADD_ENTRY to_list(#GRID_1)
ENDSELECT
ENDROUTINE
EVTROUTINE handling(#RDBN_1.Click)
IF cond('#RDBN_1.buttonchecked *eq true')
SET com(#grid_1) SHOWBUTTONSELECTION(True)
ENDIF
ENDROUTINE
EVTROUTINE handling(#RDBN_2.Click)
IF cond('#RDBN_2.buttonchecked *eq true')
SET com(#grid_1) SHOWBUTTONSELECTION(False)
ENDIF
ENDROUTINE
END_COM