VFP中超鏈接實(shí)現(xiàn)方法

字號(hào):

超級(jí)鏈接功能可以使程序具備直接訪問(wèn)Internet的能力,不少優(yōu)秀的軟件都提供直接訪問(wèn)Internet的功能。
    如金山詞霸2000在它的系統(tǒng)桌面上提供互聯(lián)網(wǎng)資源;Microsoft的應(yīng)用程序在其幫助菜單中提供Microsoft on the Web,這都是在系統(tǒng)內(nèi)部直接訪問(wèn)Internet的典型例子。
    為了在應(yīng)用程序中實(shí)現(xiàn)直接訪問(wèn)Internet功能,只要能在程序中控制啟動(dòng)Internet瀏覽器即可。在Visual 6.0(以下簡(jiǎn)稱VFP6.0)中,我們可以很容易地實(shí)現(xiàn)這一功能,這要使用VFP6.0的“超級(jí)鏈接”控件。首先介紹一下這個(gè)控件。
    一、“超級(jí)鏈接”控件簡(jiǎn)介
    “超級(jí)鏈接”控件(Hyperlink)是VFP6.0新增的一個(gè)標(biāo)準(zhǔn)的表單控件,它運(yùn)行時(shí)不可視,主要有以下幾個(gè)程序方法可供調(diào)用:
    GoBack:向后執(zhí)行歷史記錄列表中的超級(jí)鏈接跳轉(zhuǎn)。  GoForward:向前執(zhí)行歷史記錄列表中的超級(jí)鏈接跳轉(zhuǎn)。  NavigateTo:向指定的目標(biāo)執(zhí)行超級(jí)鏈接跳轉(zhuǎn)。
    通過(guò)以上三個(gè)程序方法我們就可以很方便地在程序中實(shí)現(xiàn)超級(jí)鏈接功能。其中主要使用NavigateTo程序方法。它的使用格式是:Object.NavigateTo(cTarget),參數(shù)cTarget指定要定位的URL。
    二、在表單中實(shí)現(xiàn)超級(jí)鏈接
    在表單上添加一個(gè)“超級(jí)鏈接”控件,然后再添加一個(gè)命令按鈕,在命令按鈕的 Click 事件中通過(guò)調(diào)用“超級(jí)鏈接”控件的NavigateTo方法來(lái)啟動(dòng)Internet瀏覽器并實(shí)現(xiàn)向目標(biāo)地址的跳轉(zhuǎn)。也可以通過(guò)一個(gè)圖片或一個(gè)標(biāo)簽的Click事件來(lái)實(shí)現(xiàn)這種跳轉(zhuǎn)。
    下面給出一個(gè)用命令按鈕來(lái)啟動(dòng)超級(jí)鏈接的實(shí)例:
    (1)新建一個(gè)表單(Form1),屬性設(shè)置如下:
    AutoCenter = .T.
    Caption=”在表單中使用超級(jí)鏈接”
    (2)通過(guò)表單控制工具欄在Form1上添加一個(gè)超級(jí)鏈接控件(Hyperlink1)和一個(gè)命令按鈕Command1 ,設(shè)置Command1的Caption屬性為:“鏈接到計(jì)算機(jī)世界網(wǎng)站”。
    (3)在Command1的Click Event事件中寫入代碼:ThisForm.HyperLink1.NavigateTo("www.computerworld.com.cn")
    (4)保存表單Form1,然后運(yùn)行這個(gè)表單,當(dāng)單擊“鏈接到計(jì)算機(jī)世界網(wǎng)站”這個(gè)命令按鈕時(shí),就會(huì)啟動(dòng)Internet 瀏覽器并直接鏈接到http://www.computerworld.com.cn站點(diǎn)。