Second, thank you for moving to this new forum format. It is far superior to the old NTTP...
Finally, I have a problem with the checkbox object. Perhaps I am not defining it correctly? The object's height is greatly exaggerated when displayed. This causes it to clip siblings and be sensitive to taps in areas not normally associated with it. If I query for the :nTop and :nBottom values of the object, they are what I expect, but not what is displayed. This problem occurs whether I specify a size or not.
I have included a small sample PRG below that illustrates the problem. I have set the checkbox background to "N*" to highlight the issue.
Thanks in advance...
- Code: Select all Expand view RUN
// Test checkbox objects
#include "FWCE.ch"
#xtranslate NTrim(<n>) => LTrim(Str(<n>))
//----------------------------------------------------------------------------//
FUNCTION Main()
LOCAL oWnd, oChk1, oChk2
LOCAL lChk1 := .T.
LOCAL lChk2 := .F.
DEFINE WINDOW oWnd TITLE "ChkBox"
@ 2, 1 CHECKBOX oChk1 VAR lChk1 PROMPT "Check 1" OF oWnd COLOR "N/N*"
@ 6, 1 CHECKBOX oChk2 VAR lChk2 PROMPT "Check 2" OF oWnd COLOR "N/N*"
ACTIVATE WINDOW oWnd ;
ON CLICK MsgInfo( "Top 1=" + NTrim( oChk1:nTop ) + ", Bott 1=" + NTrim( oChk1:nBottom ) + CRLF + ;
"Top 2=" + NTrim( oChk2:nTop ) + ", Bott 2=" + NTrim( oChk2:nBottom ) )
RETURN NIL