IF siono local lcpathtoicons, nicons, aiconfiles[1], ncurrenticon lcpathtoicons = home() + "graphics\icons\win95\" nicons = adir(aiconfiles, lcpathtoicons + "*fold*.ico") _screen.visible= .f. thisform.visible= .f. if m.nicons = 0 messagebox("No se encontraron iconos en la carpeta: '" + lcpathtoicons + "'") return endif asort(m.aiconfiles) with thisform.systray1 .cleariconlist() for ncurrenticon = 1 to m.nicons .addicontoiconlist(lcpathtoicons + aiconfiles[ncurrenticon, 1]) endfor .addicontosystray thisform.timer1.enabled = .t. endwith thisform.systray1.tiptext="esta es la primera prueba..." ELSE _screen.visible= .t. thisform.visible= .t. thisform.systray1.cleariconlist() ENDIFI think if I called the method (with the parameter .t.) the screen desapear while the procees is runnig; after this finish I call the method (with the parameter .f.) and the form and screen will be visible again.
. . thisform.mostraricono(.t.) . . thisform.mostraricono(.f.) . .TIA