*.rar文件用WinRAR软件解压，在Delphi中要实现这一功能，步骤如下：
1.下载为delphi提供的组件
http://www.rarlab.com/rar/TDFUnRar.zip
解压后在src文件夹中有DFUnRar.pas和untUnRar.pas
2.创建dpk工程，加入以上两个文件DFUnRar.pas和untUnRar.pas
编译并安装组件，完成后会在组件栏中有组件DFUnRar1
3.添加组件DFUnRar1到Form1上，在需要解压的地方加入以下代码
with DFUnRar1 do
begin
Directory := ExtractFilePath(Application.ExeName); //解压的目标目录
FileName := 'abc.rar'; //你需要解压的文件名，如果不放在相同目录下，需要设置全路径
Mode := DFRAR_EXTRACT;
OverrideEvent := OR_ALWAYS;
//Password := '文件的密码';
Extract;
end;
就这样，简单的解压功能就实现了。事实上DFUnRar1能做的更多，大家可以参考demo文件夹中的源代码。
