delphi7中的指针

1.指针分为3中，一种是普通的，一种是无类型的，一种是标准的（系统预定义的）；

下面直接以案例来说明他们的用法；

program Project1;

{$APPTYPE CONSOLE}
type
Pint = ^Integer;
var
a,b:Integer;
pi:pint; //自定义指针
p:Pointer; //通用指针
begin
a:=5;
b:=6;
pi:=@a;
Writeln('pi的值为:',pi^);
p:=@b;
{通用指针在使用的时候需要转换类型}
Writeln('p的值为:',Integer(p^));
pi:=p;
Writeln('pi的值变为:',pi^);
{
快速复制的方法：
shift + 向上键
ctrl + c;
ctrl + v;
}
Readln;
end.