Для чего case нужен в record?

[VintProg]

Для чего case нужен в record,вы наверное замичали в некоторых структурах
есть case,хотелось бы узнать зачем он нужен?

[Utkin]

А где пример? Я не замечал, потому что record'ы для своих нужд пишу сам, а в чужие заглядываю редко (инкапсуляция ).

[SERG1980]

Записи с вариантами

Записи с вариантами
Строго фиксированная структура записи ограничивает возможность ее применения. Поэтому в языке Delphi имеется возможность задать для записи несколько вариантов структуры. Такие записи называются записями с вариантами. Они состоят из необязательной фиксированной и вариантной частей.
Вариантная часть напоминает условный оператор case. Между словами case и of записывается особое поле записи – поле признака. Оно определяет, какой из вариантов в данный момент будет активизирован. Поле признака должно быть равно одному из расположенных следом значений. Каждому значению сопоставляется вариант записи. Он заключается в круглые скобки и отделяется от своего значения двоеточием. Пример описания записи с вариантами:
type
TFigure = record
X, Y: Integer;
case Kind: Integer of
0: (Width, Height: Integer); // прямоугольник
1: (Radius: Integer); // окружность
end;
Обратите внимание, что у вариантной части нет отдельного end, как этого можно было бы ожидать по аналогии с оператором case. Одно слово end завершает и вариантную часть, и всю запись.

[Wicort]

А если несколько кейзов нужно? как они будут разделяться? или дельфа сама поймёт, что если новый кейз встретился, то это уже другое? Или как?

[Квэнди]

Запись бывает с вариантной частью или без нее

[Пепел Феникса]

а на вопрос "зачем?" так никто и не ответил

что есть record по сути?
это область памяти, которая условно разделена на части.(переменные записи)

так вот...с помощью case мы можем определить различное деление этой области памяти на части.

например

A=record
 case integer of
  1:(I:integer); 
  2:(w1,w2:word);
  3:(b1,b2,b3,b4:byte);
end;

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

[OCTAGRAM]

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

А если несколько кейзов нужно? как они будут разделяться? или дельфа сама поймёт, что если новый кейз встретился, то это уже другое? Или как?

В модуле System, кажется, TVarRec был с вложенными case.

[Utkin]

Сообщение от Пепел Феникса

а на вопрос "зачем?" так никто и не ответил

что есть record по сути?
это область памяти, которая условно разделена на части.(переменные записи)

По сути это не область памяти, а способ ее адресации. Информация о размещении информации .

[TAVulator]

эм.. а как это использовать?
вот например есть такой кусок кода:

A=record
 case integer of
  1:(I:integer); 
  2:(w1,w2:word);
  3:(b1,b2,b3,b4:byte);
 end;
end;

и потом я делаю так:

var
B: A;

а вот дальше как присваивать переменной В значения?

[Пепел Феникса]

там end на равне с case лишний...
перепутал с условным оператором
-----------------------------------
например так:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

type
 A=record
  case integer of
   1:(I:integer);
   2:(w1,w2:word);
   3:(b1,b2,b3,b4:byte);
 end;

var
  Form1: TForm1;
  B:A;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
 B.w1:=65000;
 B.w2:=11000;
 ShowMessage(IntToStr(B.I))
end;

end.