unit FreeVision.Validate; {$DEFINE FPC_DOTTEDUNITS} {$i validate.pas}