其他

假如有這樣一串文本: AAA1 BBB2 AA11 BB22 A111 B222 AAAA可以用運算式: [A-Za-z]+\d+ 提取到前六個字串. 測試代碼:uses RegularExpressions;procedure TForm1.FormCreate(Sender: TObject);var Regex: IRegex; { RegularExpressions 提倡使用 IRegex 而不是 TRegex} Match: IMatch; { IMatch

剛接觸 Delphi 時, 曾以為 Pi 是個常量; 當我知道它是個函數時, 曾被觸動.但 Pi 返回的不過是占 10 個位元組的 Extended 類型, 後來竟發現一些對象也這樣幹, 譬如:function Clipboard: TClipboard; { Clipbrd }function Printer: TPrinter; { Printers }function Languages:

主要成員有: IRegex、ICapture、IMatch、IMatchCollection、IGroup、IGroupCollection先看: ICapture; 常用的 IMatch、IGroup 都是從它繼承而來; 作為一個底層介面一般不會被直接使用.它為 IMatch、IGroup 提供了三個屬性: Index、Length、Value; 還有一個 ToString 方法也是擷取 Value.IMatchCollection、IGroupCollection 分別是

當前程式所有可用的環境變數 = 系統內容變數 + 使用者環境變數 + 當前程式環境變數.以前列出過一些, 但不全: http://www.cnblogs.com/del/archive/2009/02/22/1396164.html"系統內容變數" 與 "使用者環境變數" 在: 我的電腦 -> (右鍵)屬性 -> 進階 -> 環境變數;"當前程式所有可用的環境變數" 在: IDE 菜單 -> Tools -> Options -> Environment

儘管 GDI+ 已經有近 10 年的曆史(隨 Win2000 推出), 儘管 DirectX 如日中天, 但在 Windows 7 之前的版本下進行 2D 繪圖還是離不開它, 微軟也沒有停止對它的升級, 隨 Vista 的 GDI 版本是 1.1(6.0.xxxx.x), 新增了 Blur 等功能.不過 Win7 已經有了 Direct D2D1, Delphi 也同步有了 Direct2D 支援; 這是可以代替 GDI+ 的東西, 但聽說 D2D1 可以很好地與 GDI+ 結合.之前我在

//IRegex 的屬性與方法 IRegex.GetGroupNames; { 子運算式編號數組, 譬如有兩個子運算式, 會得到 0,1,2; 這基本無用 }IRegex.GetGroupNumbers; { 同上, 只是擷取的是整數數組 }IRegex.GroupNameFromNumber(); { 應該是從子運算式編號擷取子運算式的名稱; 但沒有實現, 來回都是編號 }IRegex.GroupNumberFromName(); { 同上一個是反著的;

想學 TClientDataSet 是在 2009 年 5 月, 但當時學不動; 現在好了, 有源碼了(DBClient.pas).希望這次學習能對其記憶體協調方式有所瞭解, 順便學點資料庫的知識.TClientDataSet 是一個記憶體資料集(說"資料表"對不住它), 其記憶體資料可存取到本地(*.cds 或 *.xml 格式).用 TDBGrid 可方便查看其記憶體資料, 但需要用資料來源組件(如: TDataSource)橋接一下:TDBGrid.DataSource ←

TIFF 與 GIF 是多幀映像; GIF 還可以關聯時間形成動畫.在編碼或解碼多幀映像的過程中會用到下面兩個常數值:FrameDimensionPage (用於 TIFF)FrameDimensionTime (用於 GIF)GDI+1.0 不能編碼 GIF 動畫; 但都能解析.解析 TIFF 多頁映像的例子:uses GdiPlus;procedure TForm1.FormDblClick(Sender: TObject);var Image: IGPImage; Graphics:

問題來源: http://www.cnblogs.com/del/archive/2010/01/07/1641084.html#1742127程式使用了 GDI+ 的新介面: http://www.cnblogs.com/del/archive/2009/12/11/1621790.htmluses GdiPlus;procedure TForm1.Button1Click(Sender: TObject);const Path1 = 'C:\Temp\Test.png'; Path2 =

TClientDataSet.Data { 資料的二進位格式的描述 }TClientDataSet.XMLData { 資料的 XML 格式的描述 }//先在表單上放置 ClientDataSet1、Memo1 和三個按鈕uses XMLDoc, IOUtils; { 分別提供 FormatXMLData 和 TFile.ReadAllText 函數 }{ 設定目前的目錄 }procedure TForm1.FormCreate(Sender: TObject);begin ChDir(

這包括://屬性IGPBitmap.Pixels; { 擷取或設定指定像素的顏色 }//方法IGPBitmap.SetResolution(); { 設定解析度 }IGPBitmap.GetHBitmap(); { 建立 GDI 格式的 Bitmap 並返回控制代碼 }IGPBitmap.GetHIcon; { 建立 Icon 檔案並返回控制代碼 }IGPBitmap.LockBits(); { 鎖定對象中記憶體中的像素資料 }IGPBitmap.

//放置控制項: ClientDataSet1、DataSource1、DBGrid1、Button1, 然後procedure TForm1.Button1Click(Sender: TObject);begin { 添加欄位 } with ClientDataSet1.FieldDefs.AddFieldDef do begin Name := 'ID'; DataType := ftInteger; end; with

TGraphic 是 TBitmap 的父類, 很多繪圖函數的參數是 TGraphic, 但我們經常給函數的是 TBitmap;TBitmap 的很多功能都是繼承自 TGraphic, 譬如:Width、Height、LoadFromFile、SaveToFile、LoadFromStream、SaveToStream;還有 Palette(調色盤)、Transparent(是否透明) 等等.TGraphic 實用舉例:var g: TGraphic;begin g :=

以前曾用 GetWindowsDirectory、GetSystemDirectory、GetTempPath 等函數擷取系統熱門檔案夾;也用過 SHGetSpecialFolderLocation、SHGetPathFromIDList 函數擷取過更多常用路徑;但這都不如用 GetEnvironmentVariable 擷取系統變數來得快.//譬如 %WINDIR% 是表示系統目錄的系統變數, 可以這樣擷取:var s: string;begin s :=

這包括://方法IGPMetafile.GetMetafileHeader; { 擷取 Metafile 的 MetafileHeader }IGPMetafile.GetHEnhMetafile; { 擷取增強型 Metafile 的 Windows 控制代碼 }IGPMetafile.PlayRecord(); { 播放單個圖元檔案記錄 }//屬性IGPMetafile.DownLevelRasterizationLimit; { 好像是控制紋理畫刷的解析度用的; 賦於 0

function CopyFileEx( lpExistingFileName: PWideChar; { 源檔案 } lpNewFileName: PWideChar; { 新的目標檔案 } lpProgressRoutine: TFNProgressRoutine; { 回呼函數; 每複製 64K 調用一次 } lpData: Pointer; { 給回呼函數的參數 } pbCancel:

問題來源: http://www.cnblogs.com/del/archive/2009/01/09/1373051.html#1743248procedure TForm1.Button1Click(Sender: TObject);var Bits: array[0..5] of TBitmap; { 假定有 6 張相同大小的圖片需要拼合 } i,n,x,y: Integer; { n 用作列數; x,y 用作位置}begin n := 3; { 假如每行排

IGPMatrix 矩陣 是個介面, 要通過 TGPMatrix 執行個體化後使用, 其內建了很多方法和屬性.TGPColorMatrix 只是一個結構體, 除了矩陣資料(5*5)外, 它只有一個方法: TGPColorMatrix.SetToIdentity.通過 SetToIdentity 方法可初始化矩陣, 初始化後的資料是:┏ ┓┃1 0 0 0 0┃┃0 1 0 0 0┃┃0 0 1 0 0┃┃0 0 0 1 0┃┃0 0 0

IGPImageAttributes 的方法:SetWrapMode() { 設定環繞模式 }這是 IGPImageAttributes 中出了 Clone 以外唯一個和顏色不相關方法.SetThreshold()、SetThreshold() { 設定、取消 "閾值" }取值範圍: 0..1假如設定閥值為 0.5, 那麼超過 128 的紅色都變為 256, 少於 128 的紅色都變為 0;綠色、藍色也是如此.

表單上放一個 BitBtn1, 設定其屬性 Kind 的值為 bkClose; 然後運行看看...結果是: 不僅自動更改了標題、表徵圖, 並且還真的有了關閉視窗的功能.實話說, 這之前我不知道這個小功能.TBitBtn 的 Kind 屬性對應的是一個枚舉:TBitBtnKind = (bkCustom, bkOK, bkCancel, bkHelp, bkYes, bkNo, bkClose, bkAbort, bkRetry, bkIgnore, bkAll);再試其他值,