Область видимости объекта. [D6, 2000]
pathfinder © (2006-09-02 14:31:00)
Подскажите пожалуйста, почему поле SomeValue доступно для
непосредственного изменения, несмотря на то, что я его в private
запихал? Разве оно теперь не должно быть доступно только через
свойство value?
type TMyObject=class
private
SomeValue: Integer;
procedure SetSomeValue(Value: Integer);
published
property Value: Integer read SomeValue write
SetSomeValue;
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
MyObject.SomeValue:=StrToInt(Edit3.Text);
end;
Ketmar (2006-09-02 14:31:00) [1]
все поля доступны в том же самом модуле кому угодно. из
другого моделя -- не сможешь. rtfm.
Наверх 
ЧАТ |
Орешник |
|
