（XD::File:charset）获取文本流当前的字符集

marting

Charset 属性指示用于转换文本 Stream 内容的字符集，以将其存储在 Stream 对象的内部缓冲区中。
设置和返回值设置或返回 String 值，该值指定用于转换 String 内容的字符集。默认值为“Unicode”。所允许的值是作为 Internet 字符集字符串（例如，“iso-8859-1”，“Windows-1252”等）被传递到接口的典型字符串。有关系统支持的字符集字符串的列表，请参阅 Windows 注册表中 HKEY_CLASSES_ROOT\MIME\Database\Charset 的子键。
说明在文本 Stream 对象中，文本数据存储在 Charset 属性指定的字符集中。默认值为 Unicode。Charset 属性用于将数据转换为输入 Stream 或从 Stream 中输出。例如，如果 Stream 包含 ISO-8859-1 数据，并将该数据复制到 BSTR，Stream 对象将把该数据转换为 Unicode。反之亦然。
对于打开的 Stream，其当前 Position 必须位于 Stream (0) 的开始处，这样才能设置 Charset。
Charset 只能与文本 Stream 对象（Type 为 adTypeText）一起使用。如果 Type 为 adTypeBinary，则忽略此属性。

1. (defun XD::File:charset ()
   
2.   (xd::apply vlax-get_property (list **XD:AdoStream** 'charset))
   
3. )
   

(defun XD::File:charset ()<br />   (xd::apply vlax-get_property (list **XD:AdoStream** 'charset))<br /> )<br />