OpenEuphoria

IDE Not Defining Button - prj Files Inside

• Posted by c.k.lester <euphoric at ckle?ter?com> Oct 24, 2007
• 614 views

The SF interface seems to allow only one file to be uploaded in a bug report,
so I'm just going to put the prj files here...

The two prj files are exactly the same except for the definition of Window 2.
The prj with the definition of Window 2 crashes with the message:

bttn_Prepaid has not been declared
	setEnable(bttn_Prepaid, 0 )

The prj that does not have the definition of Window 2 works fine.

Here are the files:

*** Start of test_with_win2.prj
#Version 1.0.2
#Counter: 73
#WinCounter: 5
#OpenModuleAt
moduleAtControlEvent : Window1(General)
moduleAtCol : 0
moduleAtRow : 4
moduleAtTop : 1
moduleAtControlEvent : available_templates.e
moduleAtCol : 0
moduleAtRow : 65
moduleAtTop : 56
moduleAtControlEvent : Window1onOpen
moduleAtCol : 0
moduleAtRow : 3
moduleAtTop : 1
moduleAtControlEvent : Window1onActivate
moduleAtCol : 26
moduleAtRow : 2
moduleAtTop : 1
#EndOpenModuleAt
#Window 1
#TabInfo
TabText: Layer 0
TabRenamed: 0
TabNumber: 0
TabsetLayer: 0
#Control: Window1
X       : 0
Y       : 0
CX      : 152
CY      : 100
ControlLayer: 0
Title   : PRJ File Test
Class   : Window
Enabled : 0
Checked : 0
Parent  : 
PClass  : 
SeqParentName  : 
SeqParentClass  : 
SeqChildName  : 
Visible : 1
BkColor : 0
EnableC : 1
DefaultsClass : WS_SYSMENU
Style   : WS_THICKFRAME
TypStyle: {...}
ExStyle : WS_EX_DLGMODALFRAME
Local : 1
WinPos : 5
LastEditorEvent : 1

#Proc: (General)
procedure setPrepaidCodeButton()
	setEnable(bttn_Prepaid, 0 )
end procedure

#EndProc

#Control: bttn_Prepaid
AWindow : 30
X       : 4
Y       : 4
CX      : 108
CY      : 40
ControlLayer: 0
Title   : Install via Download
Class   : PushButton
Enabled : 0
Checked : 0
Parent  : 
PClass  : 
SeqParentName  : 
SeqParentClass  : 
SeqChildName  : 
Visible : 1
EnableC : 1
Style   : 0
TypStyle: 
ExStyle : 0
TabOrder : 1
Local : 1
Indexed : 1
LastEditorEvent : 3

#Window 2
#TabInfo
TabText: Layer 0
TabRenamed: 0
TabNumber: 0
TabsetLayer: 0
#Control: Window2
X       : 0
Y       : 0
CX      : 379
CY      : 135
ControlLayer: 0
Title   : Window 2
Class   : Window
Enabled : 0
Checked : 0
Parent  : 
PClass  : 
SeqParentName  : 
SeqParentClass  : 
SeqChildName  : 
Visible : 1
BkColor : 16777215
EnableC : 1
DefaultsClass : WS_SYSMENU
Style   : WS_POPUP, WS_BORDER
TypStyle: {...}
ExStyle : 0
Local : 1
WinPos : 5
LastEditorEvent : 13

*** Start of test_no_win2.prj
#Version 1.0.2
#Counter: 73
#WinCounter: 5
#OpenModuleAt
moduleAtControlEvent : Window1(General)
moduleAtCol : 0
moduleAtRow : 4
moduleAtTop : 1
moduleAtControlEvent : available_templates.e
moduleAtCol : 0
moduleAtRow : 65
moduleAtTop : 56
moduleAtControlEvent : Window1onOpen
moduleAtCol : 0
moduleAtRow : 3
moduleAtTop : 1
moduleAtControlEvent : Window1onActivate
moduleAtCol : 26
moduleAtRow : 2
moduleAtTop : 1
#EndOpenModuleAt
#Window 1
#TabInfo
TabText: Layer 0
TabRenamed: 0
TabNumber: 0
TabsetLayer: 0
#Control: Window1
X       : 0
Y       : 0
CX      : 152
CY      : 100
ControlLayer: 0
Title   : PRJ File Test
Class   : Window
Enabled : 0
Checked : 0
Parent  : 
PClass  : 
SeqParentName  : 
SeqParentClass  : 
SeqChildName  : 
Visible : 1
BkColor : 0
EnableC : 1
DefaultsClass : WS_SYSMENU
Style   : WS_THICKFRAME
TypStyle: {...}
ExStyle : WS_EX_DLGMODALFRAME
Local : 1
WinPos : 5
LastEditorEvent : 1

#Proc: (General)
procedure setPrepaidCodeButton()
	setEnable(bttn_Prepaid, 0 )
end procedure

#EndProc

#Control: bttn_Prepaid
AWindow : 30
X       : 4
Y       : 4
CX      : 108
CY      : 40
ControlLayer: 0
Title   : Install via Download
Class   : PushButton
Enabled : 0
Checked : 0
Parent  : 
PClass  : 
SeqParentName  : 
SeqParentClass  : 
SeqChildName  : 
Visible : 1
EnableC : 1
Style   : 0
TypStyle: 
ExStyle : 0
TabOrder : 1
Local : 1
Indexed : 1
LastEditorEvent : 3