Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.09.24;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.043 c
15-1157456068
H010d Freeze
2006-09-05 15:34
2006.09.24
Build проекта из командной строки


4-1148280287
Чапаев
2006-05-22 10:44
2006.09.24
PID -> ExeName


1-1155223411
Destroyer
2006-08-10 19:23
2006.09.24
Сохранение состояния компонентов на форме


15-1157135989
Marser
2006-09-01 22:39
2006.09.24
Опрос. Лицензионное профессиональное ПО дома


4-1148487663
GrBob
2006-05-24 20:21
2006.09.24
Как службой поймать момент подключения пользователя





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский