Типизированная константа: запись с вариантами

@romambler · Регистрация: 27.10.2013

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

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const
  INT_NUM=1;
  RATIO_NUM=2;
  REAL_NUM=3;
  EPS=0.000001;
 
  Type
    number = record
      NumberOk:boolean;
      case T:byte of
        INT_NUM:(intNum:int64);
        RATIO_NUM:(Chisl,Znam:int64);
        REAL_NUM:(RealNum:extended);
    end;
 
  const
  ONE_NUM : number = (NumberOk:true;T:0; intNum:1; Chisl:1; Znam:1; RealNum:1);

определяю константу типа number, но выводит ошибку "Order of fields in record constant differs from declaration", незнаю, где ошибка.... Помогите пожалуйста найти ошибку

@FIL · 20.10.2014, 21:31

Delphi
1
  ONE_NUM : number = (NumberOk:true; T:1; intNum:1);

или

Delphi
1
  ONE_NUM : number = (NumberOk:true; T:2; Chisl:1; Znam:1);

и т.д.

@romambler · 20.10.2014, 21:35 **[ТС]**

а нельзя чтобы intNum,chisl,znam,realnum были в одной константе?

@volvo · 20.10.2014, 21:39

romambler, их физически не может быть в одной константе: запись с вариантами предполагает, что все варианты накладываются один на другой, и в каждый момент времени нужно проверять T, чтобы знать, какой именно из вариантов заполнялся...

@romambler · 20.10.2014, 22:08 **[ТС]**

то есть нужно для intNum,RealNum создавать свою константу?

@Sergio Leone · 21.10.2014, 00:29

romambler, зачем вам запись с вариантами? Используйте обычную запись, без вариантов.

p.s. хотя, на мой взгляд, в Вашей задаче уже нужно класс с методами описывать, а не просто record...

@northener · 21.10.2014, 00:58

Сообщение от UI

в каждый момент времени нужно проверять T, чтобы знать, какой именно из вариантов заполнялся

Вообще-то значение Т никак не влияет на варианты. Кроме случаев, когда это специально оговорено в отдельном протоколе (секретном

.

@volvo · 21.10.2014, 01:21

northener, я не сказал, что оно как-то влияет. Я сказал, что надо его использовать для того, чтобы разобраться, какой из вариантов актуален на данный момент (какой был записан)...

@northener · 21.10.2014, 01:48

Сообщение от UI

northener, я не сказал, что оно как-то влияет.

А я и не имел это в виду. Я только хотел уточнить, что "можно и удобно его использовать для того, чтобы разобраться, какой из вариантов актуален в данном экземпляре записи (какой был записан)..."

Новые блоги и статьи Все статьи Все блоги /
BOINC: 22 года — и всё ещё работает Programma_Boinc 12.03.2026 BOINC: 22 года — и всё ещё работает Дэвид Андерсон написал ретроспективу. Кратко: в 2001 году он ушёл из United Devices, где был CTO, и за несколько месяцев написал ядро BOINC — клиент, сервер,. . .	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .

@romambler 0 / 0 / 0 Регистрация: 27.10.2013 Сообщений: 38
	20.10.2014, 21:35 [ТС]
	а нельзя чтобы intNum,chisl,znam,realnum были в одной константе? 0

@volvo Супер-модератор 33398 / 21508 / 8236 Регистрация: 22.10.2011 Сообщений: 36,906 Записей в блоге: 12
	20.10.2014, 21:39
	romambler, их физически не может быть в одной константе: запись с вариантами предполагает, что все варианты накладываются один на другой, и в каждый момент времени нужно проверять T, чтобы знать, какой именно из вариантов заполнялся... 0

@romambler 0 / 0 / 0 Регистрация: 27.10.2013 Сообщений: 38
	20.10.2014, 22:08 [ТС]
	то есть нужно для intNum,RealNum создавать свою константу? 0

@Sergio Leone 2511 / 1132 / 582 Регистрация: 07.06.2014 Сообщений: 3,286
	21.10.2014, 00:29
	romambler, зачем вам запись с вариантами? Используйте обычную запись, без вариантов. p.s. хотя, на мой взгляд, в Вашей задаче уже нужно класс с методами описывать, а не просто record... 0

@volvo Супер-модератор 33398 / 21508 / 8236 Регистрация: 22.10.2011 Сообщений: 36,906 Записей в блоге: 12
	21.10.2014, 01:21
	northener, я не сказал, что оно как-то влияет. Я сказал, что надо его использовать для того, чтобы разобраться, какой из вариантов актуален на данный момент (какой был записан)... 0