如何才能让一个窗口始终位于最上层,不被其他窗口所遮挡。这个问题以前我解决过,但是现在是在想不起来了。

解决方案 »

  1.   

    TForm.FormStyle属性设置为fsStayOnTop
      

  2.   

    setwindowpos(handle,HWND_TOPMOST,0,0,0,0,0);
      

  3.   

    Form1.FormStyle属性设置为fsStayOnTop应该就可以了
      

  4.   

    试试这两种方法:
    1。
    SetWindowPos(Form1.handle, HWND_TOPMOST,Form1.Left, Form1.Top, Form1.Width, Form1.Height,0);
    2。
    Public
      procedure Createparams(Var Params:TCreateParams);override;
    ...procedure TFormDrop.Createparams(var Params:TCreateParams);
    begin
      Inherited CreateParams(Params);
      With Params do
      begin
       EXStyle:=ExStyle or WS_EX_TOPMOST OR WS_EX_ACCEPTFILES or WS_DLGFRAME
       wndParnet:=GetDesktopWindow;  
      end;
    end;
      

  5.   

    silverwonder(刷卡太快请重刷)的第2中方法最好!