我使用CopyFile函数进行文件拷贝,当拷贝到桌面上时候,提示正确拷贝,可就是没有见到拷贝的文件:
我的源代码部分如下:
Try
Path:=GetCurrentDir+'\clgl_db.Dat';
CopyFile(PChar(Path),PChar(eptPath.Text),False);
Showmessage('成功')
Except
ShowMessage('失败')
End
目标文件是通过对话框中任意选择,当源文件和目标文件处在同一个盘符下,就没有问题,否则
就会出问题,报出了“成功”,但就是无法得到目标文件。
请问各位大虾,这是什么问题呢?
我的源代码部分如下:
Try
Path:=GetCurrentDir+'\clgl_db.Dat';
CopyFile(PChar(Path),PChar(eptPath.Text),False);
Showmessage('成功')
Except
ShowMessage('失败')
End
目标文件是通过对话框中任意选择,当源文件和目标文件处在同一个盘符下,就没有问题,否则
就会出问题,报出了“成功”,但就是无法得到目标文件。
请问各位大虾,这是什么问题呢?
解决方案 »
- TIDTCPserver 怎么 获取连接过来的客户端IP
- 关于字符串列表排序的困惑!
- 求:修改表的一个字段的字段名的sql脚本语句
- 双击DBGrid的滚动条会对数据源进行什么操作?
- 判断数学表达式是否正确(合符语法)
- dephi中的指针移动是Pointer+1吗?(在线等待)
- 关于IFormDesigner接口的问题
- 【十万火急的菜鸟问题,在线恭候大家回答!!】$$$$$
- -==== 今天要注册一个域名,大家来帮忙取个域名! 在线等====-
- 怎样把数据库中一个表保存成为一个文本文件,字段用逗号隔开?
- 急盼高手帮忙!!!! 我最近做了一个题库系统,试题采用TRxRichedit控件进行录入和查看,问一下,TRxRichedit显示的公式怎么可以垂直居中排列呢?
- 急!为什么RichEdit中的CFM_HIDDEN(隐藏)没有效果,象其他的CFM_STRIKEOUT(删除线)却有效果,我用的是RichEdit3.0版本。
Try
Path:=GetCurrentDir+ '\clgl_db.Dat ';
Showmessage( 'GetCurrentDir是'+GetCurrentDir);// 在这里插入这段代码,看看GetCurrentDir代表的路径是什么!估计和eptPath.Text一样
CopyFile(PChar(Path),PChar(eptPath.Text),False);
Showmessage( '成功 ')
Except
ShowMessage( '失败 ')
End
If the function fails, the return value is zero. To get extended error information, call GetLastError.
Reset();
LZCopy();//copy content
CloseFile();