文件_取实际大小

易辈子

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

' \  x5 |/ _7 c. ^
% X7 b; h" z, p9 a命令功能介绍:文件_取实际大小
8 P3 {2 ?& d! q% C( @
6 H3 ^8 j5 U8 v2 ?( T. H7 b, r5 x
' j7 i+ G/ T2 H. ]8 G命令类别:精易模块命令


1 q" _  Z  Q! _3 E; `命令使用说明:在易语言中调用即可。
1 u" n9 d7 Q- D/ m0 C
6 F: p4 u& z% e2 x6 W* s0 G

5 S5 R/ g% f, @2 V" e9 V5 u; Y

, U) p& w' `- [, G3 r8 V; ?命令源码:

  

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

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

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

.子程序 文件_取实际大小, 长整数型, 公开, 获取一个文件在磁盘上实际占据的字节数，如文件右键属性中的大小，显示就是实际压缩过的尺寸<font class="jammer">' a' T( ]& A, O</font><br /> .参数 文件路径, 文本型, , <br /> <span style="display:none">7 K! ]0 v" F; P) @) a- K9 A</span>.局部变量 局_整数结构, ULARGE_INTEGER, , , <font class="jammer">4 F! }9 |) W1 X5 l</font><br /> .局部变量 局_文件大小, 长整数型, , , <font class="jammer">" X! T4 ]0 \7 E4 u6 @- [% }</font><br /> <font class="jammer">6 U! h* X1 C5 F</font><br /> <font class="jammer"># n( Y' |/ E7 N$ v  A% L+ X4 M  Z</font><br /> 局_整数结构.LowPart ＝ GetCompressedFileSizeA (文件路径, 局_整数结构.HighPart)<font class="jammer">4 L  [4 n4 u! v- I5 y  k</font><br /> .如果 (局_整数结构.LowPart ＜ 0)  ' 文件大小在2-4G之间时低位是负值<font class="jammer">7 ~) w9 g0 r3 y* U7 q- n</font><br />     局_整数结构.LowPart ＝ 位与 (局_整数结构.LowPart, 2147483647)  ' 将低位和（01111111111111111111111111111111）位与，去掉负号<br /> <span style="display:none">% k) ?5 ~0 G4 r4 H0 K</span>    局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 2147483648.000000 ＋ 局_整数结构.LowPart  ' 再加上2G和高位得到文件实际大小<br /> <span style="display:none">3 C! _8 \2 e+ `5 V! W- @</span>.否则<br /> <span style="display:none">( k4 x" D0 S+ P' c5 m</span>    局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 局_整数结构.LowPart<br /> <span style="display:none">. V# S" X" d  K) O# M# S$ V8 j</span>.如果结束<font class="jammer">3 O7 z: s; R& M. U) Z1 x</font><br /> 返回 (局_文件大小)

0 h2 h& ]% d: b: [+ K, g$ _


0 w) _2 W" Q! S; D1 ~源码复制到易语言教程:

- l/ O' {: C9 e6 n首先复制上面的命令源码.到剪辑板.然后来到易语言的程序集界面如下图所示


- t$ Y8 q# \/ C, v: `然后拖动鼠标把程序集名-窗口程序集.选中.然后粘贴上面的代码
" ~9 U( q% F1 i: M7 \. s# }
3 O! w# D1 n" ?3 y% ^即可插入易语言命令代码哦
& W+ O7 {# T. w) Y  R
1 h9 c  P0 K9 n8 D4 L% qDLL源码复制到易语言教程：
+ V2 @# W( n0 }9 k! w
7 \  g, u- [) R+ t( U

+ D6 u; B& f% H2 u0 l

yyz860723

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

A8968666666

看不明白是什么   

fxy2514326

楼主发贴辛苦了，谢谢楼主分享

一决高下

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