更新时间：2024-06-17 21:15
allocmem函数是指在堆中分配指定字节的内存块，并将分配的每一个字节初始化为 0。函数原型如下：
功 能: 分配DOS存储段
用 法: int allocmem(unsigned size, unsigned *seg);
程序例:
注意：在使用完成后使用FreeMemory释放
函数
首部 function AllocMem(Size: Cardinal): Pointer;
功能 返回一个指定大小Size的内存块
说明 配合用FreeMem释放资源
参考 function System.GetMem
例子
///////Begin AllocMem
procedure TForm1.Button1Click(Sender: TObject);
var
I: PInteger;
begin
I := AllocMem(SizeOf(Integer));
I^ := 100;
Edit1.Text := IntToStr(I^);
FreeMem(I, SizeOf(Integer));
end;