unit FreeVision.Resource; {$DEFINE FPC_DOTTEDUNITS} {$i resource.pas}