diff options
Diffstat (limited to 'src/corelib/gdi/gfx_gdi.pas')
| -rw-r--r-- | src/corelib/gdi/gfx_gdi.pas | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/corelib/gdi/gfx_gdi.pas b/src/corelib/gdi/gfx_gdi.pas index e35023ba..d7ef5a70 100644 --- a/src/corelib/gdi/gfx_gdi.pas +++ b/src/corelib/gdi/gfx_gdi.pas @@ -1045,6 +1045,10 @@ begin DoMoveWindow(FLeft, FTop); end; + if waStayOnTop in FWindowAttributes then + SetWindowPos(FWinHandle, HWND_TOPMOST, 0, 0, 0, 0, + SWP_NOMOVE or SWP_NOSIZE or SWP_NOACTIVATE); + // the forms require some adjustments before the Window appears SetWindowParameters; end; |