模式窗口
    form2.ShowModal;
这样只有form2可用,其它的不可用。

解决方案 »

  1.   

    procedure TForm1.AlwaysOnTop(Form: TForm; OnTop: Boolean);
    begin
      if OnTop then
        SetWindowPos(Form.Handle, HWND_TOPMOST, 0, 0, 0, 0,
        SWP_NOMOVE or SWP_NOSIZE)
      else
        SetWindowPos(Form.Handle, HWND_NOTOPMOST, 0, 0, 0, 0,
        SWP_NOMOVE or SWP_NOSIZE)
    end;
      

  2.   

    楼主不是这个意思,他的意思是要使一窗体保持在所有窗体之前,用消息控制的。
    : foreveryday007(foreveryday007)回答的不错。
      

  3.   

    楼主不是这个意思,他的意思是要使一窗体保持在所有窗体之前,用消息控制的。
    : foreveryday007(foreveryday007)回答的不错。
      

  4.   

    用showmodal
    激活當前窗體,隻有關掉當前窗體才可以操作別的窗體
    用show
    如果要操作別的窗體,它會把當前窗體退到後面