我试图使用TWebImageControl和TWebLinkLabel组件将图像链接到网站,我知道我应该使用onClick事件,但如何编写代码才能使链接正常工作?
TWebImageControl
TWebLinkLabel
onClick
aelbi1ox1#
基于TWebLinkLabel,您只需指定有效的URL链接作为其标题的一部分,它会在运行时自动更改为超链接。对于TWebImageControl,您可以指定加载图像的URL。但是如果您想在单击TImageControl时打开不同的图像,则需要使用OnClick事件并提供自定义URL,如Shaun Roselt的回答所示
TImageControl
zd287kbt2#
有两种方法可以链接到网站或打开URL。一种是使用window.open,另一种是使用Application.Navigate。
window.open
Application.Navigate
Application.Navigate函数有两个参数,第一个参数是URL,第二个参数是TNavigationTarget。在新标签页中导航到URL:
TNavigationTarget
Application.Navigate('https://www.bing.com', TNavigationTarget.ntBlank);
字符串导航到同一选项卡中的URL:
Application.Navigate('https://www.bing.com', TNavigationTarget.ntPage);
型
下面是我为window.open编写的一个小函数:
procedure OpenURL(URL: String; NewTab: Boolean = True); begin if NewTab then window.open(URL, '_blank') else window.open(URL, '_self'); end;
型NewTab参数用于指定是在新的浏览器选项卡中打开链接,还是在与网站相同的选项卡中打开链接。因此,如果您希望导航到“https://www.bing.com/“,则可以在onClick事件中编写以下代码来调用该函数:
NewTab
OpenURL('https://www.bing.com', False);
2条答案
按热度按时间aelbi1ox1#
基于TWebLinkLabel,您只需指定有效的URL链接作为其标题的一部分,它会在运行时自动更改为超链接。
对于TWebImageControl,您可以指定加载图像的URL。但是如果您想在单击
TImageControl
时打开不同的图像,则需要使用OnClick事件并提供自定义URL,如Shaun Roselt的回答所示zd287kbt2#
有两种方法可以链接到网站或打开URL。一种是使用
window.open
,另一种是使用Application.Navigate
。应用程序.导航
Application.Navigate
函数有两个参数,第一个参数是URL,第二个参数是TNavigationTarget
。在新标签页中导航到URL:
字符串
导航到同一选项卡中的URL:
型
window.open(示例网站)
下面是我为
window.open
编写的一个小函数:型
NewTab
参数用于指定是在新的浏览器选项卡中打开链接,还是在与网站相同的选项卡中打开链接。因此,如果您希望导航到“https://www.bing.com/“,则可以在
onClick
事件中编写以下代码来调用该函数:型