[ 
|../../index.htm#lansa/l4wdev06_1445.htm]
現在地:
FOR/ENDFOR
For/EndForループを使用してコレクション内のアイテムにアクセスできます。
この例では、ChildFormsコレクション内のすべてのフォームを左に5ピクセル移動します。
For Each(#Current) In(#ChildForms)
Change Field(#NEW_LEFT) To('#Current.Left - 5') Set Com(#Current) Left(#New_Left) Endfor
この例は、サブメニュー#smnu_1内のすべてのアイテムを無効にします。
For Each(#Current) In(#smnu_1.Items) Set Com(#Current) Enabled(False) Endfor
[ |../../index.htm#lansa/l4wdev06_1445.htm]