lazarus是免费的delphi
拥有和c语言一样的灵活性，见代码:
procedure TForm1.FormCreate(Sender: TObject);
var p:PIntegerArray;
d:pbyte;
begin
//todo 这里做指针初始化
p^[1] := 1; //lazarus 的指针访问非常方便
d[1] := 2; //这个是动态分配内存的单元的访问
end;
在delphi 这是不可以的
另外比如 += *=
bit field struct
等特性，让pascal系重新焕发出青春的光彩。
链接:
http://www.fpccn.com
http://lazarus.freepascal.org