Rats, I cant reproduce it now to test either solution :-)

To:                     Multiple recipients of list delphi <[EMAIL PROTECTED]>
Send reply to:          [EMAIL PROTECTED]
From:                   "Jeremy Coulter" <[EMAIL PROTECTED]>
Subject:                RE: [DUG]:  This has been raised before BUT
Date sent:              Wed, 17 Sep 2003 22:47:39 +1200

> 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/
> 

Regards

Rohit

======================================================================
CFL - Computer Fanatics Ltd.  21 Barry's Point Road, AKL, New Zealand
PH    (649) 489-2280 
FX    (649) 489-2290
email [EMAIL PROTECTED]  or  [EMAIL PROTECTED]
======================================================================

---------------------------------------------------------------------------
    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