Run het bijvoorbeeld in de nacht terwijl je ligt te slapen
Code: Selecteer alles
var debugOn : Boolean = true;
{check the directories to see if anything changed }
DIR['d:\Content\Music\Breaks\'].Rescan;
// DIR['d:\Content\Music\Drum&Bass\'].Rescan;
DIR['d:\Content\Music\Techno\'].Rescan;
DIR['d:\Content\Music\House\'].Rescan;
DIR['d:\Content\Music\IDM\'].Rescan;
DIR['d:\Content\Music\Mixes\'].Rescan;
DIR['d:\Content\SITE\archives\'].Rescan;
{ now we purge the files from the categories }
CAT['Breaks'].Clear;
// CAT['Drum&Bass'].Clear;
CAT['Techno'].Clear;
CAT['House'].Clear;
CAT['IDM'].Clear;
CAT['Mixes'].Clear;
CAT['Archives'].Clear;
{populate the categories with the updated songs }
CAT['Breaks'].AddDir('d:\Content\Music\Breaks\', False, ipBottom);
// CAT['Drum&Bass'].AddDir('d:\Content\Music\Drum&Bass\', False, ipBottom);
CAT['Techno'].AddDir('d:\Content\Music\Techno\', False, ipBottom);
CAT['House'].AddDir('d:\Content\Music\House\', False, ipBottom);
CAT['IDM'].AddDir('d:\Content\Music\IDM\', False, ipBottom);
CAT['Mixes'].AddDir('d:\Content\Music\Mixes\', False, ipBottom);
CAT['Archives'].AddDir('d:\Content\SITE\archives\', False, ipBottom);