[futurebasic] Re: [FB] FBtoC 1.02 and Appearance Buttons

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : January 2008 : Group Archive : Group : All Groups

From: Rich Love <richlove@...>
Date: Sun, 27 Jan 2008 20:59:50 -0600
> 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.
>
> [1] In AppThings.c, locate and comment out line 1869:
> 	// SetControl32BitValue( c, 0 );
> [2] Similarly for line 1873:
> 	// SetControl32BitValue( c, 1 );
> [3] Save AppThings.c.
>
> Robert P.


That fixed it.

Thanks,
Rich


On Jan 27, 2008, at 1:19 PM, Robert Purves wrote:

>
> 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.
>
> [1] In AppThings.c, locate and comment out line 1869:
> 	// SetControl32BitValue( c, 0 );
> [2] Similarly for line 1873:
> 	// SetControl32BitValue( c, 1 );
> [3] Save AppThings.c.
>
> Robert P.
>
> --
> To unsubscribe, send ANY message to: futurebasic-unsubscribe@...
>