Use SetSysModalWindow function. But this function works only for 16-bit versions of Windows.
SetSysModalWindow(Form1.Handle);