Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Adding controls / objects with For Loop or IF statement
Message
From
10/10/2003 13:21:50
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00837173
Message ID:
00837527
Views:
32
When I put the FOR loop into the form class and I try to compile the .prg I get an error message on the FOR command line that says "Statement is not valid in a class definition."
DEFINE CLASS getparam AS FORM
	CAPTION  = "Get Parameters Form"
	BACKCOLOR = RGB(0,0,255)
	FORECOLOR = RGB(255,255,255)
	cKeyboard = ''

	* loop through goapp.aGetParam and bulid buttons
	FOR liLoop = 1 TO ALEN(goapp.aGetParam,1)
		DO CASE
			CASE goapp.aGetParam[liLoop,1] = 'D'
				* date type
				* The label for the parameter
				ADD OBJECT lblOne AS LABEL
        ENDCASE
    ENDFOR
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform