Почему в приведенном коде переменные видны для всех классов?

@voral · Регистрация: 16.03.2008

Студворк — интернет-сервис помощи студентам

Сегодня объяснял классы сыну. И наткнулся на следующее (и в WDE и в IDE). Почему этот код работает? PascalABC не бдит за private и protected?

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
type 
  A = class
    m0 : integer;
  protected
    m1 : integer;
  private
    m2 : integer;
  public
    m3 : integer;
  end;
var
  oA : A;
begin
  oA := new A;
  writeln(oA.m0,oA.m1,oA.m2,oA.m3);  
  oA.m0 := 1;
  oA.m1 := 2;  
  oA.m2 := 3;    
  oA.m3 := 4;    
  writeln(oA.m0,oA.m1,oA.m2,oA.m3);
end.

@volvo · 16.04.2015, 23:29

В Паскале все, что описано в одном модуле доступно извне вне зависимости от спецификаторов доступа. Выносим описание класса в отдельный модуль:
myunit.pas

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
unit myunit;
 
interface
 
type 
  A = class
    m0 : integer;
  protected
    m1 : integer;
  private
    m2 : integer;
  public
    m3 : integer;
  end;
  
implementation
end.

test.pas

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
uses myunit;
var
  oA : A;
begin
  oA := new A;
  writeln(oA.m0,oA.m1,oA.m2,oA.m3);  
  oA.m0 := 1;
  oA.m1 := 2;  
  oA.m2 := 3;    
  oA.m3 := 4;    
  writeln(oA.m0,oA.m1,oA.m2,oA.m3);
end.

, тогда спецификаторы работают, как ожидалось.

@voral · 16.04.2015, 23:40 **[ТС]**

все заработало как надо......

Новые блоги и статьи Все статьи Все блоги /
Unity 4D GameUnited 13.06.2025 Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .	SSE (Server-Sent Events) в ASP.NET Core и .NET 10 UnmanagedCoder 13.06.2025 Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .	С днём независимости России! Hrethgir 13.06.2025 Решил побеседовать, с утра праздничного дня, с LM о завоеваниях. То что она написала о народе, представителем которого я являюсь сам сначала возмутило меня, но дальше только смешило. Это чисто. . .	Лето вокруг. kumehtar 13.06.2025 Лето вокруг. Наполненное бурями и ураганами событий. На фоне магии Жизни, священной и вечной, неумелой рукой человека рисуется панорама душевного непокоя. Странные серые краски проникают и. . .	Популярные LM модели ориентированы на увеличение затрат ресурсов пользователями сгенерированного кода (грязь -заслуги чистоплюев). Hrethgir 12.06.2025 Вообще обратил внимание, что они генерируют код (впрочем так-же ориентированы разработчики чипов даже), чтобы пользователь их использующий уходил в тот или иной убыток. Это достаточно опытные модели,. . .
Топ10 библиотек C для квантовых вычислений bytestream 12.06.2025 Квантовые вычисления - это та область, где теория встречается с практикой на границе наших знаний о физике. Пока большая часть шума вокруг квантовых компьютеров крутится вокруг языков высокого уровня. . .	Dispose и Finalize в C# stackOverflow 12.06.2025 Работая с C# больше десяти лет, я снова и снова наблюдаю одну и ту же историю: разработчики наивно полагаются на сборщик мусора, как на волшебную палочку, которая решит все проблемы с памятью. Да,. . .	Повышаем производительность игры на Unity 6 с GPU Resident Drawer GameUnited 11.06.2025 Недавно копался в новых фичах Unity 6 и наткнулся на GPU Resident Drawer - штуку, которая заставила меня присвистнуть от удивления. По сути, это внутренний механизм рендеринга, который автоматически. . .	Множества в Python py-thonny 11.06.2025 В Python существует множество структур данных, но иногда я сталкиваюсь с задачами, где ни списки, ни словари не дают оптимального решения. Часто это происходит, когда мне нужно быстро проверять. . .	Работа с ccache/sccache в рамках C++ Loafer 11.06.2025 Утилиты ccache и sccache занимаются тем, что кешируют промежуточные результаты компиляции, таким образом ускоряя последующие компиляции проекта. Это означает, что если проект будет компилироваться. . .

@voral 2856 / 1409 / 255 Регистрация: 16.03.2008 Сообщений: 6,238 Записей в блоге: 2
	16.04.2015, 23:40 [ТС]
	все заработало как надо...... 0

Опции темы