加密问题：怎样用DES加密？

现在需要对文字或文件进行DES加密，可是这方面的资料比较少，所以不得要领。请高手指点：
1、需要独立的加密单元，最好不要用控件！
2、如用Cipher控件，请帮忙介绍控件用法。它自带的例子看不懂。最好有一个简单的例程，让S1-->S2,由明文变成密文。本题因规则所限，只能给100分，如能解决问题，可以另外给分(分数有的是)。目前本人有 CRYPTOV1.ZIP和Cipher.ZIP  两个控件，但CRYPTOV1无法编译，Cipher比较复杂，无法应用。我已参考论坛中以下贴子：
十万火急！！！哪儿我可以得到Des加密算法的Pascal源码？立即给分！（sinoman）
http://www.csdn.net/Expert/TopicView1.asp?id=845770求能在Delphi6下编译的RSA或DES加密算法源程序（dreamgoal）
http://www.csdn.net/Expert/TopicView1.asp?id=585308请问DELPHI中如何实现DES加密算法？
http://www.csdn.net/Expert/TopicView1.asp?id=557005
 
急需要问……在DELPHI中如何实现DES加密算法？（hoeung）
http://www.csdn.net/Expert/TopicView1.asp?id=557000关于des加密的ecb、cbc模式的问题？？？？（bjseesea）
http://www.csdn.net/Expert/TopicView1.asp?id=546453请问各位兄弟、姐妹们，谁有或谁见过哪个网上有des加密控件，本人急用啊！！！
http://www.csdn.net/Expert/TopicView1.asp?id=544396那为能发给我一份des加密控件thank you（josephlong）
http://www.csdn.net/Expert/TopicView1.asp?id=512472