• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

delphi中指针操作符^的使用

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

  To see how pointers work, look at the following example.
1    var
2      X, Y: Integer;   // X and Y are Integer variables
3      P: ^Integer;     // P points to an Integer
4    begin
5      X := 17;         // assign a value to X
6      P := @X;         // assign the address of X to P
7      Y := P^;         // dereference P; assign the result to Y
8    end;
  Line 2 declares X and Y as variables of type Integer. Line 3 declares P as a
pointer to an Integer value; this means that P can point to the location of X or
Y. Line 5 assigns a value to X, and line 6 assigns the address of X (denoted by
@X) to P. Finally, line 7 retrieves the value at the location pointed to by P
(denoted by ^P) and assigns it to Y. After this code executes, X and Y have the sa
me value, namely 17.The @ operator, which we have used here to take the address
of a variable, also operates on functions and procedures. For more information,
see The @ operator and Procedural types in statements and expressions.

  The symbol ^ has two purposes, both of which are illustrated in our example.
When it appears before a type identifier--^typeName--it denotes a type that represents
pointers to variables of type typeName. When it appears after a pointer variable
--pointer^--it dereferences the pointer; that is, it returns the value stored at the
memory address held by the pointer.Our example may seem like a round about way of
copying the value of one variable to another--something that we could have accomplished
with a simple assignment statement. But pointers are useful for several reasons.
First, understanding pointers will help you to understand the Delphi language, since
pointers often operate behind the scenes in code where they don't appear explicitly.
Any data type that requires large, dynamically allocated blocks of memory uses pointers.
Long-string variables, for instance, are implicitly pointers, as are class instance variables. Moreover, some advanced p
rogramming techniques require the use of pointers.Finally, pointers are sometimes the
only way to circumvent Delphi's strict data typing. By referencing a variable with an
all-purpose Pointer, casting the Pointer to a more specific type, and then dereferencing
it, you can treat the data stored by any variable as if it belonged to any type.
For example, the following code assigns data stored in a real variable to an integer variable.
type
  PInteger = ^Integer;
var
  R: Single;
  I: Integer;
  P: Pointer;
  PI: PInteger;
begin
  ...
  P := @R;
  PI := PInteger(P);
  I := PI^;
end;
  Of course, reals and integers are stored in different formats. This assignment
simply copies raw binary data from R to I, without converting it.In addition to
assigning the result of an @ operation, you can use several standard routines to
give a value to a pointer. The New and GetMem procedures assign a memory address
to an existing pointer, while the Addr and Ptr functions return a pointer to a
specified address or variable.Dereferenced pointers can be qualified and can function
as qualifiers, as in the expression P1^.Data^.The reserved word nil is aspecial
constant that can be assigned to any pointer. When nil is assigned to a pointer,
the pointer doesn't reference anything.


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
matlab 使用deeplearning Toolbox出现索引错误发布时间:2022-07-18
下一篇:
matlab练习程序(灰度、二值图像腐蚀膨胀)发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap