Try and see if it works for you.

>I made a method called mostraricono; this one recieve a parameter called siono; the method code is:
>
>parameter siono
>

>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()
>ENDIF
>

>
>I 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.
>
>In fact my process code would be:
>

>.
>.
>thisform.mostraricono(.t.)
>.
>.
>thisform.mostraricono(.f.)
>.
>.
>

>
>TIA
>
>What do you think?