Forms Delphi

Title: Create a system modal form
Use SetSysModalWindow function. But this function works only for 16-bit versions of Windows.
SetSysModalWindow(Form1.Handle);