Rekordy

<font size="12">Często spotykałem się z deklaracjami rekordów typu:

type
  Rek = record
    X: integer;
    Y: integer;
    case Integer of
      0: (
        Width: integer;
        Height: integer;
      1: (
        TopLeft: TPoint;
        BottomRight: TPoint;
        );
  end;

co oznacza poniższa deklaracja:

case Integer of
  0: (
    Width: integer;
    Height: integer;
  1: (
    TopLeft: TPoint;
    BottomRight: TPoint;
    );

do czego służy użycie dyrektywy

case integer of

.
Thx za pomoc.</span>

"jest to część zmienna rekordu (zwana częścią wariantową), odpowiednik union języka C++. Pola umieszczone w tej częsci zajmują ten sam obszar pamięci."

Delphi 6. Vademcum profesjonalisty