Le 23 déc. 06 à 00:09 Matin, Charles Yeomans a écrit:
On Dec 22, 2006, at 6:05 PM, Youri wrote:
Hi,
I have in a Container Control some myEditField (custom class with
a raz method). I simply want to loop throught all control, test if
it is a MyEditField, if so trigger the raz method of this control.
I'm using the following code which fails :
dim n, i as Integer
dim s as MyEditField
n = app.LayoutPraticiens.ControlCount - 1
for i = 0 to (n-1)
if app.LayoutPraticiens.Control(i) isa MyEditField then
EditField(app.LayoutPraticiens.Control(i)).raz
Rewrite it as above.
Also, note that you subtract 1 twice:
n = app.LayoutPraticiens.ControlCount - 1
and
for i = 0 to (n-1)
You should subtract 1 only once to reach the last
control._______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
