摘要: unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.OleCtnrs;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; Button3: TButton; procedure Button1Click(Sender: T 阅读全文
posted @ 2012-07-02 22:48 梦断难寻 阅读(1207) 评论(0) 推荐(0) 编辑
摘要: Delphi的方法类型有:1.静态方法 (Static) 默认类型,可以省略关键字2.虚拟方法 (Virtual)3.动态方法 (Dynamic)4.消息方法 (Message)5.抽象法方 (Abstract)=======================================================1)静态方法[static]静态方法类似于通常的过程和函数,编译器在编译时就已指定了输出该方法的对象实例。静态方法的主要优点是调用速度快。eg:type TAnimal = class(TObject) procedure Sound; procedure Sleep; ... 阅读全文
posted @ 2012-07-02 22:02 梦断难寻 阅读(1257) 评论(0) 推荐(0) 编辑
摘要: unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click( 阅读全文
posted @ 2012-07-02 21:37 梦断难寻 阅读(1373) 评论(0) 推荐(0) 编辑
摘要: 与类相关的保留字Type // 用该保留字声明类TMyForm = Class (TObject) // Class代表定义的是类 ,括号内代表继承,也可以不写。写了TMyForm就是TObject的子类,继承了TObject的所有属性与方法end; //必须使用end;结尾{成员可见性} private // 不可见 protected //派生类可见。 public //可见。 published //可见。用于运行时信息。 automated //可见。用于兼容。end; 阅读全文
posted @ 2012-07-02 20:34 梦断难寻 阅读(645) 评论(0) 推荐(0) 编辑