Ptr

Combine segment and offset to pointer

Declaration

Source position: systemh.inc line 1228

  function Ptr(sel: LongInt; off: LongInt) : FarPointer;

Description

Ptr returns a pointer, pointing to the address specified by segment Sel and offset Off.

Remark

In the 32/64-bit flat-memory model supported by Free Pascal, this function is obsolete. The returned address is simply the offset. !!!

Errors

None.

See also

Name Description
Addr Return address of a variable

Example

Program Example59;
{ Program to demonstrate the Ptr (compatibility) function. }
type pString = ^String;
Var P : pString;
    S : String;
begin
  S:='Hello, World !';
  P:=pString(Ptr(Seg(S),Longint(Ofs(S))));
  {P now points to S !}
  Writeln (P^);
end.