int aim_size=0;
try
{
int Edit1_size=Edit1->Text.ToInt();
aim_size=Edit1_size;
}
catch(...)
{return;}
int k_1024=1024*aim_size;
if (!OpenDialog1->Execute())
return;
String file_name=OpenDialog1->FileName;
if(file_name=="")
Button2Click(Sender);
if(!FileExists(file_name)) file://文件有效
{ShowMessage("无效文件");
return;}
String file_path=ExtractFilePath(file_name);//文件路径
// String file_ext =ExtractFileExt(file_name); file://文件后缀
String file_Na =ExtractFileName(file_name); file://文件名
try
{
TMemoryStream* pms = new TMemoryStream();//原文件
pms->LoadFromFile(file_name);
pms->Seek(0, soFromBeginning);//定位头部
int sizemem=(pms->Size)/k_1024;//n K