文件_取实际大小

易辈子

易语言命令名称：文件_取实际大小
* G0 l, A9 F* o! M
* {1 J$ h" ~. f$ u# T
3 r. {0 @. ]- i* E2 P3 ~5 P命令功能介绍:文件_取实际大小
  y4 G: m2 U9 e5 I
& W- Y# R& T0 m3 m+ ~" S' _
* ?$ _" f5 g! t/ A+ o命令类别:精易模块命令
1 O$ k2 w: S/ ~

  G1 d6 n. l! }6 G4 I* v( T命令使用说明:在易语言中调用即可。
. z1 o3 w, o- R  K3 l" k, R

. c: t" _$ R. N  X2 z1 m8 c
( R5 K. w: q* y2 v! F4 b
) t/ {! g+ J+ N. [* E1 c# f" F
: z9 w  D/ _4 d命令源码:

  

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

变量名	类 型	静态	数组	备 注
局_整数结构	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">: ^6 X" h: Q) R, D3 Y. G</font><br /> .参数 文件路径, 文本型, , <br /> <span style="display:none">2 x2 {& j' z0 R! ^  }$ ?+ F# V$ z</span>.局部变量 局_整数结构, ULARGE_INTEGER, , , <br /> <span style="display:none">) \2 n" W# l# z4 V, P$ z</span>.局部变量 局_文件大小, 长整数型, , , <br /> <span style="display:none">% B$ r8 o% o" d' X9 Q</span><font class="jammer">0 Q6 g; I" x0 i6 j8 R* r</font><br /> <font class="jammer">) b& ~* ]7 g# F</font><br /> 局_整数结构.LowPart ＝ GetCompressedFileSizeA (文件路径, 局_整数结构.HighPart)<br /> <span style="display:none">' ^0 ]2 Z/ `6 j$ m! q$ D</span>.如果 (局_整数结构.LowPart ＜ 0)  ' 文件大小在2-4G之间时低位是负值<font class="jammer">& Z% t" a2 Z% Q" \: ^/ c</font><br />     局_整数结构.LowPart ＝ 位与 (局_整数结构.LowPart, 2147483647)  ' 将低位和（01111111111111111111111111111111）位与，去掉负号<font class="jammer">3 s6 {! g) }7 K8 ^  x& {9 J% H  l</font><br />     局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 2147483648.000000 ＋ 局_整数结构.LowPart  ' 再加上2G和高位得到文件实际大小<br /> <span style="display:none"># x0 K1 q/ D2 t+ [$ Q: D9 V</span>.否则<font class="jammer">. R) Q9 M  _9 i</font><br />     局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 局_整数结构.LowPart<br /> <span style="display:none">9 \6 t( f& R& x* ]$ y, g0 Q</span>.如果结束<br /> <span style="display:none">9 `* t3 l! _9 t# o</span>返回 (局_文件大小)

2 [6 z2 l3 P1 s7 J7 C- U2 s源码复制到易语言教程:

首先复制上面的命令源码.到剪辑板.然后来到易语言的程序集界面如下图所示

9 P( f. s2 k. l7 P" Y# ]% P! Z
( C% e+ ?8 C6 F8 G# F4 p% k6 ?- _& Q然后拖动鼠标把程序集名-窗口程序集.选中.然后粘贴上面的代码

即可插入易语言命令代码哦
3 G4 X0 b- A; P- j5 g
DLL源码复制到易语言教程：

1 F. B4 q6 G3 s9 a

, w9 g  y, @5 N6 J" `  V

yyz860723

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

A8968666666

看不明白是什么   

fxy2514326

- ?- T2 _4 b  z# P4 a" N* `楼主发贴辛苦了，谢谢楼主分享

一决高下

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