[futurebasic] Re: [FB] [ANN] FB 5.6.2 release

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : September 2011 : Group Archive : Group : All Groups

From: Yoshiyuki Hasegawa <hase44@...>
Date: Sat, 17 Sep 2011 23:40:15 +0900
Report.
The following errors occurred in FB 5.6.2.
  It seems that kControlRadioAutoToggleButtonProc is not recognized.

OS ver 10.6.8,  Xcode 3.2.6

Yoshiyuki

Error: gcc:
'kControlRadioAutoToggleButtonProc' undeclared (first use in this  
function)
(Each undeclared identifier is reported only once
for each function it appears in.) in fn 'PreferenceWnd' [line 33 of  
_1_test1,test1.m]

_1_test1,test1.m: In function 'PreferenceWnd':
_1_test1,test1.m:33: error: 'kControlRadioAutoToggleButtonProc'  
undeclared (first use in this function)
_1_test1,test1.m:33: error: (Each undeclared identifier is reported  
only once
_1_test1,test1.m:33: error: for each function it appears in.)
lipo: can't figure out the architecture type of: /var/folders/j1/ 
j1vRtrsFGo4o-bYON+Hikk+++TI/-Tmp-//cczoTlLz.out
Compilation failed


Code snip
'------------------------------------
include "Tlbx Menus.incl"

begin enum 1
_PreferenceWnd
end enum

begin enum 1
_cPreGrp
_cPreChk
_cPreBtn
_cPre1Grp
_cPre2Grp
_cRadio10
_cRadio11
_cRadio12
end enum

end globals

local fn PreferenceWnd
'~'1
dim as ControlFontStyleRec cfs
dim as Rect  r
'~'<
cfs.flags = _kControlUseFontMask + _kControlUseSizeMask

SetRect( r, 300, 200, 630, 485 )
appearance window -_PreferenceWnd, "Preferences", @r,  
_kMovableModalWindowClass
fn SetWindowBackground( _kThemeActiveDialogBackgroundBrush, _zTrue )
'~'<
SetRect( r, 20, 10, 310, 105 )
appearance button _cPreGrp, _activeBtn, _kControlSupportsEmbedding,,,  
" BoxDesignerDB State at Launch", @r,  
_kControlGroupBoxSecondaryTextTitleProc
cfs.font = fn FMGetFontFamilyFromName( "Lucida Grande" )
cfs.size = 13
fn SetButtonFontStyle( _cPreGrp, cfs )

SetRect( r, 50, 40, 300, 60 )
appearance button _cPreChk, _activeBtn, 1,,, " Save Current Position  
of Window", @r, _kControlCheckBoxAutoToggleProc
fn EmbedButton( _cPreChk, _cPreGrp )

SetRect( r, 20, 115, 310, 225 )
appearance button _cPre1Grp, _activeBtn,  
_kControlSupportsEmbedding,,, " Set A Default Launch Application",  
@r, _kControlGroupBoxSecondaryCheckBoxProc
appearance button _cPre1Grp,, 1

SetRect( r, 45, 141, 270, 217 )
appearance button _cPre2Grp, _activeBtn,  
_kControlSupportsEmbedding,,,, @r, _kControlRadioGroupProc
fn EmbedButton( _cPre2Grp, _cPre1Grp )

SetRect( r, 50, 146, 265, 164 )
appearance button _cRadio10, _activeBtn,  
_kControlRadioButtonUncheckedValue,,, " BoxDesigner", @r,  
_kControlRadioAutoToggleButtonProc
fn EmbedButton( _cRadio10, _cPre2Grp )

SetRect( r, 50, 170, 265, 188 )
appearance button _cRadio11, _activeBtn,  
_kControlRadioButtonUncheckedValue,,, " BoxDesignerMid", @r,  
_kControlRadioAutoToggleButtonProc
fn EmbedButton( _cRadio11, _cPre2Grp )

SetRect( r, 50, 194, 265, 216 )
appearance button _cRadio12, _activeBtn,  
_kControlRadioButtonUncheckedValue,,, " BoxDesignerFA", @r,  
_kControlRadioAutoToggleButtonProc
fn EmbedButton( _cRadio12, _cPre2Grp )

appearance button _cPre2Grp,, 1

SetRect( r, 240, 245, 310, 265 )
appearance button _cPreBtn, _markedBtn,,,, "OK", @r,  
_kControlPushButtonProc

appearance window _PreferenceWnd
end fn

fn PreferenceWnd

RunApplicationEventLoop()
'------------------------------------


Attachments: