已知TFomr3是父窗體TFomr5是子窗體燎procedureTForm3.Button1Click( );beginForm5:=TForm5.Create(Self);Form5.Visible:=True;Form5.Caption:='yes';Form5:=TForm5.Create(Self);Form5.Visible:=True;Form5.Caption:='no';end;