>u either define a class
>with a label for a message & a timer with an event as
> thisform.visible=.t.
> classform's hide as
> thisform.visible=.f.
> THISFORM.TIMER1.INTERVAL=0
> =dodefault()
>in the main program
>obj=create the object
>
>use as
> ob.label1.caption="Loading Company...."
> ob.timer1.interval=2000 && show after two secs
> && no need to show if code exes in 2 secs ..
>to hide
> ob.hide()
> ....... but will deactivate a window if already activated
>
>or could use
> wait window "Load Program"+chr(13)+"Please wait ..." nowait
> &
> wait clear

This is the only way IMHO

wait window "Load Program"+chr(13)+"Please wait ..." nowait
wait clear

No overhead, no mess, no bother.