不解问题1:请高手帮忙?

Question

如何在Delphi中加入网页,同是调用窗体?

Answer 1

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, OleCtrls, SHDocVw, StdCtrls;type
  TfrmMain = class(TForm)
    Button1: TButton;
    Button2: TButton;
    WebBrowser1: TWebBrowser;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  frmMain: TfrmMain;implementationuses Unit2; //<-form2 uses{$R *.dfm}procedure TfrmMain.Button1Click(Sender: TObject);
begin
form2.Show;
end;procedure TfrmMain.Button2Click(Sender: TObject);
Var
WebBrowser1:TWebBrowser;
begin
WebBrowser1:=TWebBrowser.Create(self);
WebBrowser1.Top:=0;
WebBrowser1.Left:=0;
WebBrowser1.Show;
end;end.