VirtualAlloc 分配的內存是以 4K 為最小單位、連續的內存地址(但映射到真實的內存時它不一定是連續的), 前面說了, 它不適合分配小內存(譬如只

一個使用私有堆的例子:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, Clas

本例在建立一個新的堆前後分別通過 GetProcessHeaps 函數獲取了當前進程的堆句柄列表, 沒想到一個最簡單的程序也有 5 個堆.　　效果圖:unit

　本例效果圖:　　unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, Classe

　最近要寫個小程序, 用到 mp3 播放; 因為需要非常復雜的控制與功能, 想到了 Bass.dll.　　以前我曾以為 Bass.dll 是 Windows

Delphi 2009 中使用需要修改一下 Bass.pas 中 BASS_DEVICEINFO 結構的定義, 不然會亂碼://把BASS_DEVICEINF

//播放前先要用 BASS_Init 函數進行播放設備初始化function BASS_Init(　device: Integer; {指定輸出設備, 第一個

//獲取文件流的長度, 單位是字節function BASS_ChannelGetLength(　handle: DWord; {流句柄}　mode: DWo

本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, Cl

　本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, C

　本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, C

本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, Cl

　本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, C

本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, Cl

　本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, C

本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, Cl

本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, Cl

　本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, C

本例效果圖:　　代碼文件:unit Unit1;interfaceuses　Windows, Messages, SysUtils, Variants, Cl

//畫筆var　g: TGPGraphics;　p: TGPPen;begin　g := TGPGraphics.Create(Canvas.Handle);