移动教程:使用Web浏览器组件(iOS和Android)
目录
设计用户界面
选择其中之一: 选择 T工具栏 中的组件 工具选项板 ,并将其放在 表单设计器 . 放下组件后,可以看到 T工具栏 组件。 以下是在Form Designer中设置iOS样式后的屏幕截图: 选择 按钮控件 组件,并将其放置在 T工具栏 . 选择 按钮控件 组件,然后在 对象检查器 ,设置 样式查找 属性到 优先工具按钮 . 这个 优先工具按钮 的样式查找值 按钮控件 添加“后退”按钮标签。 在iOS设备上,标签与下图相似: 有关在多设备应用程序中选择样式的更多详细信息,请参阅 移动教程:使用不同样式的按钮组件(iOS和Android) .
选择 T编辑 组件,并将其放置在 T工具栏 。请确保Edit控件的大小足够宽,以填充 T工具栏 : 选择表单设计器上的“编辑”框,然后在 对象检查器 ,设置 返回键类型 属性到 多恩 ,的 键盘类型 属性到 统一资源定位地址 、和 KillFocusByReturn(按返回) 属性到 真的 . 有关在移动平台中选择最合适的虚拟键盘类型的更多信息,请参阅 为Web浏览器应用程序选择合适的虚拟键盘 .
选择 TWebBrowser(网络浏览器) 组件,并将其放到表单上。 选择表单设计器上的Web浏览器组件,转到 对象检查器 并选择 顾客 对于 排列 属性。
编写事件处理程序以在用户更改编辑控件中的URL时打开网页
实现一种打开网页的通用方法
在TForm1类的私有部分中,声明 打开URL 方法: 德尔福 : 私有的 {私有声明} 程序 打开URL ; C++生成器:
私有的 : //用户声明 空隙 __快速呼叫 打开URL (); 实施 打开URL 方法如下:
德尔福:
程序 T形1 . 打开URL ; 开始 网络浏览器1 . 导航 ( 编辑1 . 文本 ) ; 结束 ;
C++生成器:
空隙 __快速呼叫 T形1 时间: 打开URL () { 网络浏览器1 -> 导航 ( 编辑1 -> 文本 ); }
实现OnChange事件的事件处理程序
通过添加以下代码来完成事件处理程序:
德尔福:
程序 T形1 . 编辑1更改 ( 发件人 : TObject(目标) ) : 开始 打开URL ; 结束 ; C++生成器:
空隙 __快速呼叫 T形1 时间: 编辑1更改 ( TObject(目标) * 发件人 ) { 打开URL (); }
实现后退按钮的事件处理程序
程序 T形1 . 按钮1单击 ( 发件人 : TObject(目标) ) ;
开始
网络浏览器1 . 返回 ;
结束 ;
空隙 __快速呼叫 T形1 时间: 按钮1单击 ( TObject(目标) * 发件人 )
{
网络浏览器1 -> 返回 ();
}
为Web浏览器应用程序选择合适的虚拟键盘
WebBrowser移动代码段
开始|程序| Embarcadero RAD Studio Athens |示例 并导航到 \对象Pascal\Mobile Snippets\WebBrowser 子版本存储库: 您可以在中找到Delphi代码示例。 根据您的RAD Studio版本按名称搜索样本存储库。