摘要: 类成员的可见性是对该类的使用者而言。在声明一个类时,类可以被分为 5 个区域,用以下 5 个 关键字标识: private, protected, public, published, automated 。 所有的类成员都被放置在不同的区域里,不同区域的类成员具有不同的可见性。如果类的定义和类的使用者在同一个单元内,那么该类的所有成员无论位于哪个区域,对于使用者而言都是可见的。 一个类对于相同单元的其他类来说,类似于 C++中的“友类”,其所有成员都可以被访问。因此,类成 员的可见性设置只是在它们位于不同单元时,才是有效的。这时候,区域内成员的可见性规定如下: (1) private 域:. 阅读全文
posted @ 2011-04-12 23:25 吴越 阅读(1686) 评论(0) 推荐(0) 编辑
摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) btn1: TButton; procedure btn1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;//TMyClass1 类里面只有两个字段(变量来到类里面称做字段) 阅读全文
posted @ 2011-04-12 23:14 吴越 阅读(399) 评论(0) 推荐(0) 编辑
摘要: ----------------------------------------------------------------结构方法type TRec = record {定义结构 TRec} name: string[12]; age: Word; function RecShow: string; {在结构中只能使用静态方法} end;{ TRec 结构方法的实现}function TRec.RecShow: string;const str = '%s今年%d岁了';begin Result := Format(str, [name,age]);end;//使用结构p 阅读全文
posted @ 2011-04-12 16:21 吴越 阅读(265) 评论(0) 推荐(0) 编辑
摘要: 结构指针指针 指针是存放指定类型(或未定义类型)变量内存地址的变量,因此指针间接引用一个值。定义指针不需用特定的关键字,而用一个特殊字符,这个特殊字符是脱字符号(^),见下例:type PointerToInt = ^Integer;一旦你定义了指针变量,你就可以用@ 符号把另一个相同类型变量的地址赋给它。见下例:var P: ^Integer; X: Integer;begin P := @X; // change the value in two different ways X := 10; P^ := 20; 如果定义了一个指针P,那么P表示指针所指向的内存地址,而P^表示内存所存储的 阅读全文
posted @ 2011-04-12 16:17 吴越 阅读(241) 评论(0) 推荐(0) 编辑
摘要: 广电的“无奈”成就别人的“美梦”2011-3-11 18:01:00 DVBCN数字电视中文网 人气(2274) 作者:海生 来源: DVBCN数字电视中文网刚刚在美国拉斯维加斯结束的CES2011展会,是个眼花缭乱的大秀场,事实上一场风生水起的战争在悄然打响。2月8-10日在迪拜举行的Cabsat2011(中东和北非地区的广播电视与卫星电视展览会)国内广电企业更给力,据DVBCN最新统计大概超过60家企业参加Cabsat2011,其实早在Cabsat2004年中东迪拜之行,就有同洲、创维、成功、高斯贝尔、四川视频、珠海中大、深圳迈威、江苏银河等30多家国内广电企业参展。每一年的展会都像一个风 阅读全文
posted @ 2011-04-12 15:06 吴越 阅读(254) 评论(0) 推荐(0) 编辑
摘要: 记录类型记录类型用于定义不同类型数据项的固定集合。记录中每个元素,或者说域,有它自己的类型。记录类型定义中列出了所有域,每个域对应一个域名,通过域名可以访问它。下面简单列举了记录类型的定义、类型变量的声明以及这类变量的使用:type Date = record Year: Integer; Month: Byte; Day: Byte; end; var BirthDay: Date; begin BirthDay.Year := 1997; BirthDay.Month := 2; BirthDay.Day := 14;类和对象可以看作是记录类型的扩展。Delphi 库趋向于用类替代记录类型 阅读全文
posted @ 2011-04-12 11:05 吴越 阅读(300) 评论(0) 推荐(0) 编辑