社区
Delphi
帖子详情
用户选择的是文件就得到文件大小,是文件夹就得到文件夹大小?
superhjw
2003-10-21 09:11:21
UP.
用OPENDIALOG好像不行,不能选择文件夹,只能选择文件,有没有可以选择文件夹的?
...全文
48
4
打赏
收藏
用户选择的是文件就得到文件大小,是文件夹就得到文件夹大小?
UP. 用OPENDIALOG好像不行,不能选择文件夹,只能选择文件,有没有可以选择文件夹的?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
superhjw
2003-10-21
打赏
举报
回复
: hongqi162(失踪的月亮) (
非常感谢!
请问月亮,文件类型。比如exe扩展的,叫EXE文件
有的叫配置文件,像资源管理器中的那样,这个如何实现?
hongqi162
2003-10-21
打赏
举报
回复
用win3.1下的DriveComboBox1,DirectoryListBox1,FileListBox1
procedure TForm1.FileListBox1Click(Sender: TObject);
var size:integer;
stream:Tmemorystream;
begin
stream:=TMemoryStream.Create;
stream.LoadFromFile(FileListBox1.FileName);//获得文件大小
size:=stream.Size;
edit1.Text:=inttostr(size);
end;
procedure TForm1.DirectoryListBox1Click(Sender: TObject);
var size:integer;
FindData: TWin32FindData;
begin
size:=FindData.nFileSizeLow; //获得文件夹大小
edit1.Text:=inttostr(size);
end;
hongqi162
2003-10-21
打赏
举报
回复
var size:integer;
stream :Tmemorystream;
begin
stream := TMemoryStream.Create;
if OpenDialog1.Execute then
begin
stream.LoadFromFile(OpenDialog1.FileName);
size := stream.Size; //获得文件大小
edit1.Text:=inttostr(size);
end;
chenkandy
2003-10-21
打赏
举报
回复
FileExists(const Directory: string):
判斷是否是文件,如果是得話,有文件sum代碼
DirectoryExists
判斷是否是目錄,如果是得話,有計算目錄下所有文件sum代碼
如果文件夾下有別的文件夾,你能需要深度遍利統計
Java获取
文件
夹
大小
、
文件
大小
,
文件
个数
Java获取
文件
夹
大小
、
文件
大小
,
文件
个数.doc
获取
文件
文件
夹
大小
、
文件
夹
下子
文件
个数、
JAVA
文件
操作 获取
文件
文件
夹
大小
、
文件
夹
下子
文件
个数
python自动化管理
文件
和
文件
夹
本套课程主要以实用为主方面来讲解使用python代码来操作
文件
和
文件
夹
,包括批量创建
文件
和
文件
夹
,读取和写入
文件
,查询、搜索、遍历
文件
等操作。
VC中的
文件
操作,判断
文件
、
文件
夹
是否存在 、删除
文件
夹
、求
文件
夹
大小
VC中的
文件
操作,判断
文件
、
文件
夹
是否存在 、删除
文件
夹
、求
文件
夹
大小
.很详细
c# 获取
文件
或
文件
夹
大小
源代码
.net 2005 c# 源代码 获取
文件
或
文件
夹
大小
很轻松的获取
文件
,或者
文件
夹
的
大小
。
Delphi
5,391
社区成员
262,737
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章