模态窗口问题

duanya

在界面上显示了一模态窗口,我想在用户点击除模态窗口外的其他部分时,该模态窗口闪烁,不知如何做,请指点!!!

贪财怕死爱瞌睡

unit1.h
//---------------------------------------------------------------------------
class TfmFile : public TForm
{
__published:        // IDE-managed Components
...
private:        // User declarations
...
public:                // User declarations
...
protected:
        void __fastcall CreateParams(Controls::TCreateParams &Params);
};
//---------------------------------------------------------------------------

    unit1.cpp
//---------------------------------------------------------------------------
void __fastcall TfmFile::CreateParams(Controls::TCreateParams &Params)
{
  TForm::CreateParams(Params);
  Params.WndParent=GetActiveWindow();
}
//---------------------------------------------------------------------------