对象属性的相互访问问题 ( 积分: 50 )

Y

yanghai0437

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-01

• #1

我定义了如下两个对象
TOBJ1=Class(TObject)
public
x:byte;
procedure xxxxx();
end;
TOBJ2=Class(TObject)
public
y:byte;
procedure mmmmmm();
end;
现在我希望能在 xxxxx()方法中访问obj2的y,在mmmmm()方法中访问obj1的x,怎么做？
是否有其他的方法可以做到，或者可以换个思路处理这种问题，或者我定义的对象就
不正确

 

Y

yanghai0437

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-01

• #2

我定义了如下两个对象
TOBJ1=Class(TObject)
public
x:byte;
procedure xxxxx();
end;
TOBJ2=Class(TObject)
public
y:byte;
procedure mmmmmm();
end;
现在我希望能在 xxxxx()方法中访问obj2的y,在mmmmm()方法中访问obj1的x,怎么做？
是否有其他的方法可以做到，或者可以换个思路处理这种问题，或者我定义的对象就
不正确

 

C

Corn2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-01

• #3

最好不要直接访问X，Y，而通过属性。
可以新建一个对象的实例，通过该实例来访问X或Y

 

Q

qufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-01

• #4

corn2正解

 

Y

yanghai0437

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-15

• #5

多人接受答案了。