form的显示问题

Question

我建立一个主窗体，在主窗体上放一个timer，建立三个form：A，B，C
要求：主窗体作后台数据处理，三个form分别在timer的ontime事件时轮流显示，
问：主窗体和A，B，C应怎样设置，有详细的做法，有代码更好。谢谢！！！

Answer 1

implementationvar
  fTag: Integer = 0;{$R *.dfm}procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if fTag = 0 then
  begin
    fTag := 1;
    A.Visable := true;
    B.Visable := false;
    C.Visable := false;
  end
  else if fTag = 1 then
  begin
    fTag := 2;
    ...
  end
  else
  begin
    fTag := 0;
    ...
  end;
end;

Answer 2

to weizi2000(秋风啊):我按你的做了，但为什么显示A时,主窗口显示在上面,按一下A窗口就可以不显示主窗口,应如何解决。我不想把A,B,C的Formstyle设置成Stayontop，请帮忙！

Answer 3

你把a，b，c窗体设为子窗体就没事啦

Answer 4

to shun3(天使鬼差)：主窗体是后台处理数据，不用显示的，应该怎样隐藏呀？我隐藏不了。
to qingenerp(真爱不息) ：设置子窗体，主窗体就会显示呀。

Answer 5

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if form2.Visible=true then begin
  form2.Close;
  form3.Show end else
  if form3.Visible=true then begin
  form3.Close;
  form4.Show end else begin
  form4.Close;
  form2.Show;
  end;

Answer 6

在上面的timer中加入 form1.hide;
就可以隐藏了