* Method thisform.ShowControls lparameters toControl local loControl, loPage, loColumn do case case Pemstatus(toControl, 'Controls', 5) for each loControl in toControl.Controls ? 'Control:', loControl.Name thisform.ShowControls(loControl) endfor case Pemstatus(toControl, 'Columns', 5) for each loColumn in toControl.Columns ? 'Column:', loColumn.Name thisform.ShowControls(loColumn) endfor case Pemstatus(toControl, 'Pages', 5) for each loPage in toControl.Pages ? 'Page:', loPage.Name thisform.ShowControls(loPage) endfor endcase ? 'Object:', toControl.Name[Update] Forgot to add the object