>with this > .NewObject(lcAddMachineName, lcClassName, lcClassPath, '', machinetag, machineid) > WITH .Objects(.Objects.Count) > .Visible = .T. > endwith >endwithTry
this.NewObject(lcAddMachineName, lcClassName, lcClassPath, '', machinetag, machineid) IF PEMSTATUS(THIS, m.lcAddMachineName,5) with evaluate('this.' + m.lcAddMachineName) .Visible = .T. .left = 1 .top = 1 endwith endif