DELPHI中如何实现类？（欢迎探讨，高分回赠）

Question

比如要写一个自行车的类，类的代码写在哪里？怎么组织属性和方法？

Answer 1

type className=Class(ancestorClass)
memberList
end;

Answer 2

新建一个unit单元，在interface下面添加uses语句加入sysutils单元（自定义类一般要加入此单元），在uses语句下面定义类。如下：
type
TBike = class
private
{此处声明私有属性和少数方法}
protected
{此处声明非通用的属性、事件和方法都声明}//能被子类型继承和修改
public
{此处声明通用的属性、事件和方法}
published
{此处声明继承来的属性和事件}
end;
定义好了类的框架后按Ctrl+Shift+C Delphi能在implementation--end.之间自动生成类的方法，你仅在begin--end;之间写入相应的代码就可以了。

Answer 3

定义的话采用上面2位说的，你也可以参考Delphi自带的类说明照猫画虎做一个声明，
然后使用的时候定义一个类引用，例如
AA:TAA;  //AA是类AA的一个引用，
然后使用的时候
  AA:=TAA.create;
之后你就可以使用类AA里定义的属性和方法了
  AA.(属性或者方法)

Answer 4

新建的单元中：
unit interface uses Windows, Classes, Varians, SytUtils;type  TByeCicle = class
  private
    FSize: String;
    FColor: String;
    FType: String;
    procedure SetByeSize(const SizeValue: String);
    function GetByeSize: String;
    procedure SetByeColor(const ColorValue: String);
    function GetByeColor: String;
    procedure SetByeType(const TypeValue: String);
    function GetByeType: String; 
  public
    constructor Create;
    destructor Destory;
    property ByeSize: String read GetByeSize write SetByeSize;
    property ByeColor: String read GetByeColor write SetByeColor;
    property ByeType: String read GetByeType write SetByeType;
    procedure ByeRun;
  end;
//上面的类的定义中只是简单的列出了自行车的属性和方法，肯定还有很多很多属性和方法，我这里只是举个例子。属性和方法需要你自己去理解和抽象。