最近要修改一个程序，问一个属性问题?
unit Board;
private
m_RunSimu: Boolean; //模拟模式
m_Running: Boolean; //长时间动作过程中
public
property RunSimu: Boolean read m_RunSimu write m_RunSimu; //这两句代码中read, write意思？
property Running: Boolean read m_Running; // Running - read - m_Running关系
end;
[解决办法]
比如说你定义了一个类：
TAbc=Class(TObject)
private
m_RunSimu: Boolean; //模拟模式
m_Running: Boolean; //长时间动作过程中
public
property RunSimu: Boolean read m_RunSimu write m_RunSimu; //这两句代码中read, write意思？
property Running: Boolean read m_Running; // Running - read - m_Running关系
end;
然后你在程序的其他地方定义了一个TAbc变量：
var
Abc: TAbc;
R: Boolean;
begin
Abc:=TAbc.Create;
Abc.RunSimu:=True;
{这时：Abc对象的私有域m_RunSimu就变成True,因为write m_RunSimu;}
R:=Abc.RunSimu;
{这时R为True,因为Boolean read m_RunSimu;
....
end;
[解决办法]
property RunSimu: Boolean read m_RunSimu write m_RunSimu; //这两句代码中read, write意思？
表示RunSimu 可读写
property Running: Boolean read m_Running; // Running - read - m_Running关系
Running属性取m_Running的值
