易语言API取system32目录和取Windows目录

易语言通过API获取取system32目录,比如c:\WINDOWS\system32\，和取Windows目录，比如c:\WINDOWS\,用到了以下API:

GetSystemDirectory

这个函数能取得Windows系统目录（System目录）的完整路径名。在这个目录中，包含了所有必要的系统文件。根据微软的标准，其他定制控件和一些共享组件也可放到这个目录。通常应避免在这个目录里创建文件。在网络环境中，往往需要管理员权限才可对这个目录进行写操作

511遇见易语言模块API教程

返回值

Long，装载到lpBuffer缓冲区的字符数量。如lpBuffer不够大，不能容下文件名，则返回要求的缓冲区长度

参数表

参数 类型及说明

lpBuffer String，用于装载系统目录路径名的一个字串缓冲区。它应事先初始化成“路径”字符串的长度+1。通常至少要为这个缓冲区分配MAX_PATH个字符的长度

nSize Long，lpBuffer字串的最大长度

易语言DLL

.版本 2

.DLL命令 GetSystemDirectoryA, 整数型, "kernel32", "GetSystemDirectoryA", , 目录_取system32目录 这个函数能取得Windows系统目录（System目录）的完整路径名。
    .参数 缓冲区, 文本型, , 用于装载系统目录路径名的一个字串缓冲区。它应事先初始化成nSize+1个字符的长度。通常至少要为这个缓冲区分配MAX_PATH个字符的长度
    .参数 缓冲区长度, 整数型, , lpBuffer字串的最大长度;255

GetWindowsDirectory

GetWindowsDirectory函数能获取Windows目录的完整路径名。在这个目录里，保存了大多数windows应用程序文件及初始化文件

返回值

Long类型，复制到lpBuffer的一个字串的长度。如lpBuffer不够大，不能容下整个字串，就会返回lpBuffer要求的长度，零表示失败。并且将出错的信息存储在GetLastError函数中，用户可以通过调用GetLastError来得到错误信息。

易语言DLL

.版本 2

.DLL命令 GetWindowsDirectoryA, 整数型, "kernel32", "GetWindowsDirectoryA", , 目录_取Windows目录 这个函数能获取Windows目录的完整路径名。
    .参数 缓冲区, 文本型, , 指定一个字串缓冲区，用于装载Windows目录名。除非是根目录，否则目录中不会有一个中止用的“\”字符
    .参数 尺寸, 整数型, , lpBuffer字串的最大长度;

 

 易语言模块源码：

1、目录_取system32目录 

.版本 2

.子程序 目录_取system32目录, 文本型, 公开, 返回：比如c:\WINDOWS\system32\
.局部变量 j_text, 文本型

j_text ＝ 取空白文本 (255)
GetSystemDirectoryA (j_text, 255)
.如果真 (取文本右边 (j_text, 1) ≠ “\”)
    j_text ＝ j_text ＋ “\”
.如果真结束
返回 (j_text)

2、目录_取Windows目录 

.版本 2

.子程序 目录_取Windows目录, 文本型, 公开, 返回：比如c:\WINDOWS\
.局部变量 j_text, 文本型

j_text ＝ 取空白文本 (255)
GetWindowsDirectoryA (j_text, 255)
.如果真 (取文本右边 (j_text, 1) ≠ “\”)
    j_text ＝ j_text ＋ “\”
.如果真结束
返回 (j_text)