VPF::Переменные класса видны в создаваемом объекте

Keeper89

Дата 6.2.2010, 20:14 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 9
Всего: 58

Доброго времени суток.

Создаю 2 класса:

Код


 TA1 = class
  private
    FA1: string;
    FB1: Integer;
  public
    constructor Create();
    destructor Destroy; override;
    property A1: string read FA1 write FA1;
    property B1: Integer read FB1 write FB1;
  end;

 TA2 = class
  private
    FA2: TA1;
    FB2: Integer;
  public
    constructor Create();
    destructor Destroy; override;
    property A2: TA1 read FA2 write FA2;
    property B2: Integer read FB2 write FB2 ;
  end;

Далее создаю экземпляр TA1 в переменной FA2:

Код


FA2 := TA1.Create;

При этом в FA2 оказываются доступны как специально заготовленные свойства A1 и B1, так и приватные переменные класса FA1 и FB1.

Может я что-то путаю, но разве приватные переменные должны быть видимы в данном случае? smile

Это сообщение отредактировал(а) Keeper89 - 6.2.2010, 20:16

--------------------

Cogito, ergo sum

Keeper's blog
CnWizards Downloads

user posted image

kami

Дата 6.2.2010, 20:22 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1806
Регистрация: 25.8.2007
Где: Санкт-Петербург

Репутация: 22
Всего: 72

Цитата(Keeper89 @ 6.2.2010, 20:14

)

разве приватные переменные должны быть видимы в данном случае?

Должны. private и protected поля класса видны без ограничений для любого кода в том же модуле.

bems

Дата 6.2.2010, 20:50 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 18
Всего: 88

используй strict private

--------------------

Обижено школьников: 8

Keeper89

Дата 6.2.2010, 22:29 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 9
Всего: 58

kami,
bems,
спасибо!

--------------------

Cogito, ergo sum

Keeper's blog
CnWizards Downloads

user posted image

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »