FastWeb之網路文件瀏覽

• 適用平臺：WEB(桌面)

1. 說明

  該範例可實現線上瀏覽文件的功能。目前僅支援PDF檔案的瀏覽。

  通過本範例學習，可以掌握TUgPDFFrame的使用方式。

2. 設計明細

  開啟FastWeb設計器，分別加入下插圖之控制元件。或者點選左上角的[匯入]選擇模板檔案來打開對應模板。

  ①：TUgContainerPanel元件，控制元件名稱為UgContainerPanel01。

  ②：TUgEdit元件，控制元件名稱為UgEdit01。

  ③：TUgFSButton元件，控制元件名稱為UgFSButton01。

  ④：TUgPDFFrame元件，控制元件名稱為UgPDFFrame01。

• UgWebRunFrame屬性設定

  • Align：設定頁面的對齊方式，設定為alClient。

• ①UgContainerPanel01屬性設定

  • Align：設定頁面的對齊方式，設定為alTop。

• ②UgEdit01屬性設定

  • FieldLabel：設定編輯框的欄位標籤顯示的名稱，設定為輸入文件網路地址。
  • FieldLabelWidth：設定編輯框欄位標籤顯示的長度，設定為120。

• ④UgPDFFrame01屬性設定

  • Align：設定頁面的對齊方式，設定為alClient。

3. 程式設計

3.1. 程式初始設定

  該程式無程式初始設定。

3.2. 事件設定

• ③UgFSButton01-OnClick事件

  點選[線上瀏覽]按鈕，下載指定地址的PDF檔案並載入。

//JScript
function UgFSButton01OnClick(sender)
{
  if (UGMM.URLDownloadToFile(UgEdit01.Text,"temp\\sample.pdf") <= 1)
    UgPDFFrame01.PdfURL = "temp/sample.pdf"; 
}

//PasScript
procedure UgFSButton01OnClick(sender: tobject);
begin
  if UGMM.URLDownloadToFile(UgEdit01.Text,'temp\sample.pdf') <= 1 then
    UgPDFFrame01.PdfURL := 'temp\sample.pdf'; 
end;

// Make sure to add code blocks to your code group

4. 運行結果

  使用滑鼠在FastWeb功能表，點選[儲存至資料庫]按鈕，將其儲存至資料庫，點選[除錯運行]確認能夠正常打開。

  在打開的界面中輸入文件的地址，點選[線上瀏覽]按鈕打開PDF檔案並進行瀏覽。