Examples Delphi

You need to make a window system modal ?
The following function does the job (in 16bit Windows only):
SetSysModalWindow(Form1.handle);