文档章节

理解 Delphi 的类(六) - 认识类的封装

涂孟超
 涂孟超
发布于 2014/09/26 15:37
字数 248
阅读 9
收藏 0
//这个类中的两个字段没有封装
  TMyClass1 = class
    FName: string;
    FAge:  Integer;
  end;

  //这个类中的两个字段封装了, 外部不能读写
  TMyClass2 = class
    private
      FName: string;
      FAge:  Integer;
    //public
  end;

  //那怎么读写? 用属性啊
  TMyClass3 = class
  private
    FName: String;
    FAge: Integer;
    procedure SetAge(const Value: Integer);
    procedure SetName(const Value: String);
  published
    property Name: String  read FName write SetName;
    property Age:  Integer read FAge  write SetAge;
  end;
  {
    现在 TMyClass3 中的两个字段: FName、FAge 和两个方法: SetAge、SetName
    都被封装在私有区(private)内, 不允许外部读写, 只能是内部使用.

    不过, private 的封装在本单元内是无效的!
    现在好了, 有了 strict 标识符.
  }

  //这个封装好了, 在 private 前加了 strict ; 现在除了自己谁也访问不了私有区.
  TMyClass4 = class
  strict private
    FName: String;
    FAge: Integer;
    procedure SetAge(const Value: Integer);
    procedure SetName(const Value: String);
  published
    property Name: String  read FName write SetName;
    property Age:  Integer read FAge  write SetAge;
  end;

  {封装的目的就是隐藏实现细节、保证数据安全}

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/01/11/1034528.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
关于C++类静态成员在Delphi中实现的思考

关于C++类静态成员在Delphi中实现的思考   没有用过Version 7 以后的Delphi版本,即便5、6、7版本,我也不能够说了解较深。因此,本文可能杞人忧天。   一、为什么需要静态成员    比如...

geek_loser
2014/11/11
0
0
VC++之MFC的五大批判

VC++之MFC的五大批判 写在本文之前算起来,我用Visual C++也有将近5年的历史了。在这期间,我也曾涉猎过Visual Basic和Delphi,但都是浅尝而止;Visual C++始终是我的主业。可是努力的成果如...

长平狐
2013/01/06
187
0
C#高性能大容量SOCKET并发(一):IOCP完成端口例子介绍

原文:C#高性能大容量SOCKET并发(一):IOCP完成端口例子介绍 例子主要包括SocketAsyncEventArgs通讯封装、服务端实现日志查看、SCOKET列表、上传、下载、远程文件流、吞吐量协议,用于测试S...

杰克.陈
2017/12/06
0
0
框架的认识

参考:框架的认识 框架: 1.是什么:框架就是一套规范。既然是规范,你使用这个框架就要遵守这个框架所规定的约束。在Java开发中,框架是用一套规则 + 一群jar包来表示的。 内容理解:框架是...

ioufev
2016/11/14
65
0
集成开发环境--Delphi

Delphi,是美国Borland(宝兰)公司於1995年开发在Windows平台下的快速应用程式开发工具(Rapid Application Development,简称RAD),它的前身是在DOS下的产品Borland Turbo Pascal。(非开源...

匿名
2009/03/11
21K
1

没有更多内容

加载失败,请刷新页面

加载更多

window.parent,top,window.self,parent,opener

在应用有frameset或者iframe的页面时,parent是父窗口,top是最顶级父窗口(有的窗口中套了好几层frameset或者iframe),self是当前窗口, opener是用open方法打开当前窗口的那个窗口。 wind...

inidcard
9分钟前
1
0
Linux下Redis的安装和部署

一、Redis介绍 Redis是当前比较热门的NOSQL系统之一 它是一个key-value存储系统。和Memcache类似,但很大程度补偿了Memcache的不足,它支持存储的value类型相对更多,包括string、list、set...

曾大大胖
13分钟前
1
0
开源堡垒机jumpserver搭建

概述 之前说了国产良心kodexplorer,今天再说一个国内比较好的开源项目jumpserver,除此之外还可以的国内开源项目我觉得就是宝塔面板了。废话不多说上教程搭建。 虽然说你可以看下面的教程不...

bboysoulcn
18分钟前
2
0
iPhoneX 底部距离

iPhoneX 底部距离 CGFloat adjust = 0; if (@available(iOS 11.0, *)) { //Account for possible notch UIEdgeInsets safeArea = [[UIApplication sharedApplication] keyWindow].safeAreaIn......

壹峰
22分钟前
2
0
养生篇01 (饭水分离法)

作者简介❤李祥文,1939年出生于韩国庆尚北道尚州市成昌邑。 24岁时,偶遇奇人习得这种分别喝水吃饭的养生方法,从而治好了自己的胃病和哮喘。从此,李祥文对饮食之于人体的影响产生了极大的...

十九亿少女的梦
38分钟前
6
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部