USE <mydbf> DO LockWindow WITH .NULL. && declare the procs in the API DO LockWindow WITH .t. && lock the desktop REPORT FORM <myrpt> TO PRINT NOCONSOLE && run the report DO LockWindow WITH .f. && unlock the desktop RETURN PROCEDURE LockWindow LPARAMETER lOption DO CASE CASE IsNull( lOption ) DECLARE INTEGER GetDesktopWindow IN WIN32API DECLARE INTEGER LockWindowUpdate IN WIN32API INTEGER lnHandle CASE lOption LockWindowUpdate( GetDeskTopWindow() ) CASE NOT lOption LockWindowUpdate( 0 ) ENDCASEChristof