boolean ohne variable?

[Pseudemys Nelsoni]

hi,

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  fs : TFileStream;
  DataSize : Word;
  DataType : Word;
  CurEntry : record
    Header : record
      Tag : array[0..3] Of Char;
      EntryType : Word;
      Size : Word;
    end;
    case boolean of
      true:   (Value : DWORD; Junk: array[0..1023] of Char);
      false : (Str : array[0..1023] of Char);
  end;
  CurInfo : String;
  CurJunk : array[0..1023] Of Char;
begin
  //...
end;

ich habe 2 fragen hierzu, ersteinmal: wieso hat das "case" hier kein "end;" ? und zweitens wie funktioniert der boolean in dem case, er hat ja gar keine variable? O_o