批處理如何批量修改文本內容karaoke := CreateKaraokeObject;karaoke.internalnumber := 00000000;// 歌曲編號karaoke.rows := 2;karaoke := CreateKaraokeObject;karaoke.clear;// 歌曲附加信息(便于檢索)karaoke.tag('歌名', '點滴(HD720)');karaoke.tag('縮寫', 'DD');karaoke.tag('歌手', 'SUPPER_MOMENT');karaoke.tag('字數', '2');karaoke.tag('語種', '粵語');karaoke.tag('歌類', '合唱');karaoke.tag('電影', 'false');karaoke.tag('風格', '影視插曲');karaoke.tag('流行', 'true');karaoke.tag('音量', '70');karaoke.tag('聲道', '21');karaoke.tag('FMP聲道', '32');karaoke.tag('語音', '0');karaoke.tag('介質', '0');karaoke.tag('時間', '-12-20');karaoke.tag('歌星拼音', '');karaoke.tag('原音', '29');karaoke.tag('伴音', '29');karaoke.tag('歌詞', '');karaoke.tag('亮度', '50');karaoke.tag('對比度', '50');karaoke.tag('飽和度', '50');karaoke.tag('標識', 'MTV');karaoke.mtvmode :=true;karaoke.videofilename := '';karaoke.audiofilename := '*.wav';karaoke.XSDVideoMode := 4;karaoke.CommonVideo := '4900001.mpg';能不能做個批處理，把多個文件夾下的KSC文件刪掉這部分，文本1：karaoke := CreateKaraokeObject;karaoke.internalnumber := 00000000;// 歌曲編號karaoke.rows := 2;karaoke := CreateKaraokeObject;karaoke.clear;文本2：karaoke := CreateKaraokeObject;karaoke.internalnumber := 945875;// 歌曲編號karaoke.rows := 2;karaoke := CreateKaraokeObject;karaoke.clear;完成后的效果是：// 歌曲附加信息(便于檢索)karaoke.tag('歌名', '點滴(HD720)');karaoke.tag('縮寫', 'DD');karaoke.tag('歌手', 'SUPPER_MOMENT');karaoke.tag('字數', '2');karaoke.tag('語種', '粵語');karaoke.tag('歌類', '合唱');karaoke.tag('電影', 'false');karaoke.tag('風格', '影視插曲');karaoke.tag('流行', 'true');karaoke.tag('音量', '70');karaoke.tag('聲道', '21');karaoke.tag('FMP聲道', '32');karaoke.tag('語音', '0');karaoke.tag('介質', '0');karaoke.tag('時間', '-12-20');karaoke.tag('歌星拼音', '');karaoke.tag('原音', '29');karaoke.tag('伴音', '29');karaoke.tag('歌詞', '');karaoke.tag('亮度', '50');karaoke.tag('對比度', '50');karaoke.tag('飽和度', '50');karaoke.tag('標識', 'MTV');karaoke.mtvmode :=true;karaoke.videofilename := '';karaoke.audiofilename := '*.wav';karaoke.XSDVideoMode := 4;karaoke.CommonVideo := '4900001.mpg';