delphi里面怎样新建一个类

在 delphi 里面新建一个类，可以使用 type 关键字进行定义，以下是代码示例：

type

  TNewClass=Class  //继承自某类： Class(TObject)

    Private

       {私有声明}

    Protected

       {保护声明}

    Public

       Procedure MyProcedure()

       {公有声明}

  end

function Tusertable.GetuserPwd(UserName:string):string

begin

end

类成员函数要加上类名的

---