發表文章

目前顯示的是有「Delphi筆記」標籤的文章

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。 ...

用Delphi 2010存取Plurk API 1.0

噗浪有提供一組API可供開發人員存取,目前穩定的版本是1.0版,2.0版也開放測試了,本文是針對1.0版撰寫。 關於API呼叫,Delphi常常是被排擠在外的小眾,熱血的人通常是要自己來啊。

Delphi 2010 寫入UTF8檔案

Delphi 2010還沒完全Unicode化,但是在寫入UTF8檔案方面,和2007版又不太一樣。 Unicode編碼,基於文字檔的檔頭,有以下的檔頭編碼方式: EF BB BF    UTF-8 FE FF     UTF-16/UCS-2, little endian FF FE     UTF-16/UCS-2, big endian FF FE 00 00   UTF-32/UCS-4, little endian. 00 00 FE FF   UTF-32/UCS-4, big-endian.

Delphi 2010 dbExpress 連接MySQL錯誤

使用Delphi 2010的dbExpress元件TSQLConnection連接MySQL 5.5時,一直出現以下的錯誤: Cannot Load LIBMYSQL.dll (error code nnn). The LibMysql.dll library may be missing from the system path or you may have an incompatible version of the library installed. 好吧,遇到問題就是要想辦法處理掉它,查了一下別人的作法,是把libmysql.dll放在Windows目錄的System32下面,我依樣畫葫蘆,結果是失敗.... 真的囧到了....無論我怎麼弄,就是不行。最後是解決了,不過花了我一天的時間orz