文件_取实际大小

易辈子

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


% F6 S* e+ R, p8 T$ B; `' i命令功能介绍:文件_取实际大小
6 ]) Z( @: a- e9 L. K" l/ v

' ?- [4 ]# Q" ^+ L7 `3 ^* H命令类别:精易模块命令

( ^) i1 H: l2 V' ?: [
: j4 D) C- d: |% r( D; R( r命令使用说明:在易语言中调用即可。

' B9 l; c9 Q; Q; W1 v
" |! f+ E7 W7 R$ a8 o* _* y: [
6 u, D6 y' h& d7 x1 {8 C3 Z
7 \5 D5 i, |) }# q: W8 z
# H7 c) c- F; C- L/ T9 z命令源码:

  

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

变量名	类 型	静态	数组	备 注
局_整数结构	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 V) H, e0 V* n! v6 p</span>.参数 文件路径, 文本型, , <br /> <span style="display:none">" A2 ^# X& s2 l! z6 Y5 p</span>.局部变量 局_整数结构, ULARGE_INTEGER, , , <br /> <span style="display:none">9 L8 S& i4 b8 v4 S" X) Q0 y1 b- D3 @</span>.局部变量 局_文件大小, 长整数型, , , <font class="jammer">, M  e1 a9 Q* T</font><br /> <br /> <span style="display:none">. `2 K$ J4 Z0 |' _- i9 }$ O* J! e</span><font class="jammer">( i( S: F4 ~; h9 Q5 O6 p3 b2 s% ?</font><br /> 局_整数结构.LowPart ＝ GetCompressedFileSizeA (文件路径, 局_整数结构.HighPart)<br /> <span style="display:none"># l5 G( z! }% Y8 P/ a</span>.如果 (局_整数结构.LowPart ＜ 0)  ' 文件大小在2-4G之间时低位是负值<br /> <span style="display:none">' E) D, e& K3 q. ^& q</span>    局_整数结构.LowPart ＝ 位与 (局_整数结构.LowPart, 2147483647)  ' 将低位和（01111111111111111111111111111111）位与，去掉负号<font class="jammer">6 {* k  S! r7 S" _2 O</font><br />     局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 2147483648.000000 ＋ 局_整数结构.LowPart  ' 再加上2G和高位得到文件实际大小<br /> <span style="display:none">9 i* `7 z# o2 s- R</span>.否则<br /> <span style="display:none">5 C' i. Q9 R% K2 I1 L& j3 ]</span>    局_文件大小 ＝ 局_整数结构.HighPart × 4294967296.000000 ＋ 局_整数结构.LowPart<br /> <span style="display:none">8 g% o5 c3 E0 J3 a  B7 c8 i</span>.如果结束<font class="jammer">0 I* [7 w  [# b$ n3 P6 n# ~' s</font><br /> 返回 (局_文件大小)

7 }* d% j# d! T/ }2 k8 b
' w9 p4 ~1 w% r/ p: n

源码复制到易语言教程:

; k& l+ e$ c& b* {6 N首先复制上面的命令源码.到剪辑板.然后来到易语言的程序集界面如下图所示
& ]: }/ ?: {2 X7 m
+ h8 L. [' w9 v2 _; c# G. v
然后拖动鼠标把程序集名-窗口程序集.选中.然后粘贴上面的代码
" l0 k8 l" p: o( R
  m* L( S3 Q: R8 i9 l即可插入易语言命令代码哦

DLL源码复制到易语言教程：

  p/ ]: M% M- f4 U- L% ~2 ?

+ Q5 i3 V) S% _0 H! l0 \

yyz860723

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

A8968666666

看不明白是什么   

fxy2514326

+ d* y  a( |2 b& h/ I; p  d) o楼主发贴辛苦了，谢谢楼主分享

一决高下

! @% L) }7 V0 x7 r3 w, F! d( x楼主太厉害了！楼主，我爱你！我觉得易语言吧真是个好地方！