with _screen for lnI = 1 ti .formCount do case case .forms[lnI].name = this.name and .forms[lnI].visible * Found another form with same name and it is visible... * .forms[lnI].show() case .forms[lnI].name = this.name and NOT .forms[lnI].visible * form exists but it's invisible so make it visible. * .forms[lnI].visible = .T. .forms[lnI].setfocus() endcase endfor endwith
DO WHILE .T. ME.Work() ENDDO