Introduction to OOP Chapter 4: Classes and Methods: next previous audio real text

Class Definition in Apple Object Pascal


type
    Suits = (Heart, Club, Diamond, Spade);

    PlayingCard = object
        suit : Suits;
        rand : integer;
    end;
No explicit visibility modifiers. (Will later see syntax for methods).
Intro OOP, Chapter 4, Slide 13