文件_取实际大小

易辈子

易语言命令名称：文件_取实际大小


命令功能介绍:文件_取实际大小
% @- e8 m8 ?$ ]9 P
& P9 ^$ }$ Z" L) m1 z2 ]
命令类别:精易模块命令

4 _4 m! Z. o3 L7 H# |& q
命令使用说明:在易语言中调用即可。
, `% u- `- ^! E# ^



- Y$ Q: C$ \; s$ f2 L+ M
命令源码:

  

子程序名	返回值类型	公开	备 注
文件_取实际大小	长整数型	√	获取一个文件在磁盘上实际占据的字节数，如文件右键属性中的大小，显示就是实际压缩过的尺寸
参数名	类 型	参考	可空	数组	备 注
文件路径	文本型

变量名	类 型	静态	数组	备 注
局_整数结构	ULARGE_INTEGER
局_文件大小	长整数型

局_整数结构.LowPart ＝ GetCompressedFileSizeA (文件路径, 局_整数结构.HighPart)
如果 (局_整数结构.LowPart ＜ 0)  ' 文件大小在2-4G之间时低位是负值
局_整数结构.LowPart ＝ 位与 (局_整数结构.LowPart, 2147483647)  ' 将低位和（01111111111111111111111111111111）位与，去掉负号
局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 2147483648.000000 ＋ 局_整数结构.LowPart  ' 再加上2G和高位得到文件实际大小
局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 局_整数结构.LowPart
返回 (局_文件大小)

.子程序 文件_取实际大小, 长整数型, 公开, 获取一个文件在磁盘上实际占据的字节数，如文件右键属性中的大小，显示就是实际压缩过的尺寸<br /> <span style="display:none">2 M# F7 g0 _  s# L; g; V</span>.参数 文件路径, 文本型, , <font class="jammer">, k/ h0 ^+ }7 V1 q8 i& O/ @" L</font><br /> .局部变量 局_整数结构, ULARGE_INTEGER, , , <br /> <span style="display:none"># F$ a& M6 I# }3 G8 K+ k( T" W</span>.局部变量 局_文件大小, 长整数型, , , <font class="jammer">8 T0 H9 F4 Z& N5 g</font><br /> <font class="jammer">8 I1 f  G7 G% h( p/ Y- z- v) W2 I</font><br /> <font class="jammer">  L8 [" {7 ~) @" {1 x1 h</font><br /> 局_整数结构.LowPart ＝ GetCompressedFileSizeA (文件路径, 局_整数结构.HighPart)<font class="jammer">; V: ?! \$ }) Q" {) [$ V- T' y</font><br /> .如果 (局_整数结构.LowPart ＜ 0)  ' 文件大小在2-4G之间时低位是负值<br /> <span style="display:none">' \: v% w5 {2 P# x+ {  A  s, j</span>    局_整数结构.LowPart ＝ 位与 (局_整数结构.LowPart, 2147483647)  ' 将低位和（01111111111111111111111111111111）位与，去掉负号<font class="jammer">! h! p* {" ?: P/ G* `</font><br />     局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 2147483648.000000 ＋ 局_整数结构.LowPart  ' 再加上2G和高位得到文件实际大小<br /> <span style="display:none">8 x% e3 D( Z" z6 d</span>.否则<font class="jammer">! O$ p9 `/ j, L8 ~( ~" H</font><br />     局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 局_整数结构.LowPart<br /> <span style="display:none">6 n) m/ m+ d* x</span>.如果结束<font class="jammer">1 f6 w7 f2 ]( v</font><br /> 返回 (局_文件大小)

9 H6 Z8 ^. J5 C! q

8 V$ K- o9 x4 a0 }$ _- R
) e5 d$ Y1 X6 G0 ~* ~6 w( n0 w+ ~源码复制到易语言教程:
# B. `2 N5 d: [  C
首先复制上面的命令源码.到剪辑板.然后来到易语言的程序集界面如下图所示

7 Q: s0 i  l( b: g/ z, T: O0 b; T+ {2 c
& ^2 I6 ^7 Y& d! q然后拖动鼠标把程序集名-窗口程序集.选中.然后粘贴上面的代码

即可插入易语言命令代码哦
' j2 x" u: E1 ~7 D% H4 {( A% q" V
DLL源码复制到易语言教程：
8 t8 h- E. W( E; z3 b) |/ K! v  F
* l$ l4 f9 P' F) q( J' B3 l2 F
$ l. s- d$ ?- E8 x3 G& M# @7 Y

yyz860723

楼主发贴辛苦了，谢谢楼主分享！我觉得易语言吧是注册对了！

A8968666666

看不明白是什么   
" Q% W  `; |. l# ~+ s" o' O9 f) v

fxy2514326

- b# ?9 p4 J% O3 j$ G9 Z楼主发贴辛苦了，谢谢楼主分享

一决高下

楼主太厉害了！楼主，我爱你！我觉得易语言吧真是个好地方！