我是一个新手,我想做这么一个顺序:在一个PAGEContorl里面放一个BUTTON,又有一个WebBrowser,我想先只显示一个button,按一下button之后button消失,webBrowser出现,请问怎么才能做到,或是以其他什么办法来实现这一效果,谢谢。

解决方案 »

  1.   

    如下unit Unit1;interfaceuses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, StdCtrls, OleCtrls, SHDocVw;type
      TForm1 = class(TForm)
        Button1: TButton;
        WebBrowser1: TWebBrowser;    procedure Button1Click(Sender: TObject);
        procedure FormShow(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;var
      Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
    begin
      Button1.Visible := False;
      WebBrowser1.Show;
    end;procedure TForm1.FormShow(Sender: TObject);
    begin
      WebBrowser1.Navigate('www.csdn.net');
      WebBrowser1.Hide;
    end;end.