大家好，我是Delphi程序员，现在有个功能需要用批处理完成。
批处理这个刚入门，自己弄了半天实在搞不定，前来求助，渴望得到大家的指点和帮助，先谢谢~
功能描述：
一指定文件夹，内有大量Delphi文件（众所周知，Delphi生成的文件格式有.pas;.dfm;.dcu;.ddp还有.~pas;~.dfm等），想要找出部分将其删除。
查找条件：
存在同名不同扩展名的文件如：a.pas和a.dfm，将其找到并取出文件名a，然后删除a.*即可
若是b.pas，但不存在b.dfm这个时候则不予删除
补充：
查找和删除操作全部都用DOS命令完成，用Delphi写批处理并调用执行后删除之（这个大家不用管）
基本就这些，不明白了我随时补充
再次谢谢大家
批处理这个刚入门，自己弄了半天实在搞不定，前来求助，渴望得到大家的指点和帮助，先谢谢~
功能描述：
一指定文件夹，内有大量Delphi文件（众所周知，Delphi生成的文件格式有.pas;.dfm;.dcu;.ddp还有.~pas;~.dfm等），想要找出部分将其删除。
查找条件：
存在同名不同扩展名的文件如：a.pas和a.dfm，将其找到并取出文件名a，然后删除a.*即可
若是b.pas，但不存在b.dfm这个时候则不予删除
补充：
查找和删除操作全部都用DOS命令完成，用Delphi写批处理并调用执行后删除之（这个大家不用管）
基本就这些，不明白了我随时补充
再次谢谢大家