🚀 go-pugleaf

Hi

  Thanx a lot.  There is only one problem.  Since the popup window is
StayonTop window,  it stays on top above all child windows.  Is there any
way that, i can make the child windows to display above the popup window.
In other words, Only the window which invoked the popup window should be
behind popup window.  When the select the other child window, selected
window should come on top of the popup window.

Regards,
Saravanan A

"Hans Galema" <notused@notused.nl> wrote in message
news:43d78296@newsgroups.borland.com...
> saravanan wrote:
>
> >    I have 3 child windows in my MDI application.  When a button is
clicked
> > on first child, i will display a MODAL form.  Since the invoked form is
> > MODAL, i could not able to operate on any of the child form.  Is there
any
> > way to override this ?  I need to operate on other 2 child form.  In
other
> > words, Form that invokes the modal form should alone be blocked and all
> > other child windows should be operatable. How to do this ?
>
> Do not show that form modal but make FormStyle fsStayOnTop and
use ->Show().
>
> Disable that child. Enable again when the fsStayOnTop is closed:
>
>
> //fsMDIChild
> void __fastcall TForm3::Button1Click(TObject *Sender)
> {
>       TForm4 *Form = new TForm4(this );
>
>       Enabled = false;
>
>       Form->Show();
> }
>
> //fsStayOnTop
> void __fastcall TForm4::FormCloseQuery(TObject *Sender, bool &CanClose)
> {
>    TForm *Form = dynamic_cast<TForm*>(Owner);
>
>    if ( Form )
>       Form->Enabled = true;
> }
>
//--------------------------------------------------------------------------
-
>
> void __fastcall TForm4::FormClose(TObject *Sender, TCloseAction &Action)
> {
>    Action = caFree;
> }
>
> Hans.