Well this seemed to have helped Neven.
I used :-    SetWindowPos(Handle, HWND_TOPMOST, Self.left, self.top, 0,
0, SWP_NOACTIVATE or SWP_NOSIZE);
And the user said that the messagedlg was shown on top of the
"StayOnTop" window, so that's good.

Jeremy

-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On
Behalf Of Neven MacEwan
Sent: Wednesday, 17 September 2003 14:35
To: Multiple recipients of list delphi
Subject: Re: [DUG]: This has been raised before BUT


J

Don't know if this will help but this snippet came from the woll2woll
controls (they 'fake' combos by using 2 windows)

  if (ParentForm <> nil) and (TForm(ParentForm).FormStyle=fsStayOnTop)
then
     WinAttribute:= HWND_TOPMOST;
  SetWindowPos(Handle, WinAttribute, At.X, At.Y, 0, 0, SWP_NOACTIVATE or
SWP_NOSIZE);

N


----- Original Message ----- 
From: "vss" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Wednesday, September 17, 2003 1:38 PM
Subject: [DUG]: This has been raised before BUT


> Hi All.
> I seem to remember some time back that someone raised a problem with 
> dialog boxes appearing behind other forms.
>
> I have a situation where I have a form that is a "Stay On Top" form so

> that when the form is open, data can still be processed in the 
> background, as it stops if I show the for modal. The user might delete

> a record, and a msg box will be shown to tell them to confirm the 
> delete. BUT this consistantly appears begind the "Stay On Top" form, 
> and they think app, has frozen.
>
> Was there a solution to this problem?
>
> Jeremy
>
> ----------------------------------------------------------------------
> ----
-
>     New Zealand Delphi Users group - Delphi List -
[EMAIL PROTECTED]
>                   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
>
>

------------------------------------------------------------------------
---
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/



---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

Reply via email to