C语言中的malloc,free在Pascal中怎么表示？最好能给几个例子。

Question

C语言中的malloc,free在Pascal中怎么表示？最好能给几个例子。

Answer 1

var
  P:^Integer;
begin
  New(P);//malloc
  P^:=143;
  ShowMessage(IntToStr(P^));
  Dispose(P);//free
end;

Answer 2

var p:Pointer;getmem(p,len)
freemem(p)

Answer 3

那在Object Pascal 中有类似于C++中的引用吗？

Answer 4

再帮我看一下这段代码怎么有错误？
program Project1;{$APPTYPE CONSOLE}uses
  SysUtils;type
   pBitNode:^BitNode;
   BitNode=Record
   Data:Char;
   LChild:pBitNode;
   RChild:pBitNode;
end;
begin
  { TODO -oUser -cConsole Main : Insert code here }
end.

Answer 5

pBitNode:^BitNode;
=>
pBitNode=^BitNode;

Answer 6

用标准的API好
  AllocMem  .............

Answer 7

getmem(),freemem() 参数设置delphi的帮助文件里有！

Answer 8

引用就是
例如：
  var
    p:^Integer;
  ...
   new(p);
   p^:=2;//p^就是引用

Answer 9

allocmem,freemem： 自指定数据长度
new,dispose: 定长的数据

Answer 10

var
  pstr:pchr;
begin
  GetMem(pstr,sizeof(char)*100);
  StrCopy(pstr,'Hello world');
  FreeMem(pstr);
end;

Answer 11

malloc--New or GetMem
free--Dispose or FreeMem