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.