Delphi TWebBrowser连接到本地设备失败
你好,我有一个非常简单的Twebbowser程序。我想访问IP范围为192.168.192.xxx的本地网络上的设备。 我可以通过chrome浏览器访问设备,但程序中的浏览器除外 抛出错误页: “无法访问此页面 确保网址正确无误 在Bing上搜索此网站 刷新页面。“ 这是Delphi代码:Delphi TWebBrowser连接到本地设备失败,delphi,twebbrowser,Delphi,Twebbrowser,你好,我有一个非常简单的Twebbowser程序。我想访问IP范围为192.168.192.xxx的本地网络上的设备。 我可以通过chrome浏览器访问设备,但程序中的浏览器除外 抛出错误页: “无法访问此页面 确保网址正确无误 在Bing上搜索此网站 刷新页面。“ 这是Delphi代码: unit Main; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.
unit Main;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.OleCtrls, SHDocVw, Vcl.StdCtrls,
Vcl.ExtCtrls;
type
TForm1 = class(TForm)
txtAddress: TEdit;
cmdLoad: TButton;
WebBrowser1: TWebBrowser;
Panel1: TPanel;
cmdName: TButton;
procedure FormCreate(Sender: TObject);
procedure cmdLoadClick(Sender: TObject);
procedure cmdNameClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
End;
var
Form1: TForm1;
implementation
{$R *.dfm}
{ TForm1 }
procedure TForm1.cmdLoadClick(Sender: TObject);
begin
WebBrowser1.Navigate(txtAddress.Text);
end;
procedure TForm1.cmdNameClick(Sender: TObject);
begin
WebBrowser1.GoBack;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.Silent := True; //disable java script errors/windows...
end;
end.
谢谢你的帮助。
广告
如果我为设备设置了密码,比如说“12345”,那么问题就解决了。我可以通过URL访问设备的站点。用户名似乎是 例如,武断也会起作用。 感谢所有在这里做出贡献的人,超级!
这与德尔福无关。如果您尝试通过internet explorer浏览,您会得到什么?显示您的chrome浏览器地址框的屏幕截图,以便我们可以查看实际地址您是否尝试了
https
而不是http
?@谁的爸爸在标准浏览器IE和chrome中工作正常请参见上图,谢谢,也许设备正在嗅探用户代理。正如雷米所说,你应该检查交通状况。