实现操作过程提示对话框
【打印文章】
---- 在使用Windows95 进行文件拷贝或者删除操作时,您一定见到过那种具有飞
文件动画的操作过程提示对话框。这一功能的加入不仅使我们能够在操作过程当
中随时取消操作,而且也使文件拷贝或者删除操作变得生动活泼。其实,在使
用Visual C++ 进行应用程序设计时,我们也可以使用下述方法在适当位置加入自
己的操作过程提示对话框。
为每一个操作过程提示对话框创建一个对话框类。为了下面叙述方便,我们
只假设应用程序需要一个操作过程提示对话框并以“CModel”作为对应的对
话框类的名字。
使用Visual C++ 提供的资源编辑器编辑提示对话框,比如加入一些文字说明
和动画等。
在CModel 类的头文件(Model.h) 中,加入两个成员变量,
CWnd* m_pParent; // 指向调用该提示对话框的框架类( 或对话框类),即它
的“父类”int m_nID;// 记录该提示对话框的ID 号
以及下面两个成员函数:
CModel(CWnd* pParent = NULL); // 舍弃原有的构造函数,或者把原函数
修改成这种无模式对话框的构造函数
BOOL Create(); // 该函数将调用创建基类的Create() 函数创建对话框
在Model.cpp 文件中,加入相应函数的实现部分。
CModel::CModel(CWnd* pParent /*=NULL*/)
: CDialog(CModel::IDD, pParent)
{
m_pParent=pParent;
m_nID=CModel::IDD;
//{{AFX_DATA_INIT(CModel)
// NOTE: the ClassWizard will add member initialization here
//}}AFX_DATA_INIT
}
BOOL CModel::Create()
{
return CDialog::Create(m_nID,m_pParent);
}
同时按下Ctrl 和W 键或直接单击工具条上的ClassWizard 按钮,打
开ClassWizard 对话框。在类名(Class name) 列表框中选择该提示对话框类,
在Object IDs 列表框中选择该类的类名后,在消息(Messages) 列表框中选
择PostNcDestroy 消息并双击它,这时ClassWizard 就会在该对话框类中加入
一个PostNcDestroy() 函数。该函数将会在对话框窗口消失后,
由OnNcDestroy() 函数调用。因此,可以在该函数中加入一些扫尾工作,例如
数据传送,释放指针空间等。
void CModel::PostNcDestroy()
{
// TODO: Add your specialized code here and/or call the base class
delete this;
CDialog::PostNcDestroy();
}
在要调用提示对话框类的类的头文件中,先包含(#include)CModel 类的头文
件,再声明一个指向CModel 类的对象的指针,如m_Dlg,并在该类的构造函数
中,加入“m_Dlg = NULL;”一句。然后,在打开和关闭提示对话框的函数中加
入如下一段程序:
if (m_Dlg==NULL) {//如果当前没用提示对话框在活动,就创建一个
m_Dlg = new CModel(this);
m_Dlg->Create();
GetDlgItem(IDC_EXPORT)->EnableWindow(FALSE);
}
else//否则就激活它
m_Dlg->SetActiveWindow();
另外,再在要关闭提示对话框的地方,加入如下语句:
m_Dlg->DestroyWindow();
m_Dlg=NULL;
---- 至此,您已经拥有了自己的过程操作提示对话框。不过,它还不具有动画和
随时取消操作的功能。您不妨尝试着加入这些功能。另外,笔者也曾尝试过用下面
介绍的方法实现过程操作提示对话框。两种方法比较,可谓各有千秋。如果您希望
上面设计的过程提示对话框能够被多个应用程序共享,那么最好把提示对话框作
为独立的进程来调用。但是,当您还希望在提示对话框与调用者之间传输数据的
话,似乎这一部分介绍的实现方法更简洁且更有效。
应用进程实现对其他应用程序的调用
---- 在我们设计的应用程序中,很可能会用到其他应用程序来完成某一特定功
能。例如,当我们为了便于数据的传输而对诸多文件进行压缩和解压缩时,一种作
法是我们自己设计一个这样的压缩/ 解压缩程序,然后以动态链接库(DLL) 或者函
数库的形式由主应用程序调用。但更方便而且高效的作法是利用现有的这方面的
优秀软件,比如ARJ.EXE,并以进程的形式调用它,再在适当时候关闭它。下面将以
上面所述为例,具体介绍后一种方法的实现过程。
在需要调用ARJ.EXE 进行压缩/ 解压缩的类中,创建一个成员函数,不妨称
作CreateBat(),其作用是生成一个批处理文件。由该批处理文件调
用ARJ.EXE,并给出具体压缩/ 解压缩参数。之后,再利用MS-DOS 的DIR 命令生
成一个临时文件,以作为压缩/ 解压缩工作完成的标志。
void CMyCompress:: CreateBat(CString BatPath,CString ArjPath,
CString BatName,CString ArjFileName,
CString TempPath,CString ExitFlag,BOOL out)
{
LPTSTR lpBuffer;
UINT uSize;
HANDLE hHeap;
uSize=(GetCurrentDirectory(0,NULL))*sizeof(TCHAR);
hHeap=GetProcessHeap();
lpBuffer=(LPSTR)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,uSize);
GetCurrentDirectory(uSize,lpBuffer);
//得知当前目录信息,以便根据需要变换目录
if (lpBuffer!=BatPath) //diferent dir
SetCurrentDirectory(BatPath);
CStdioFile f;
CFileException e;
if (!f.Open( BatName, CFile::modeCreate|CFile::modeWrite, &e))
//以BatName的内容创建一个批处理文件
{
AfxMessageBox("不能创建文件"+BatName);
return ;
}
char density[6];
sprintf(density,"%d",mTotalBytes);
---- //mTotalBytes 是由其他函数设定的变量,用于记录用于拷入或拷出文件
的磁盘所具有的最大可用空间
CString Density=density;
CString string;
if (out)//说明是生成做压缩工作的批处理文件
string="arj a -v"+Density;
else //说明是生成做解压缩工作的批处理文件
string="arj e -v"+Density;
string+=" ..\\"+ArjPath+"\\"+ArjFileName+" ";
if (out)
string=string+"..\\"+TempPath+"\\*.* -y -jm\n";
else
string=string+"..\\"+TempPath+"\\ -y -jm\n";
f.WriteString(string);
string="dir >"+ExitFlag+"\n";
f.WriteString(string);
f.Close();
SetCurrentDirectory(lpBuffer);//回复到原来的目录下
}
---- 该函数执行后,将生成一个批处理文件,内容大致是:
---- ARJ A -V1440 压缩后文件的路径名+ 文件名被压缩文件的路径名+ 文件名
-Y -JM
---- DIR > 临时文件名
---- 或者是:
---- ARJ E -V1440 被解压缩文件的路径名+ 文件名解压缩后文件的路径名+ 文
件名-Y -JM
---- DIR > 临时文件名
在需要调用ARJ.EXE 进行压缩/ 解压缩的类中,再创建一个成员函数,不妨称
作RunBat(),其作用是创建和执行进程来运行上述所生成的批处理文件,并
在适当时候撤消进程。
void CMyCompress::RunBat(CString
BatPath,CString fileName,CString ExitFlag)
{
CString lpApplicationName=BatPath+"\\"+fileName;
// 进程执行的应用程序的完全路径名
STARTUPINFO StartupInfo;// 创建进程所需的信息结构变量
GetStartupInfo(&StartupInfo);
StartupInfo.lpReserved=NULL;
StartupInfo.lpDesktop=NULL;
StartupInfo.lpTitle=NULL;
StartupInfo.dwX=0;
StartupInfo.dwY=0;
StartupInfo.dwXSize=200;
StartupInfo.dwYSize=300;
StartupInfo.dwXCountChars=500;
StartupInfo.dwYCountChars=500;
StartupInfo.dwFlags=STARTF_USESHOWWINDOW;
StartupInfo.wShowWindow=SW_HIDE;
// 说明进程将以隐藏的方式在后台执行
StartupInfo.cbReserved2=0;
StartupInfo.lpReserved2=NULL;
StartupInfo.hStdInput=stdin;
StartupInfo.hStdOutput=stdout;
StartupInfo.hStdError=stderr;
LPTSTR lpBuffer;
UINT uSize;
HANDLE hHeap;
uSize=(GetCurrentDirectory(0,NULL))*sizeof(TCHAR);
hHeap=GetProcessHeap();
lpBuffer=(LPSTR)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,uSize);
GetCurrentDirectory(uSize,lpBuffer);
// 得知当前目录信息,以便根据需要变换目录
if (lpBuffer!=BatPath) //diferent dir
SetCurrentDirectory(BatPath);
// 创建进程
if (CreateProcess(lpApplicationName,NULL,NULL,
NULL,FALSE,CREATE_DEFAULT_ERROR_MODE,
NULL,NULL,&StartupInfo,&pro_info))
{
MSG Message;
DeleteFile(ExitFlag);
SetTimer(1,100,NULL);// 设置计时器
Search=TRUE;
while(Search) {
if (::PeekMessage(&Message,NULL,0,0,PM_REMOVE)) {
::TranslateMessage(&Message);
::DispatchMessage(&Message);
}
}
// 进程结束前后的处理工作
DWORDExitCode;
if (!GetExitCodeProcess(pro_info.hProcess,&ExitCode))
AfxMessageBox("GetExitCodeProcess is Failed!");
if (!TerminateProcess(pro_info.hProcess,(UINT)ExitCode))
// 终止进程
AfxMessageBox("TerminateProcess is Failed!");
if (!CloseHandle(pro_info.hProcess))
// 释放被终止进程的句柄
AfxMessageBox("CloseHandle is Failed!");
KillTimer(1);// 撤消计时器
}
else AfxMessageBox("Process Is Not Created!");
SetCurrentDirectory(lpBuffer);// 回复到原来的目录下
}
同时按下Ctrl 和W 键或直接单击工具条上的ClassWizard 按钮,打
开ClassWizard 对话框。在类名(Class name) 列表框中选择需要调用ARJ.EXE
进行压缩/ 解压缩的类,在Object IDs 列表框中选择该类的类名后,在消
息(Messages) 列表框中选择WM_TIMER 消息并双击它,这时ClassWizard 就会
在该类中加入一个OnTimer() 函数。该函数将以一定的时间间隔检查压缩/ 解
压缩程序是否已经执行完毕,即检查作为标志的临时文件是否已经存在,并
及时修改状态变量“Search”,以便通知RunBat() 函数结束进程。
void CMyCompress::OnTimer(UINT nIDEvent)
{
// TODO: Add your message handler code here and/or call default
CFile file;
CFileException Error;
if (file.Open(ExitFlag,CFile::modeRead,&Error)) {
Search=FALSE;
file.Close();
}
}
自编删除目录及其下属文件的函数
---- 高版本的MS-DOS 和Windows 95 都提供了一个可以删除一个或多个目录及其
下属文件和目录的命令,即DeleteTree 命令。然而,无论在MFC 类库还是在Win32 函
数库中,都没有相应的函数与之对应。这样,当我们在自己设计的应用程序中需要
用到DeleteTree 的功能时,自然想到的方法是通过进程调用或者系统调用的方
式( 正如上面部分所述的那样) 调用MD-DOS 或Windows 95 下的DeleteTree 命令。然
而,Win32 函数库已经为我们提供了多种用于文件和目录操作的函数,利用它们不
难设计出自己的DeleteTree() 函数。
---- 读者读到这里,也许会感到有些疑惑,为什么第六部分强调进程调用优于自
我设计的函数,而这一部分又反了过来?是的,在通常情况下,调用应用程序内部
的函数比使用进程或者调用外部函数更灵活并且可以提高执行效率,也便于修
改。所以,象DeleteTree() 这样的功能,利用现有的函数并不难实现,自然就最好
通过内部函数的方式来完成。然而,象设计一个压缩/ 解压缩这样的函数的工作
量,并不比通过进程调用来使用现成品的开销更合算,因为它至少需要我们了解
压缩/ 解压缩的复杂算法,而且调试和维护它也需要一定代价。于是,这个时候,还
是采用“拿来主义”为好。
---- 下面,给出我自己设计的DeleteTree() 函数,仅供参考。
BOOL DeleteTree(CString DirName)
{ //成功:返回TRUE;否则,返回FALSE
BOOL Result;
Result=PreRemoveDirectory(DirName)
&& RemoveDirectory(DirName);
return Result;
}
BOOL PreRemoveDirectory(CString DirName)
{//成功:返回TRUE;否则,返回FALSE
LPTSTR lpBuffer;
UINT uSize;
CString fileName;
HANDLE hHeap;
BOOL result;
HANDLE hFindFile;
WIN32_FIND_DATA FindFileData;
uSize=(GetCurrentDirectory(0,NULL))*sizeof(TCHAR);
hHeap=GetProcessHeap();
lpBuffer=(LPSTR)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,uSize);
GetCurrentDirectory(uSize,lpBuffer);
if (lpBuffer!=DirName) {//调整当前目录
SetCurrentDirectory(DirName);
}
hFindFile=FindFirstFile("*.*",&FindFileData);
CString tFile;
if (hFindFile!=INVALID_HANDLE_VALUE) {
do {
tFile=FindFileData.cFileName;
if ((tFile==".")||(tFile=="..")) continue;
if (FindFileData.dwFileAttributes==
FILE_ATTRIBUTE_DIRECTORY){
if (DirName[DirName.GetLength()-1]!='\\')
PreRemoveDirectory(DirName+'\\'+tFile);
else
PreRemoveDirectory(DirName+tFile);
if (!RemoveDirectory(tFile))
result=FALSE;
else
result=TRUE;
}
else
if (!DeleteFile(tFile)) result=FALSE;
else result=TRUE;
}
while (FindNextFile(hFindFile,&FindFileData));
FindClose(hFindFile);
}
else {
SetCurrentDirectory(lpBuffer);
return FALSE;
}
SetCurrentDirectory(lpBuffer); //回复到原来的目录下
return result;
}
如何得到并修改各驱动器的信息
---- 在设计和文件输入/ 输出有关的应用程序时,我们很可能在输入/ 输出文件
前,需要了解一下源驱动器或者目标驱动器的各项信息,比如是否有磁盘在软驱
中,它是否已打开写保护,以及现有磁盘的容量等。遗憾的是,MFC 类库中没有提供
支持这些功能的类,所以我们只能通过Win32 提供的函数来完成我们的要求。下
面,我根据自己的编程实践,通过几段程序,来说明如何利用Win32 提供的函数实
现对驱动器的操作。读者可以根据自己的需要,把介绍的函数稍加修改后,即可插
入到自己设计的应用程序中去。
下面程序的功能是搜索计算机中所有驱动器,选择出其中软盘驱动器的驱动
器号,依次加入到一个下拉列表框中。
void FindDriverInfo()
{
CComboBox* Driver=(CComboBox*)GetDlgItem(IDC_DRIVER);
DWORD dwNumBytesForDriveStrings;
HANDLE hHeap;
LPSTR lp;
CString strLogdrive;
int nNumDrives=0, nDriveNum;
dwNumBytesForDriveStrings=GetLogicalDriveStrings(0,NULL)
*sizeof(TCHAR);//实际存储驱动器号的字符串长度
if (dwNumBytesForDriveStrings!=0) {
hHeap=GetProcessHeap();
lp=(LPSTR)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,
dwNumBytesForDriveStrings);//
GetLogicalDriveStrings(HeapSize(hHeap,0,lp),lp);
StringBox.SetSize(dwNumBytesForDriveStrings/sizeof(TCHAR)+1);
while (*lp!=0) {
if (GetDriveType(lp)==DRIVE_REMOVABLE){
Driver->AddString(lp);
StringBox[nNumDrives]=lp;
nNumDrives++;
}
lp=_tcschr(lp,0)+1;
}
}
else AfxMessageBox("Can't Use The Function GetLogicalDriveStrings!");
}
下面介绍的EmptyDiskSpace() 函数主要负责清空指定驱动器中的磁盘,同时
它还负责记录指定驱动器中磁盘的容量,并得到该磁盘的序列号。在该函数
中,还将调用第七部分提到的PreRemoveDirectory() 函数,来完成清空工作。
BOOL EmptyDiskSpace(CString Driver)
{
BOOL result=TRUE;
DWORDSectorsPerCluster; // address of sectors per cluster
DWORDBytesPerSector; // address of bytes per sector
DWORDNumberOfFreeClusters; // address of number of free clusters
DWORDTotalNumberOfClusters;
DWORDTotalBytes;
DWORDFreeBytes;
int bContinue=1;
char DiskVolumeSerialNumber[30];
//存储驱动器内当前磁盘的序列号
LPCTSTRlpRootPathName;
// address of root directory of the file system
LPTSTRlpVolumeNameBuffer=new char[12];
// address of name of the volume
DWORDnVolumeNameSize=12;
// length of lpVolumeNameBuffer
DWORD VolumeSerialNumber;
// address of volume serial number
DWORD MaximumComponentLength;
// address of system's maximum filename length
DWORD FileSystemFlags;
// address of file system flags
LPTSTRlpFileSystemNameBuffer=new char[10];
// address of name of file system
DWORDnFileSystemNameSize=10;
// length of lpFileSystemNameBuffer
lpRootPathName=Driver;
while (1){
if (GetDiskFreeSpace(Driver, &SectorsPerCluster,
&BytesPerSector, &NumberOfFreeClusters,
&TotalNumberOfClusters))
{//驱动器中有磁盘
TotalBytes=SectorsPerCluster*BytesPerSector
*TotalNumberOfClusters;//磁盘总容量
FreeBytes=SectorsPerCluster*BytesPerSector
*NumberOfFreeClusters;//磁盘空闲空间容量
GetVolumeInformation(lpRootPathName,
lpVolumeNameBuffer, nVolumeNameSize,
&VolumeSerialNumber,
&MaximumComponentLength,
&FileSystemFlags,
lpFileSystemNameBuffer, nFileSystemNameSize);
sprintf(DiskVolumeSerialNumber,"%X",VolumeSerialNumber);
//得到驱动器内当前磁盘的序列号
SetmTotalBytes(TotalBytes/1024);//存储指定驱动器中磁盘的容量
if (TotalBytes!=FreeBytes){//当磁盘总容量不等于空闲空间容量时,
应该执行清空操作
while (bContinue) {
if ((bContinue==2)||(MessageBox
("在驱动器"+m_Driver+"中的磁盘尚存有数据.
\n您愿意让系统为您删除它们吗?",
"提问",MB_YESNO|MB_ICONQUESTION)==IDYES))
if (!PreRemoveDirectory(Driver))//无法执行清空操作
if (MessageBox("因某种原因系统无法删除
在驱动器"+m_Driver+"中的磁盘上的数据.
\n请检查磁盘是否没有关闭写保护.
\n您愿意再试一次吗?",
"问题",MB_YESNO|MB_ICONERROR)==IDYES) {
bContinue=2;
continue;
}
else {
bContinue=0;
result=FALSE;
}
else {
MessageBox("成功删除磁盘上的数据!",
"提示信息",MB_OK|MB_ICONINFORMATION);
bContinue=0;
result=TRUE;
}
else {//THE FIRST IF'S ELSE
bContinue=0;
result=FALSE;
}
}
}
else result=TRUE;
break;
}
else {
if (MessageBox("没有磁盘在驱动器"+m_Driver+"中.
\n您愿意插入一张磁盘再来一次吗?",
"问题",MB_YESNO|MB_ICONASTERISK)==IDYES) continue;
else break;
}
}//END OF WHILE
return result;
}
在MS-DOS 和Windows95 中,磁盘卷标最多由11 个字符组成,并且字母的大小写
不加区分。当需要设定指定驱动器中磁盘的卷标时,只要调用Win32
的SetVolumeLabel() 函数即可,并在第一个参数中指明磁盘所在的驱动器
号,在第二个参数中指明新的卷标号。例如,SetVolumeLabel(DriverNum,
NewVolumeLabel)。
文件动画的操作过程提示对话框。这一功能的加入不仅使我们能够在操作过程当
中随时取消操作,而且也使文件拷贝或者删除操作变得生动活泼。其实,在使
用Visual C++ 进行应用程序设计时,我们也可以使用下述方法在适当位置加入自
己的操作过程提示对话框。
为每一个操作过程提示对话框创建一个对话框类。为了下面叙述方便,我们
只假设应用程序需要一个操作过程提示对话框并以“CModel”作为对应的对
话框类的名字。
使用Visual C++ 提供的资源编辑器编辑提示对话框,比如加入一些文字说明
和动画等。
在CModel 类的头文件(Model.h) 中,加入两个成员变量,
CWnd* m_pParent; // 指向调用该提示对话框的框架类( 或对话框类),即它
的“父类”int m_nID;// 记录该提示对话框的ID 号
以及下面两个成员函数:
CModel(CWnd* pParent = NULL); // 舍弃原有的构造函数,或者把原函数
修改成这种无模式对话框的构造函数
BOOL Create(); // 该函数将调用创建基类的Create() 函数创建对话框
在Model.cpp 文件中,加入相应函数的实现部分。
CModel::CModel(CWnd* pParent /*=NULL*/)
: CDialog(CModel::IDD, pParent)
{
m_pParent=pParent;
m_nID=CModel::IDD;
//{{AFX_DATA_INIT(CModel)
// NOTE: the ClassWizard will add member initialization here
//}}AFX_DATA_INIT
}
BOOL CModel::Create()
{
return CDialog::Create(m_nID,m_pParent);
}
同时按下Ctrl 和W 键或直接单击工具条上的ClassWizard 按钮,打
开ClassWizard 对话框。在类名(Class name) 列表框中选择该提示对话框类,
在Object IDs 列表框中选择该类的类名后,在消息(Messages) 列表框中选
择PostNcDestroy 消息并双击它,这时ClassWizard 就会在该对话框类中加入
一个PostNcDestroy() 函数。该函数将会在对话框窗口消失后,
由OnNcDestroy() 函数调用。因此,可以在该函数中加入一些扫尾工作,例如
数据传送,释放指针空间等。
void CModel::PostNcDestroy()
{
// TODO: Add your specialized code here and/or call the base class
delete this;
CDialog::PostNcDestroy();
}
在要调用提示对话框类的类的头文件中,先包含(#include)CModel 类的头文
件,再声明一个指向CModel 类的对象的指针,如m_Dlg,并在该类的构造函数
中,加入“m_Dlg = NULL;”一句。然后,在打开和关闭提示对话框的函数中加
入如下一段程序:
if (m_Dlg==NULL) {//如果当前没用提示对话框在活动,就创建一个
m_Dlg = new CModel(this);
m_Dlg->Create();
GetDlgItem(IDC_EXPORT)->EnableWindow(FALSE);
}
else//否则就激活它
m_Dlg->SetActiveWindow();
另外,再在要关闭提示对话框的地方,加入如下语句:
m_Dlg->DestroyWindow();
m_Dlg=NULL;
---- 至此,您已经拥有了自己的过程操作提示对话框。不过,它还不具有动画和
随时取消操作的功能。您不妨尝试着加入这些功能。另外,笔者也曾尝试过用下面
介绍的方法实现过程操作提示对话框。两种方法比较,可谓各有千秋。如果您希望
上面设计的过程提示对话框能够被多个应用程序共享,那么最好把提示对话框作
为独立的进程来调用。但是,当您还希望在提示对话框与调用者之间传输数据的
话,似乎这一部分介绍的实现方法更简洁且更有效。
应用进程实现对其他应用程序的调用
---- 在我们设计的应用程序中,很可能会用到其他应用程序来完成某一特定功
能。例如,当我们为了便于数据的传输而对诸多文件进行压缩和解压缩时,一种作
法是我们自己设计一个这样的压缩/ 解压缩程序,然后以动态链接库(DLL) 或者函
数库的形式由主应用程序调用。但更方便而且高效的作法是利用现有的这方面的
优秀软件,比如ARJ.EXE,并以进程的形式调用它,再在适当时候关闭它。下面将以
上面所述为例,具体介绍后一种方法的实现过程。
在需要调用ARJ.EXE 进行压缩/ 解压缩的类中,创建一个成员函数,不妨称
作CreateBat(),其作用是生成一个批处理文件。由该批处理文件调
用ARJ.EXE,并给出具体压缩/ 解压缩参数。之后,再利用MS-DOS 的DIR 命令生
成一个临时文件,以作为压缩/ 解压缩工作完成的标志。
void CMyCompress:: CreateBat(CString BatPath,CString ArjPath,
CString BatName,CString ArjFileName,
CString TempPath,CString ExitFlag,BOOL out)
{
LPTSTR lpBuffer;
UINT uSize;
HANDLE hHeap;
uSize=(GetCurrentDirectory(0,NULL))*sizeof(TCHAR);
hHeap=GetProcessHeap();
lpBuffer=(LPSTR)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,uSize);
GetCurrentDirectory(uSize,lpBuffer);
//得知当前目录信息,以便根据需要变换目录
if (lpBuffer!=BatPath) //diferent dir
SetCurrentDirectory(BatPath);
CStdioFile f;
CFileException e;
if (!f.Open( BatName, CFile::modeCreate|CFile::modeWrite, &e))
//以BatName的内容创建一个批处理文件
{
AfxMessageBox("不能创建文件"+BatName);
return ;
}
char density[6];
sprintf(density,"%d",mTotalBytes);
---- //mTotalBytes 是由其他函数设定的变量,用于记录用于拷入或拷出文件
的磁盘所具有的最大可用空间
CString Density=density;
CString string;
if (out)//说明是生成做压缩工作的批处理文件
string="arj a -v"+Density;
else //说明是生成做解压缩工作的批处理文件
string="arj e -v"+Density;
string+=" ..\\"+ArjPath+"\\"+ArjFileName+" ";
if (out)
string=string+"..\\"+TempPath+"\\*.* -y -jm\n";
else
string=string+"..\\"+TempPath+"\\ -y -jm\n";
f.WriteString(string);
string="dir >"+ExitFlag+"\n";
f.WriteString(string);
f.Close();
SetCurrentDirectory(lpBuffer);//回复到原来的目录下
}
---- 该函数执行后,将生成一个批处理文件,内容大致是:
---- ARJ A -V1440 压缩后文件的路径名+ 文件名被压缩文件的路径名+ 文件名
-Y -JM
---- DIR > 临时文件名
---- 或者是:
---- ARJ E -V1440 被解压缩文件的路径名+ 文件名解压缩后文件的路径名+ 文
件名-Y -JM
---- DIR > 临时文件名
在需要调用ARJ.EXE 进行压缩/ 解压缩的类中,再创建一个成员函数,不妨称
作RunBat(),其作用是创建和执行进程来运行上述所生成的批处理文件,并
在适当时候撤消进程。
void CMyCompress::RunBat(CString
BatPath,CString fileName,CString ExitFlag)
{
CString lpApplicationName=BatPath+"\\"+fileName;
// 进程执行的应用程序的完全路径名
STARTUPINFO StartupInfo;// 创建进程所需的信息结构变量
GetStartupInfo(&StartupInfo);
StartupInfo.lpReserved=NULL;
StartupInfo.lpDesktop=NULL;
StartupInfo.lpTitle=NULL;
StartupInfo.dwX=0;
StartupInfo.dwY=0;
StartupInfo.dwXSize=200;
StartupInfo.dwYSize=300;
StartupInfo.dwXCountChars=500;
StartupInfo.dwYCountChars=500;
StartupInfo.dwFlags=STARTF_USESHOWWINDOW;
StartupInfo.wShowWindow=SW_HIDE;
// 说明进程将以隐藏的方式在后台执行
StartupInfo.cbReserved2=0;
StartupInfo.lpReserved2=NULL;
StartupInfo.hStdInput=stdin;
StartupInfo.hStdOutput=stdout;
StartupInfo.hStdError=stderr;
LPTSTR lpBuffer;
UINT uSize;
HANDLE hHeap;
uSize=(GetCurrentDirectory(0,NULL))*sizeof(TCHAR);
hHeap=GetProcessHeap();
lpBuffer=(LPSTR)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,uSize);
GetCurrentDirectory(uSize,lpBuffer);
// 得知当前目录信息,以便根据需要变换目录
if (lpBuffer!=BatPath) //diferent dir
SetCurrentDirectory(BatPath);
// 创建进程
if (CreateProcess(lpApplicationName,NULL,NULL,
NULL,FALSE,CREATE_DEFAULT_ERROR_MODE,
NULL,NULL,&StartupInfo,&pro_info))
{
MSG Message;
DeleteFile(ExitFlag);
SetTimer(1,100,NULL);// 设置计时器
Search=TRUE;
while(Search) {
if (::PeekMessage(&Message,NULL,0,0,PM_REMOVE)) {
::TranslateMessage(&Message);
::DispatchMessage(&Message);
}
}
// 进程结束前后的处理工作
DWORDExitCode;
if (!GetExitCodeProcess(pro_info.hProcess,&ExitCode))
AfxMessageBox("GetExitCodeProcess is Failed!");
if (!TerminateProcess(pro_info.hProcess,(UINT)ExitCode))
// 终止进程
AfxMessageBox("TerminateProcess is Failed!");
if (!CloseHandle(pro_info.hProcess))
// 释放被终止进程的句柄
AfxMessageBox("CloseHandle is Failed!");
KillTimer(1);// 撤消计时器
}
else AfxMessageBox("Process Is Not Created!");
SetCurrentDirectory(lpBuffer);// 回复到原来的目录下
}
同时按下Ctrl 和W 键或直接单击工具条上的ClassWizard 按钮,打
开ClassWizard 对话框。在类名(Class name) 列表框中选择需要调用ARJ.EXE
进行压缩/ 解压缩的类,在Object IDs 列表框中选择该类的类名后,在消
息(Messages) 列表框中选择WM_TIMER 消息并双击它,这时ClassWizard 就会
在该类中加入一个OnTimer() 函数。该函数将以一定的时间间隔检查压缩/ 解
压缩程序是否已经执行完毕,即检查作为标志的临时文件是否已经存在,并
及时修改状态变量“Search”,以便通知RunBat() 函数结束进程。
void CMyCompress::OnTimer(UINT nIDEvent)
{
// TODO: Add your message handler code here and/or call default
CFile file;
CFileException Error;
if (file.Open(ExitFlag,CFile::modeRead,&Error)) {
Search=FALSE;
file.Close();
}
}
自编删除目录及其下属文件的函数
---- 高版本的MS-DOS 和Windows 95 都提供了一个可以删除一个或多个目录及其
下属文件和目录的命令,即DeleteTree 命令。然而,无论在MFC 类库还是在Win32 函
数库中,都没有相应的函数与之对应。这样,当我们在自己设计的应用程序中需要
用到DeleteTree 的功能时,自然想到的方法是通过进程调用或者系统调用的方
式( 正如上面部分所述的那样) 调用MD-DOS 或Windows 95 下的DeleteTree 命令。然
而,Win32 函数库已经为我们提供了多种用于文件和目录操作的函数,利用它们不
难设计出自己的DeleteTree() 函数。
---- 读者读到这里,也许会感到有些疑惑,为什么第六部分强调进程调用优于自
我设计的函数,而这一部分又反了过来?是的,在通常情况下,调用应用程序内部
的函数比使用进程或者调用外部函数更灵活并且可以提高执行效率,也便于修
改。所以,象DeleteTree() 这样的功能,利用现有的函数并不难实现,自然就最好
通过内部函数的方式来完成。然而,象设计一个压缩/ 解压缩这样的函数的工作
量,并不比通过进程调用来使用现成品的开销更合算,因为它至少需要我们了解
压缩/ 解压缩的复杂算法,而且调试和维护它也需要一定代价。于是,这个时候,还
是采用“拿来主义”为好。
---- 下面,给出我自己设计的DeleteTree() 函数,仅供参考。
BOOL DeleteTree(CString DirName)
{ //成功:返回TRUE;否则,返回FALSE
BOOL Result;
Result=PreRemoveDirectory(DirName)
&& RemoveDirectory(DirName);
return Result;
}
BOOL PreRemoveDirectory(CString DirName)
{//成功:返回TRUE;否则,返回FALSE
LPTSTR lpBuffer;
UINT uSize;
CString fileName;
HANDLE hHeap;
BOOL result;
HANDLE hFindFile;
WIN32_FIND_DATA FindFileData;
uSize=(GetCurrentDirectory(0,NULL))*sizeof(TCHAR);
hHeap=GetProcessHeap();
lpBuffer=(LPSTR)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,uSize);
GetCurrentDirectory(uSize,lpBuffer);
if (lpBuffer!=DirName) {//调整当前目录
SetCurrentDirectory(DirName);
}
hFindFile=FindFirstFile("*.*",&FindFileData);
CString tFile;
if (hFindFile!=INVALID_HANDLE_VALUE) {
do {
tFile=FindFileData.cFileName;
if ((tFile==".")||(tFile=="..")) continue;
if (FindFileData.dwFileAttributes==
FILE_ATTRIBUTE_DIRECTORY){
if (DirName[DirName.GetLength()-1]!='\\')
PreRemoveDirectory(DirName+'\\'+tFile);
else
PreRemoveDirectory(DirName+tFile);
if (!RemoveDirectory(tFile))
result=FALSE;
else
result=TRUE;
}
else
if (!DeleteFile(tFile)) result=FALSE;
else result=TRUE;
}
while (FindNextFile(hFindFile,&FindFileData));
FindClose(hFindFile);
}
else {
SetCurrentDirectory(lpBuffer);
return FALSE;
}
SetCurrentDirectory(lpBuffer); //回复到原来的目录下
return result;
}
如何得到并修改各驱动器的信息
---- 在设计和文件输入/ 输出有关的应用程序时,我们很可能在输入/ 输出文件
前,需要了解一下源驱动器或者目标驱动器的各项信息,比如是否有磁盘在软驱
中,它是否已打开写保护,以及现有磁盘的容量等。遗憾的是,MFC 类库中没有提供
支持这些功能的类,所以我们只能通过Win32 提供的函数来完成我们的要求。下
面,我根据自己的编程实践,通过几段程序,来说明如何利用Win32 提供的函数实
现对驱动器的操作。读者可以根据自己的需要,把介绍的函数稍加修改后,即可插
入到自己设计的应用程序中去。
下面程序的功能是搜索计算机中所有驱动器,选择出其中软盘驱动器的驱动
器号,依次加入到一个下拉列表框中。
void FindDriverInfo()
{
CComboBox* Driver=(CComboBox*)GetDlgItem(IDC_DRIVER);
DWORD dwNumBytesForDriveStrings;
HANDLE hHeap;
LPSTR lp;
CString strLogdrive;
int nNumDrives=0, nDriveNum;
dwNumBytesForDriveStrings=GetLogicalDriveStrings(0,NULL)
*sizeof(TCHAR);//实际存储驱动器号的字符串长度
if (dwNumBytesForDriveStrings!=0) {
hHeap=GetProcessHeap();
lp=(LPSTR)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,
dwNumBytesForDriveStrings);//
GetLogicalDriveStrings(HeapSize(hHeap,0,lp),lp);
StringBox.SetSize(dwNumBytesForDriveStrings/sizeof(TCHAR)+1);
while (*lp!=0) {
if (GetDriveType(lp)==DRIVE_REMOVABLE){
Driver->AddString(lp);
StringBox[nNumDrives]=lp;
nNumDrives++;
}
lp=_tcschr(lp,0)+1;
}
}
else AfxMessageBox("Can't Use The Function GetLogicalDriveStrings!");
}
下面介绍的EmptyDiskSpace() 函数主要负责清空指定驱动器中的磁盘,同时
它还负责记录指定驱动器中磁盘的容量,并得到该磁盘的序列号。在该函数
中,还将调用第七部分提到的PreRemoveDirectory() 函数,来完成清空工作。
BOOL EmptyDiskSpace(CString Driver)
{
BOOL result=TRUE;
DWORDSectorsPerCluster; // address of sectors per cluster
DWORDBytesPerSector; // address of bytes per sector
DWORDNumberOfFreeClusters; // address of number of free clusters
DWORDTotalNumberOfClusters;
DWORDTotalBytes;
DWORDFreeBytes;
int bContinue=1;
char DiskVolumeSerialNumber[30];
//存储驱动器内当前磁盘的序列号
LPCTSTRlpRootPathName;
// address of root directory of the file system
LPTSTRlpVolumeNameBuffer=new char[12];
// address of name of the volume
DWORDnVolumeNameSize=12;
// length of lpVolumeNameBuffer
DWORD VolumeSerialNumber;
// address of volume serial number
DWORD MaximumComponentLength;
// address of system's maximum filename length
DWORD FileSystemFlags;
// address of file system flags
LPTSTRlpFileSystemNameBuffer=new char[10];
// address of name of file system
DWORDnFileSystemNameSize=10;
// length of lpFileSystemNameBuffer
lpRootPathName=Driver;
while (1){
if (GetDiskFreeSpace(Driver, &SectorsPerCluster,
&BytesPerSector, &NumberOfFreeClusters,
&TotalNumberOfClusters))
{//驱动器中有磁盘
TotalBytes=SectorsPerCluster*BytesPerSector
*TotalNumberOfClusters;//磁盘总容量
FreeBytes=SectorsPerCluster*BytesPerSector
*NumberOfFreeClusters;//磁盘空闲空间容量
GetVolumeInformation(lpRootPathName,
lpVolumeNameBuffer, nVolumeNameSize,
&VolumeSerialNumber,
&MaximumComponentLength,
&FileSystemFlags,
lpFileSystemNameBuffer, nFileSystemNameSize);
sprintf(DiskVolumeSerialNumber,"%X",VolumeSerialNumber);
//得到驱动器内当前磁盘的序列号
SetmTotalBytes(TotalBytes/1024);//存储指定驱动器中磁盘的容量
if (TotalBytes!=FreeBytes){//当磁盘总容量不等于空闲空间容量时,
应该执行清空操作
while (bContinue) {
if ((bContinue==2)||(MessageBox
("在驱动器"+m_Driver+"中的磁盘尚存有数据.
\n您愿意让系统为您删除它们吗?",
"提问",MB_YESNO|MB_ICONQUESTION)==IDYES))
if (!PreRemoveDirectory(Driver))//无法执行清空操作
if (MessageBox("因某种原因系统无法删除
在驱动器"+m_Driver+"中的磁盘上的数据.
\n请检查磁盘是否没有关闭写保护.
\n您愿意再试一次吗?",
"问题",MB_YESNO|MB_ICONERROR)==IDYES) {
bContinue=2;
continue;
}
else {
bContinue=0;
result=FALSE;
}
else {
MessageBox("成功删除磁盘上的数据!",
"提示信息",MB_OK|MB_ICONINFORMATION);
bContinue=0;
result=TRUE;
}
else {//THE FIRST IF'S ELSE
bContinue=0;
result=FALSE;
}
}
}
else result=TRUE;
break;
}
else {
if (MessageBox("没有磁盘在驱动器"+m_Driver+"中.
\n您愿意插入一张磁盘再来一次吗?",
"问题",MB_YESNO|MB_ICONASTERISK)==IDYES) continue;
else break;
}
}//END OF WHILE
return result;
}
在MS-DOS 和Windows95 中,磁盘卷标最多由11 个字符组成,并且字母的大小写
不加区分。当需要设定指定驱动器中磁盘的卷标时,只要调用Win32
的SetVolumeLabel() 函数即可,并在第一个参数中指明磁盘所在的驱动器
号,在第二个参数中指明新的卷标号。例如,SetVolumeLabel(DriverNum,
NewVolumeLabel)。
本栏文章均来自于互联网,版权归原作者和各发布网站所有,本站收集这些文章仅供学习参考之用。任何人都不能将这些文章用于商业或者其他目的。( Pfan.cn )
【编程爱好者论坛】