Peter Below's Threaded Splash Screen and Modal Dialogs

Question

I\'m using Peter Below\'s PBThreadedSplashForm to display during application startup. It gets updated as various databases are opened during the creation of the data module (jus

Answer 1

Ok. Finally got the problem solved. It appears to be caused by the WS_EX_NOACTIVATE flag in the call to CreateWindowEx(). Changing it to remove that seems to solve the problem; the modal dialog displays above the splash screen, and because it's modal the splash screen can't be brought above it.

The working code is:

  FWnd := CreateWindowEx(
            TopmostStyle[ FTopmost ] or WS_EX_TOOLWINDOW
            or WS_EX_STATICEDGE or WS_EX_CLIENTEDGE,
            MakeIntResource( FWndClass ),
            nil,
            WS_POPUP or WS_BORDER,
            Forigin.x, Forigin.y,
            wsize.cx, wsize.cy,
            0, 0, hInstance, self );

Thanks, Rob and Craig, for the efforts.