Delphi中如何能实现类似Java的这样功能？
即，既声明了一个类，又能定义其操作方法，同事还能保护类成员
Java code:
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);
}
}
其中，【
public int getAge() {
return Age;
}
public void setAge(int age) {
Age = age;
}
】
完全可以简洁地 用property一行代码予以实现
你的意思是用 property Age：age Read FAge Write FAge 这样？
然后引用的时候直接就是
stu ： Student;
stu.FAge:= 10;
OtherVar:=stu.Fage;
相关问答：
我在模块里自定义了一个函数:stradd()
可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...
这个问题有什么办法可以解决的吗? 非常感激!
(在A ......
就是一个服务端和一个客户端，里边有一些共用单元 ，我在 工程的SEARCH PATH里设置的路径，
里边有个结构体，我在服务端打开，加了成员，但是我在客户端其他单元访问不到我新加的，我在客户端打开那个单元，确实加� ......
由于客戶端有的文件經常更新（遠程的，不是局域網），
所以想寫個自動更新的 程序。
看網上的 方法資料，知道些方法，但不知道具體怎么寫。
......
delphi 2007 + access 2007 +odbc +TADODataset,TADOConnection,TADOCommand
//删除数据
procedure TCDSSelectTools.DeleteMachine(byMachineID: string);
tmpCmd := TADOCommand.Create(ni ......
各位高手赶快帮帮忙。
现在有一个delphi写的dll，函数中有PInteger的返回参数，在delphi中可以正常调用，但是我在vb里写的时候就不知道该怎么来调用了。
请看代码
以下是delphi中的函数定义和调用代码，能正常运� ......
