Delphi如何很好地创建对象？

Question

Delphi中如何能实现类似Java的这样功能？
即，既声明了一个类，又能定义其操作方法，同事还能保护类成员public class Student
{
private String Name ;
private int Age;
private String Addr;

public String getName() {
return Name;
}
public void setName(String name) {
Name = name;
}
public int getAge() {
return Age;
}
public void setAge(int age) {
Age = age;
}
public String getAddr() {
return Addr;
}
public void setAddr(String addr) {
Addr = addr;
} public static void main(String[] args)
{
String stuAddr="";
Student stu = new Student();
stu.setName("张三");
stuAddr = stu.getName();
System.out.println(stuAddr);
}
}

Answer 1

基本的做法就是能实现这样的对象。
TStudent=class
    private
      Name:String;
      Age:int;
      Addr:String;    
    public
      function getName():String;// {
//        return Name;
//    }
...

Answer 2

其中，【
    public int getAge() {
        return Age;
    }
    public void setAge(int age) {
        Age = age;
    }
】
完全可以简洁地 用property一行代码予以实现

Answer 3

你的意思是用  property Age：age Read FAge Write FAge 这样？
然后引用的时候直接就是
  stu ： Student;
  stu.FAge:= 10;
  OtherVar:=stu.Fage;我来调试下，成功就送分

Answer 4

//Fage是外面不能访问的，要用age  stu ： Student; 
  stu.Age:= 10; 
  OtherVar:=stu.age;