Rich Love wrote: > There is a problem with Appearance Buttons in FBtoC 1.02 > > I have modified Robert's test routine to add a checkbox. > When you run this in FB it puts a check mark in the checkbox. > But when run in FBtoC 1.02 , there is no checkmark and you can't > click on it to put one there. > FBtoC 1.01 was OK. > > Here is the modified routine with the checkbox: > > local fn BuildPopMenu( id as long ) > dim as MenuRef popH > menu id, 0, _enable, "" > menu id, 1, _enable, "FBtoC bug;No bug" > popH = fn GetMenuHandle( id ) > DeleteMenu( id ) > InsertMenu( popH, -1 ) > end fn > > dim as Rect r > dim as Rect r2 > > window 1 > fn BuildPopMenu( 666 ) > SetRect( @r, 18, 98, 160, 115 ) > appearance button -1, _activeBtn,, 666, -1,, @r, > _kControlPopupButtonProc > > // try to set "No bug" > appearance button 1, _activeBtn, 2 // no effect in FBtoC > //appearance button 1,, 2 // no effect in FBtoC > //appearance button 1, _grayBtn, 2 // works but popup is inactive > > SetRect( @r2, 30, 40, 260, 115 ) > appearance button 5, _activeBtn,,,,, @r2, _kControlCheckBoxProc > appearance button 5,,1 > > do > HandleEvents > until ( gFBQuit ) This bug, affecting the 'appearance button' statement, is due to two ill-considered lines of code introduced in FBtoC 1.0.2. You can either wait for 1.0.3, or fix it yourselves in few seconds by editing the file build_goodies/AppThings.c.  In AppThings.c, locate and comment out line 1869: // SetControl32BitValue( c, 0 );  Similarly for line 1873: // SetControl32BitValue( c, 1 );  Save AppThings.c. Robert P.