卓航论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 207|回复: 2
打印 上一主题 下一主题

用C++ Builder设计实现文件切割机

[复制链接]
[至尊红钻5级]发帖数量≥8000篇 [未点亮至尊黄钻]威望不足10点 [未点亮至尊蓝钻]在线时间不足10小时 [未点亮至尊绿钻]贡献度不足10点 [至尊紫钻4级]金币≥20000个 [未点亮至尊粉钻]精华贴数不足10贴 [未点亮至尊黑钻]活跃不足8个
 等级: 
 级别: 论坛元老
 UID:  7   [未点亮普号显示]钻石不足3个
 阁 分: 36567
 阁 望: 0
 阁 献: 0
 活 跃: 0
 发 贴: 12405 (0)
 阁 币: 24162  
性 别: I'm 火星人!
阅读权限: 90
在线时长: 0 小时
注册时间: 2016-10-16
最后登录: 2016-10-18
go
楼主
发表于 2016-10-17 16:31:21 |只看该作者 |倒序浏览
本帖发表于 2016-10-17 16:31:21...阅读 208 人...加油,亲爱的楼主:[db:作者]
一、程序设计原理
我们知道文件之所以能够被分割是因为所有文件都是以二进制的形式存储的,然后再根据文件系统的相应规定来进行读取处理。我们基于这个原理,把所有类型的文件都以二进制进行读写,合并时再以二进制的格式把分割后的文件重新重新组合起来,这样就实现了对文件的分割与合并。
二、程序设计过程及祥解
1.我们先在c++ builder 中新建一个工程,存盘并命名工程文件为fgj.bpr,命名单元文件为filefgj.h。
2.在该工程中分别加入DriveComboBox、DirectoryListBox、FilterComboBox、FileListBox1(以上几个控件位于win3.1组件框中)再添加一个ComboBox组合框、添加三个EDIT组件、添加一个ListBox1列表框、添加5个位图按钮组件BitBtn、添加一个进度条ProgressBar1、添加三个文字标签Label。各项设置如下图
-----------------------------------------------------------------------------

-----------------------------------------------------------------------------
打开filefgj.h 头文件,在 private: // User declarations后面添加如下变量
int FileHandle; // 文件名柄变量
int FileLength; file://源文件大小变量
int num; file://源文件被分割后的文件数目
int iBytesRead; file://
char *pszBuffer;//
int buf; // 文件缓冲区变量
int buf1;//文件缓冲区变量
双击FileListBox组件编写该组件的响应事件如下:
void __fastcall TForm1::FileListBox1Change(TObject *Sender)
{
Edit1->Text=FileListBox1->FileName;
Edit3->Text=FileListBox1->FileName+'0';
buf=((ComboBox1->Text).ToInt());
buf1=buf*1024l;
FileHandle=FileOpen(Edit1->Text, fmOpenRead);
FileLength=FileSeek(FileHandle,0,2);
num=FileLength/buf1+1;
Edit4->Text="分割成"+IntToStr(num)+"个文件";
FileClose(FileHandle);
ListBox1->Items->Clear();
for (int i=1;iItems->Add(ChangeFileExt(Edit3->Text,"."+IntToStr(i)));
}
}
file://-------------------------------------------------------------
               
双击ComboBox1组件编写如下响应代码:(并把OnChange、OnEnter的响应代码也设为该段代码)
void __fastcall TForm1::ComboBox1Click(TObject *Sender)
{
buf=(ComboBox1->Text.ToInt());
buf1=buf*1024l;
num=FileLength/(buf*1024L)+1;
Edit4->Text=num;
ListBox1->Items->Clear();
for (int i=0;i {
ListBox1->Items->Add(ChangeFileExt(Edit3->Text,"."+IntToStr(i)));
}
}
file://---------------------------------
双击切割按钮编写切割按钮的响应函数如下:
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
if (FileLengthMax=num;//初始化进度条
ProgressBar1->Position=1;
int i=1;
pszBuffer = new char [buf1]; file://设置读写文件缓冲区
int temp=buf1;
for (i=1;iText,fmOpenRead); file://打开文件名柄
FileSeek(FileHandle,buf1*(i-1),0);
if (FileRead(FileHandle, pszBuffer,temp)!=temp) ShowMessage("Read error!");
FileClose(FileHandle);
ProgressBar1->Position=i;
Label5->Caption="已进行:"+AnsiString(ProgressBar1->Position*100/num)+"";
int Handle=FileCreate((ChangeFileExt(Edit3->Text,"."+IntToStr(i))));
if (FileWrite(Handle,pszBuffer,temp)!=temp) ShowMessage("Write error!");
FileClose(Handle);
}
ProgressBar1->Position=1;
Label5->Caption="完成分割";
file://------------------------------------ 生成合并文件时的自动批处理文件代码
AnsiString name="/b";
for (int i=num;i>=1;i--)
{
AnsiString nn=ChangeFileExt(Edit3->Text,"."+IntToStr(i));
if (ExtractFileName(FileListBox1->FileName).Length()>12)
{nn=ExtractShortPathName(FileListBox1->FileName);
nn=ChangeFileExt(nn,"."+IntToStr(i));
}
if (i==1)
{name=ExtractFileName(nn)+name;}
else
{
name="/b+"+ExtractFileName(nn)+name;}
}
AnsiString hbbat="copy "+name+" "+ExtractFileName(FileListBox1->FileName);
fstream file;
file.open(ChangeFileExt(Edit3->Text,".bat").c_str());
file
双击"关于程序"位图按钮编写"关于程序"的响应代码如下:
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
ShellAbout(Handle,"","\n明臣文件切割机(V1.00) 版权所有(C)马明臣\n地址:黑龙江省五大连池市统计局 2002.6\n联系电话:6322348 Email:MMC@0451.com",NULL); file://利用api函数显示版板信息
}
双击"退出程序"位图按钮编写"退出程序"的响应代码如下:
void __fastcall TForm1::BitBtn3Click(TObject *Sender)
{
Close();
}
分享到: QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏0 支持支持0 反对反对0

使用道具 举报

[至尊红钻2级]发帖数量≥100篇 [未点亮至尊黄钻]威望不足10点 [未点亮至尊蓝钻]在线时间不足10小时 [未点亮至尊绿钻]贡献度不足10点 [未点亮至尊紫钻]金币不足100个 [未点亮至尊粉钻]精华贴数不足10贴 [未点亮至尊黑钻]活跃不足8个
 等级: 
 级别: 注册会员
 UID:  67   [未点亮普号显示]钻石不足3个
 阁 分: 158
 阁 望: 2
 阁 献: 9
 活 跃: 0
 发 贴: 140 (0)
 阁 币: 5  
性 别: I'm 火星人!
阅读权限: 20
在线时长: 5 小时
注册时间: 2011-1-6
最后登录: 2016-10-21
沙发
发表于 2016-10-19 16:44:13 |只看该作者
本回复帖发表于 2016-10-19 16:44:13,感谢luckyboy123对本帖的认真回复,你的回复是对楼主莫大的鼓舞
路过,支持一下啦

使用道具 举报

[至尊红钻2级]发帖数量≥100篇 [未点亮至尊黄钻]威望不足10点 [未点亮至尊蓝钻]在线时间不足10小时 [未点亮至尊绿钻]贡献度不足10点 [未点亮至尊紫钻]金币不足100个 [未点亮至尊粉钻]精华贴数不足10贴 [未点亮至尊黑钻]活跃不足8个
 等级: 
 级别: 注册会员
 UID:  28   [未点亮普号显示]钻石不足3个
 阁 分: 156
 阁 望: 3
 阁 献: 4
 活 跃: 0
 发 贴: 141 (0)
 阁 币: 5  
性 别: I'm 火星人!
阅读权限: 20
在线时长: 4 小时
注册时间: 2011-1-6
最后登录: 2016-10-21
板凳
发表于 2016-10-21 22:37:55 |只看该作者
本回复帖发表于 2016-10-21 22:37:55,感谢b7823282对本帖的认真回复,你的回复是对楼主莫大的鼓舞
有道理。。。

使用道具 举报

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

1、请认真发帖,禁止回复纯表情,纯数字等无意义的内容!帖子内容不要太简单!
2、提倡文明上网,净化网络环境!抵制低俗不良违法有害信息。
3、每个贴内连续回复请勿多余3贴,每个版面回复请勿多余10贴!
4、如果你对主帖作者的帖子不屑一顾的话,请勿回帖。谢谢合作!

手机版| 百度搜索:vkee.pw

2012-2015 卓航旗下 GMT+8, 2024-6-16 10:53 , Processed in 1.176639 second(s), 30 queries . Powered by Discuz! X3.2  

禁止发布任何违反国家法律、法规的言论与图片等内容;本站内容均来自个人观点与网络等信息,非本站认同之观点.如遇版权问题,请及时联系站长(QQ:5213513)

今天是: | 本站已经安全运行: //这个地方可以改颜色

快速回复 返回顶部 返回列表