我想实现这样的效果,当点击一个SPEEDBUTTON1,打开一个FORM1,只有关闭FORM1,才能让点击SPEEDBUTTON2打开FORM2

Question

我想实现这样的效果,当点击SPEEDBUTTON1,打开一个FORM1,只有关闭FORM1,才能让点击SPEEDBUTTON2打开FORM2,也就是当前活动窗体只能有一个,关闭掉一个才能打开另一个FORM

Answer 1

FORM1.ShowModal—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————

Answer 2

不想showmodal,要是showmodal我就不问了,还是想SHOW.

Answer 3

boyuanhan ()  和 jakegood(克林顿and布什) 都是我的张号,因为jakegood没分了,所以新声请了一个ID

Answer 4

在button2事件中写
if not assigned(form1) then
  form2.show
else
  showmessage('请关掉form1');

Answer 5

这个简单一些，因为你的是在PANEL4显示的，上边有导航条，左边也有导航条 
                    //自定义过程
procedure TfmMain.Form1Enabled(en:boolean);
var i:integer;
begin
   for i:=0 to mainmenu1.Items.Count-2 do
       mainmenu1.Items[i].Enabled :=en;
   scrollbox1.Enabled:=en;   //上边的导航条
   scrollbox2.Enabled:=en;   //下边的导航条
end;
formcreate:TfmMain.Form1Enabled(false);关闭事件：
TfmMain.Form1Enabled(true);然后在每个窗体里加,ok