易语言文件_取文本编码使用详解

十万个为什么

易语言命令名称：
文件_取文本编码
, F* `1 J4 n$ b* j0 o' j
命令功能介绍:
5 i  h8 s8 P* X2 j& P- g( k
获取指定路径的txt文档的编码格式。成功返回（1：UTF-8，2：Unicode；3：Unicode big endian；4：ANSI），默认返回 4。
命令类别:精易模块命令


8 ]& M7 g6 O/ a命令使用说明:
  子程序名：文件_取文本编码
1 }0 M9 z. z/ G  L! c) q    获取指定路径的txt文档的编码格式。成功返回（1：UTF-8，2：Unicode；3：Unicode big endian；4：ANSI），默认返回 4。
    返回值类型：整数型
    参数<1>的名称为“参_文件路径”，类型为“文本型”。
. z" T% @5 I1 O! f& y8 A1 f7 X

9 A5 @4 _0 u& T' }

' Y/ q$ ^0 M6 n6 H. n! w2 }

命令源码:

8 |* G. `0 i9 q* `7 Z6 I

1. .版本 2
     l5 U6 q# ]( w, N- t2 p8 F
2. 
   5 u3 W6 S2 ]0 f% k2 ]
3. .子程序 文件_取文本编码, 整数型, 公开, 获取指定路径的txt文档的编码格式。成功返回（1：UTF-8，2：Unicode；3：Unicode big endian；4：ANSI），默认返回 4。
   
4. .参数 参_文件路径, 文本型
   / [5 X$ R$ m- K& Q
5. .局部变量 局_文件内容, 字节集
   4 `9 c0 Z: `5 P
6. .局部变量 局_文件长度, 整数型
   
7. .局部变量 局_lpiResult, 整数型
   
8. 
   8 j( g6 o8 [6 I/ f5 r4 u
9. 局_文件内容 ＝ 读入文件 (参_文件路径)
   , L3 z( k/ D; @
10. 局_文件长度 ＝ 取字节集长度 (局_文件内容)
    
11. .判断开始 (局_文件长度 ＞ 2 且 取字节集中间 (局_文件内容, 1, 2) ＝ { 239, 187 })  ' UTF-8
    
12.     .如果真 (取字节集中间 (局_文件内容, 3, 1) ＝ { 191 })
    
13.         返回 (1)
    
14.     .如果真结束
    
15. 
    ( y) @4 t% Q+ U+ t! @/ y4 \
16. .判断 (取字节集中间 (局_文件内容, 1, 2) ＝ { 255, 254 })  ' Unicode
    
17.     返回 (2)
    2 F% |: a! H, X( V9 @
18. .判断 (取字节集中间 (局_文件内容, 1, 2) ＝ { 254, 255 })  ' Unicode big endian
    
19.     返回 (3)
    
20. .默认
    ; c/ X% L5 k% x
21. 
    
22. .判断结束
    ( M. f& e: s+ B; b5 o5 ]  G' |
23. 局_lpiResult ＝ -1
    0 E% o) D, Q  x( w5 C( w! M- k0 x
24. .判断开始 (IsTextUnicode (局_文件内容, 局_文件长度, 局_lpiResult))  ' Unicode
    
25.     返回 (2)
    
26. .判断 (文本_是否UTF8_汇编 (局_文件内容))  ' UTF-8
    
27.     返回 (1)
    
28. .默认
    
29.     返回 (4)  ' ANSI
    
30. .判断结束
    
31. 
    3 U! L; {5 N* ^5 _, t

复制代码

' q+ }, S" Y- `8 F0 T$ k( z# T
. x  p. o$ z& U
& W& P8 }8 Y( a- j' g+ o; t: c2 o2 M# I

3 m8 H* w# W( K# o3 n  F源码复制到易语言教程:

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


- {$ p% v! i2 x9 N/ p6 }然后拖动鼠标把程序集名-窗口程序集.选中.然后粘贴上面的代码
" V- m  u7 ^6 |2 e
即可插入易语言命令代码哦
9 p( z7 A) a/ E1 Y
DLL源码复制到易语言教程：

# u+ h$ q% y* k+ J: ~; E0 [


" \8 w  |& |1 k: e

15052556145

111111111111111111111

Acoyi

& m) t" o+ Y. A6 J楼主太厉害了！楼主，我爱你！我觉得易语言吧真是个好地方！

三须的猫

这个帖子不回对不起自己！我想我是一天也不能离开易语言吧。

yyz860723

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

好奇先生

1111112313123123

柳萱公子

.版本 2

.子程序 文件_取文本编码, 整数型, 公开, 获取指定路径的txt文档的编码格式。成功返回（1：UTF-8，2：Unicode；3：Unicode big endian；4：ANSI），默认返回 4。
" C7 L8 A# }" X. ^. C/ [.参数 参_文件路径, 文本型
% k% q8 D  P4 I( q2 Z' l.局部变量 局_文件内容, 字节集
.局部变量 局_文件长度, 整数型
.局部变量 局_lpiResult, 整数型

局_文件内容 ＝ 读入文件 (参_文件路径)
" i5 I2 N9 N0 I% y8 P; E$ v局_文件长度 ＝ 取字节集长度 (局_文件内容)
.判断开始 (局_文件长度 ＞ 2 且 取字节集中间 (局_文件内容, 1, 2) ＝ { 239, 187 })  ' UTF-8
* {3 [  c( X  l: \2 H7 V    .如果真 (取字节集中间 (局_文件内容, 3, 1) ＝ { 191 })
        返回 (1)
  `+ V  S: `" h: ?& `    .如果真结束

.判断 (取字节集中间 (局_文件内容, 1, 2) ＝ { 255, 254 })  ' Unicode
9 d8 H: L# p4 H. r7 t0 J    返回 (2)
+ @3 p/ A' z7 v- [/ h5 c.判断 (取字节集中间 (局_文件内容, 1, 2) ＝ { 254, 255 })  ' Unicode big endian
, e! U; G9 p) k9 k0 h' w    返回 (3)
5 a' b7 }0 }3 n9 o5 Y( R.默认

# q: R! R; J6 t, e' U3 e2 y.判断结束
2 S3 V. @+ P" B局_lpiResult ＝ -1
. W4 C1 s3 N* F* w, D' B/ u.判断开始 (IsTextUnicode (局_文件内容, 局_文件长度, 局_lpiResult))  ' Unicode
    返回 (2)
( m8 f1 |4 V- G. L2 ]% p# X+ Y.判断 (文本_是否UTF8_汇编 (局_文件内容))  ' UTF-8
% B' x7 D2 J& J# |, H' I- _* H    返回 (1)
# K- g: W& T# v- W) Z.默认
    返回 (4)  ' ANSI
.判断结束