Pascal-pointer-to-pointer
提供:Dev Guides
パスカル-ポインターへのポインター
ポインターへのポインターは、複数の間接指定またはポインターのチェーンの形式です。 通常、ポインターには変数のアドレスが含まれます。 ポインターへのポインターを定義すると、最初のポインターには2番目のポインターのアドレスが含まれます。これは、以下に示すように、実際の値を含む場所を指します。
ポインターへのポインターである変数は、そのように宣言する必要があります。 例えば、
type
iptr = ^integer;
pointerptr = ^ iptr;
次の例では、概念を説明するだけでなく、アドレスを表示します-
program exPointertoPointers;
type
iptr = ^integer;
pointerptr = ^ iptr;
var
num: integer;
ptr: iptr;
pptr: pointerptr;
x, y : ^word;
begin
num := 3000;
( *take the address of var* )
ptr := @num;
( *take the address of ptr using address of operator @* )
pptr := @ptr;
( *let us see the value and the adresses* )
x:= addr(ptr);
y := addr(pptr);
writeln('Value of num = ', num );
writeln('Value available at ptr^ = ', ptr^ );
writeln('Value available at pptr^^ = ', pptr^^);
writeln('Address at ptr = ', x^);
writeln('Address at pptr = ', y^);
end.
上記のコードをコンパイルして実行すると、次の結果が生成されます-
Value of num = 3000
Value available at ptr^ = 3000
Value available at pptr^^ = 3000
Address at ptr = 45664
Address at pptr = 45680