unit System.Classes;
{$DEFINE FPC_DOTTEDUNITS}
{$i classes.pp}