unit FreeVision.Pmode; {$DEFINE FPC_DOTTEDUNITS} {$i pmode.pas}