發表文章

目前顯示的是 12月, 2011的文章

HTC Sync 出現錯誤訊息「無法掛載手機內存卡」

圖片
最近更新完HTC Sync軟體後,更新老是失敗,一直出現「無法掛載手機內存卡」訊息,資料同步老是失敗

Delphi TWebBrowser 程式控制捲動、ScrollBar顯示及全頁面

圖片
設定TWebBrowser中網頁的ScrollBar顯示 / 隱藏 顯示時不需設定 (空字串) 隱藏時設字串為「Hidden 」 設為隱藏的例子: X軸:WebBrowser.OleObject.document.body.style.overflowX := 'hidden'; Y軸:WebBrowser.OleObject.document.body.style.overflowY := 'hidden' ; 設定TWebBrowser為全頁面 在放入TWebBrowser元件後,幾乎不太可能整個Web頁的顯示,能全部放在元件中,通常是這種情況: 在某些特殊狀況下,我們是希望即使在TWebBrowser的可見範圍,不是整個網頁的狀況下,TWebBrowser本身還是包括了整個網頁,亦即TWebBrowser的Height和Width二個Property,等同整個網頁的Height和Width。作法如下: 先將TWebBrowser中網頁的ScrollBar設為隱藏 確認網頁已經載入完畢 加入以下程式碼,將TWebBrowser的Height和Width設為等同其顯示網頁的Height和Width WebBrowser.OleObject.Document.Body.LastChild.ScrollIntoView; WebBrowser.Height := StrToInt(WebBrowser.OleObject.Document.Body.scrollHeight); WebBrowser.Width := StrToInt(WebBrowser.OleObject.Document.Body.scrollWidth); WebBrowser.OleObject.Document.Body.FirstChild.ScrollIntoView; TWebBrowser的上下捲動 有時需要程式控制網頁的上下捲動,而不是要使用者去點TWebBrowser的頁面,程式語法如下: i := 100; WebBrowser1.OleObject.Document.ParentWindow.ScrollBy(0, i); 上面的例子為向下捲動100個Pixel。