unit1.cpp.~1~

来自「自己用c++builder做的一个rar调用进行压缩的程序.」· ~1~ 代码 · 共 26 行

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{ char str[128];
 AnsiString   zip="   a  -r -hpyyb520  D:\\1.rar D:\\随心\\*.*";
 ShowMessage(zip);
 HANDLE Han=ShellExecute(Handle,"open","C:\\Program Files\\WinRAR\\Rar.exe",zip.c_str(),NULL,SW_SHOW);
 GetWindowText(Han,str,128);
  ShowMessage(str);
}
//---------------------------------------------------------------------------