justamistere
Programmer
I want to create a form to collect programmers' parameters.
Then with these parameters I want to create a .scx form,
adding code to PEM's (Properties, Events, and Methods).
Visually: I can't add custom code to Events and Methods.
Programatically: I have added everything, but can't save it as a .scx form
In the Vfp-Command Window I execute the following two lines.
Do _MyFormTest
MyFormTest.SaveAs("FormTest_01"
I get the following error message.
"One of the members of this Form or FormSet is based on a
nonvisual class. Cannot write .SCX file."
************************************************************
* Name: _FormTest.prg
* Author:
* Description: Shortened code... (No Custom PEM-code)
************************************************************
PUBLIC MyFormTest
MyFormTest = CREATEOBJECT("MyFormTest"
RETURN
DEFINE CLASS MyFormTest AS FORM
DoCreate = .T.
AutoCenter = .T.
Caption = "MyFormTest"
Height = 235
Left = 2
Name = "MyFormTest"
Top = 0
Width = 491
WindowType = 1
ADD OBJECT cmdCancel AS COMMANDBUTTON WITH ;
Caption = "\<Close", ;
Enabled = .T., ;
Height = 22, ;
Left = 410, ;
Name = "cmdCancel", ;
TabIndex = 4, ;
Top = 5, ;
Visible = .T., ;
Width = 62
ADD OBJECT txtCustomer AS TEXTBOX WITH ;
Height = 22, ;
InputMask = "XXXXXXXXXXXXXXXXXXXXXXXXX", ;
Left = 261, ;
MaxLength = 25, ;
Name = "txtCustomer", ;
ReadOnly = .T., ;
SpecialEffect = 1, ;
TabIndex = 2, ;
Tag = "01", ;
Top = 53, ;
Visible = .T., ;
Width = 184
PROCEDURE cmdCancel.CLICK
Thisform.Release()
ENDPROC
ENDDEFINE
Then with these parameters I want to create a .scx form,
adding code to PEM's (Properties, Events, and Methods).
Visually: I can't add custom code to Events and Methods.
Programatically: I have added everything, but can't save it as a .scx form
In the Vfp-Command Window I execute the following two lines.
Do _MyFormTest
MyFormTest.SaveAs("FormTest_01"
I get the following error message.
"One of the members of this Form or FormSet is based on a
nonvisual class. Cannot write .SCX file."
************************************************************
* Name: _FormTest.prg
* Author:
* Description: Shortened code... (No Custom PEM-code)
************************************************************
PUBLIC MyFormTest
MyFormTest = CREATEOBJECT("MyFormTest"
RETURN
DEFINE CLASS MyFormTest AS FORM
DoCreate = .T.
AutoCenter = .T.
Caption = "MyFormTest"
Height = 235
Left = 2
Name = "MyFormTest"
Top = 0
Width = 491
WindowType = 1
ADD OBJECT cmdCancel AS COMMANDBUTTON WITH ;
Caption = "\<Close", ;
Enabled = .T., ;
Height = 22, ;
Left = 410, ;
Name = "cmdCancel", ;
TabIndex = 4, ;
Top = 5, ;
Visible = .T., ;
Width = 62
ADD OBJECT txtCustomer AS TEXTBOX WITH ;
Height = 22, ;
InputMask = "XXXXXXXXXXXXXXXXXXXXXXXXX", ;
Left = 261, ;
MaxLength = 25, ;
Name = "txtCustomer", ;
ReadOnly = .T., ;
SpecialEffect = 1, ;
TabIndex = 2, ;
Tag = "01", ;
Top = 53, ;
Visible = .T., ;
Width = 184
PROCEDURE cmdCancel.CLICK
Thisform.Release()
ENDPROC
ENDDEFINE