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

谈谈Delphi中的类和对象1---介绍几个概念&&对象是一个地地道道的指针 ...

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

参考:http://blog.163.com/liang_liu99/blog/static/88415216200952123412180/

以下的介绍主要针对的是Delphi的面向对象的知识,可能和C++、Java、PHP……其他面向对象的编程语言有一些出入 

 

一、介绍几个概念

  说到类和对象,我们不能不提及这样几个概念:类、对象、实例。谈谈“我”的简单理解

  对象指的是泛称,自然界的任何实体都可以看成是一个对象

  类是以这些对象某些特征而分成的一系列的种类

  实例则是特质属于某一个类的一个对象

  例子:

var
    ABtn: TButton;

  ABtn是属于TButton类的一个对象,但是ABtn不能输是一个实例,因为它还没有创建,所以我么说这是定义了一个对象,如果说定义了一个实例,多多少少有一些不够确切

  要想创建一个实例(也就是在内存中实际创建一个存在的类的实例),参见

var
    ABtn: TButton;    //这并没有创建一个类的实例
begin
    ABtn:= TButton.Create(Self);    //这才是创建了一个实例,这才真正在内存中存在
    ABtn.Caption:= 'Button';
    ABtn.Free;    //这是将创建的实例释放(Free先判断这个对象实例ABtn是否为NIL,再决定是不是调用析构方法Destroy)
end;

  

二、对象变量是一个地地道道的指针

  从物理角度看,对象就是一段地址空间,这段地址空间的标志就是我们定义的类“变量”。所以我们可以把对象变量看成是一个类的指针(指向内存中的真正的对象实体或者为nil)。

  大家也知道,要想访问一个指针,必须要对指针初始化。对象既然是一个指针,也必须对它进行初始化。

  如何对对象初始化呢?还是先看看指针的初始化吧。对于一个指针可以有以下两种方法进行初始化

1)直接分配

var
    Pint: ^Integer;
begin
    New(Pint);
    Pint^ := 12;    
    DisPose(Pint);
end;

2)指向别的已分配空间的变量

var
    Pint: ^integer;
    i: Integer;
begin
    i:= 12;
    Pint:= @i;
end;

  有趣的是,对象这种“指针”也有两种方法初始化

1)直接分配

var
    AForm: TForm;
begin
    AForm:= TForm.Create(Self);
    AForm.ShowModal;
    AForm.Free;
end;

2)指向别的已经分配空间的实例

var
    AForm: TForm;
begin
    AForm:= Self;
    AForm.Caption:='???';
end;

  上面这段代码,AForm和它所指向的Form实例共用同一段地址单元,所有对AForm的操作都将反映到它所对应的Form实例之上

 

  说到这里,我们就能很好的解释为什么过程(函数)的对象参数传递时候,有这样的格式

procedure SetEdit(var Edit: TEdit);
begin
    Edit.Text:= '11';
end;

  和

procedure SetEdit(Edit: TEdit);
begin
    Edit.Text:='11';
end;

  这两种方式从最终的效果上来看是一样的。第一种是吧TEdit作为参数引用的形式进行参数传递,第二种是把一个TEdit的对象‘指针’作为参数传递

 


鲜花

握手

雷人

路过

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

请发表评论

全部评论

专题导读
上一篇:
MATLAB 矩阵操作(二)发布时间:2022-07-18
下一篇:
[Machine-Learning] 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