Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Object List
Message
From
22/06/2001 10:06:35
 
 
To
22/06/2001 07:53:14
Jimi Lee
Pop Electronic Products Ltd.
Hong Kong, Hong Kong
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Miscellaneous
Thread ID:
00522334
Message ID:
00522418
Views:
8
I believe this is a runtime situation, which could be handled with the following.
form::CheckforFilledvalues

lparameters tcBaseClass, toRef
local loRef
assert not empty(lcBaseClass)
if empty(toRef)
    toRef = thisform
endif
llReturn = .t.
for each loRef in toRef
    if vartype(loRef.controlcount) = 'N'
    	llReturn = thisform.TestAllvalues( lcBaseClass,loRef)
    	if not llReturn
    		return llReturn
    	ENDIF
    else
        if vartype(loRef.value) <> 'U' and ;
           vartype(loRef.value) <> 'L' and ;
           loRef.BaseClass = proper(alltrim(tcBaseClass))
            if empty(loRef.value)
                return .f.
            endif
        endif
    endif
endfor
return llReturn
>Hello everyone,
>
>It's me again :p
>
>How can I get a list of object in a form? To be more specfic, I want to examine
>whether the user have filled in all the textbox or not when he click the submit
>button.
>I want to have a list of textboxes and then check them on by one.
>
>Thanks a lot!
>Jimi
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform