*!*if in edit mode with thisform.pageframe1 for m.lnI = 1 to .pagecount if .ACTIVEPAGE = m.lnI *** set enabled .t. .PAGES(m.lnI).ENABLED = .T. ELSE .PAGES(m.lnI).ENABLED = .F. endif next endwith *!*if not in edit mode with thisform.pageframe1 for m.lnI = 1 to .pagecount .PAGES(m.lnI).ENABLED = .T. next endwithHTH