ENTRY
brw1_OnBrowserClick(
IN
INT
_mouseBtn
,
IN
BOOL
_dblClick
,
IN
INT
_row
,
IN
INT
_col
,
IN
BOOL
_bShift
,
IN
BOOL
_bCtrl
)
%HI_AddItem
(
_lst
,
"brw1_OnBrowserClick"
)
%HI_AddItem
(
_lst
,
" _mouseBtn = "
+
%IToStr
(
_mouseBtn
))
IF
_dblClick
THEN
%HI_AddItem
(
_lst
,
" _dblClick = TRUE"
)
ELSE
%HI_AddItem
(
_lst
,
" _dblClick = FALSE"
)
ENDIF
%HI_AddItem
(
_lst
,
" _row = "
+
%IToStr
(
_row
))
%HI_AddItem
(
_lst
,
" _col = "
+
%IToStr
(
_col
))
IF
_bShift
THEN
%HI_AddItem
(
_lst
,
" _bShift = TRUE"
)
ELSE
%HI_AddItem
(
_lst
,
" _bShift = FALSE"
)
ENDIF
IF
_bCtrl
THEN
%HI_AddItem
(
_lst
,
" _bCtrl = TRUE"
)
ELSE
%HI_AddItem
(
_lst
,
" _bCtrl = FALSE"
)
ENDIF
END
brw1_OnBrowserClick
Pridať komentár