programming-for-dummies

588
Creating Objects
Type
Classname = CLASS
PRIVATE
Variablename : datatype;
PROCEDURE name (paramater list);
FUNCTION name (parameter list) : datatype;
PUBLIC
Variablename : datatype;
PROCEDURE name (paramater list);
FUNCTION name (parameter list) : datatype;
END;
Any procedure or function declarations defined in a class must be fully
defined outside the class.
Anything defined under the PRIVATE section represents methods and properties
that only the object can use. Anything defined under the PUBLIC section
represents methods and properties that other parts of the program can
access within that object.
After you define a class, you can create an object from that class by declaring
a variable as a new class type, such as
Var
Objectname : Classname;
Object Pascal allows only single inheritance — a new class can inherit features
from a single class. To create a new class from an existing class, use the
CLASS keyword and include the name of the class to inherit from, such as
Type
Classname = CLASS (classToInheritFrom)
PRIVATE
Variablename : datatype;
PROCEDURE name (paramater list);
FUNCTION name (parameter list) : datatype;
PUBLIC
Variablename : datatype;
PROCEDURE name (paramater list);
FUNCTION name (parameter list) : datatype;
END;