Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.09.24;
Скачать: CL | DM;

Вниз

Область видимости объекта.   Найти похожие ветки 

 
pathfinder   (2006-09-02 14:31) [0]

Подскажите пожалуйста, почему поле 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) [1]

все поля доступны в том же самом модуле кому угодно. из другого моделя -- не сможешь. rtfm.



Страницы: 1 вся ветка

Текущий архив: 2006.09.24;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.028 c
15-1157101702
TUser
2006-09-01 13:08
2006.09.24
Для школьников


3-1153734684
LexXL
2006-07-24 13:51
2006.09.24
дайте кусок :)


15-1157131916
Dbn
2006-09-01 21:31
2006.09.24
Проблема с компом, точнее с подключеним в интернет.


2-1157308879
иван8511
2006-09-03 22:41
2006.09.24
Матричный принтер


2-1157266373
PWD
2006-09-03 10:52
2006.09.24
Скопировать прямоугольную область с одного TBitmap в другой