Наследование записей, возможно ли это?

@kotAV · Регистрация: 15.09.2017

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

Ну, есть например программа (рандомный бред, можете не вникать)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
var
  a: record
    input: string;
    output: integer;
    status: boolean;
    b: integer = 1;
    c: real = 1.485;
  end;
  
  b: record
    input: string;
    output: integer;
    status: boolean;
    a: uint64 = 1294723589;
    c: decimal = 1.4855;
  end;
  
  c: record
    input: string;
    output: integer;
    status: boolean;
    a: smallint = 32000;
    b: decimal = decimal.MaxValue;
  end;
  
begin
  readln(a.input);
  readln(b.input);
  readln(c.input);
  if (a.input = c.a.ToString) then
  begin
    a.output:=a.c.Trunc;
  end;
end.

Можно ли выделить input, output и status в одну отдельную запись, что бы наследовать её в записях a,b и c?
Например так:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
var
  _default: record
    input: string;
    output: integer;
    status: boolean;
  end;
  
  a: record(_default)
    b: integer = 1;
    c: real = 1.485;
  end;
  
  b: record(_default)
    a: uint64 = 1294723589;
    c: decimal = 1.4855;
  end;
  
  c: record(_default)
    a: smallint = 32000;
    b: decimal = decimal.MaxValue;
  end;
  
begin
  readln(a.input);
  readln(b.input);
  readln(c.input);
  if (a.input = c.a.ToString) then
  begin
    a.output:=a.c.Trunc;
  end;
end.

Здесь вылетает ошибка: Program1.pas(8) : Ожидался тип
Запись что, не тип? Или такое как-то по-другому делается?

@volvo · 10.04.2018, 23:43

Внимательно читаем хелп про record:

Список отличий между записями и классами приводятся ниже:

1. Запись представляет собой размерный тип (переменные типа запись располагаются на стеке).
2. Записи нельзя наследовать; от записей также нельзя наследовать (отметим, что записи, тем не менее, могут реализовывать интерфейсы). В .NET тип записи неявно предполагается наследником типа System.ValueType и реализуется struct-типом.
3. Если в записи не указан модификатор доступа, то по умолчанию подразумевается модификатор public (все члены открыты), а в классе - internal.

Используйте классы.

Новые блоги и статьи Все статьи Все блоги /
sshd restrictions, ssh access limitations jigi33 26.03.2025 sshd restrictions \| ssh access limitations рестрикции доступа на сервер sshd статья: https:/ / www. golinuxcloud. com/ restrict-allow-ssh-certain-users-groups-rhel	Компиляция C++ с Clang API NullReferenced 24.03.2025 Компиляторы обычно воспринимаются как черные ящики, которые превращают исходный код в исполняемые файлы. Мы запускаем компилятор командой в терминале, и вуаля — получаем бинарник. Но что если нужно. . .	Многопоточное программирование в C#: Класс Thread UnmanagedCoder 24.03.2025 Когда запускается приложение на компьютере, операционная система создаёт для него процесс - виртуальное адресное пространство. В C# этот процесс изначально получает один поток выполнения — главный. . .	SwiftUI Data Flow: Передача данных между представлениями mobDevWorks 23.03.2025 При первом знакомстве со SwiftUI кажется, что фреймворк предлагает избыточное количество механизмов для передачи данных: @State, @Binding, @StateObject, @ObservedObject, @EnvironmentObject и другие. . . .	Моки в Java: Сравниваем Mockito, EasyMock, JMockit Javaican 23.03.2025 Как протестировать класс, который зависит от других сложных компонентов, таких как базы данных, веб-сервисы или другие классы, с которыми и так непросто работать в тестовом окружении? Для этого и. . .
Архитектурные паттерны микросервисов: ТОП-10 шаблонов ArchitectMsa 22.03.2025 Популярность микросервисной архитектуры объясняется множеством важных преимуществ. К примеру, она позволяет командам разработчиков работать независимо друг от друга, используя различные технологии и. . .	Оптимизация рендеринга в Unity: Сортировка миллиона спрайтов GameUnited 22.03.2025 Помните, когда наличие сотни спрайтов в игре приводило к существенному падению производительности? Время таких ограничений уходит в прошлое. Сегодня геймдев сталкивается с задачами совершенно иного. . .	Образование и практика Igor3D 21.03.2025 Добрый день А вот каково качество/ эффективность ВУЗовского образования? Аналитическая геометрия изучается в первом семестре и считается довольно легким курсом, что вполне справедливо. Ну хорошо,. . .	Lazarus. Таблица с объединением ячеек. Massaraksh7 21.03.2025 Понадобилась представление на экране таблицы с объединёнными ячейками. И не одной, а штук триста, и все разные. На Delphi я использовал для этих целей TStringGrid, и то, кривовато получалось. А в. . .	Async/await в Swift: Асинхронное программирование в iOS mobDevWorks 20.03.2025 Асинхронное программирование долго было одной из самых сложных задач для разработчиков iOS. В течение многих лет мы сражались с замыканиями, диспетчеризацией очередей и обратными вызовами, чтобы. . .

@volvo Супер-модератор 33116 / 21412 / 8219 Регистрация: 22.10.2011 Сообщений: 36,746 Записей в блоге: 9
	10.04.2018, 23:43
	Сообщение было отмечено kotAV как решение Решение Внимательно читаем хелп про record: Список отличий между записями и классами приводятся ниже: 1. Запись представляет собой размерный тип (переменные типа запись располагаются на стеке). 2. Записи нельзя наследовать; от записей также нельзя наследовать (отметим, что записи, тем не менее, могут реализовывать интерфейсы). В .NET тип записи неявно предполагается наследником типа System.ValueType и реализуется struct-типом. 3. Если в записи не указан модификатор доступа, то по умолчанию подразумевается модификатор public (все члены открыты), а в классе - internal. Используйте классы. 1

Опции темы

Наследование записей, возможно ли это?

Решение