AGETFILEVERSION 函 数

创建 一个 数组 其中包含有关文件的 Windows 版本资源的 信息 例如 .exe .dll 和 . fll

文件 或在 Visual FoxPro 中创建的自动服务文件

语 法

AGETFILEVERSION ( ArrayNam e, cFileNam e)

返 值 类 型

数值型

参 数 描 述

ArrayName

指 定 数 组 的 名 称 在 该 数 组 中 放 置 文 件 信 息 所 指 定 的 数 组 不 存 在 V isual FoxPro 会 自 动 创 建 该 数 组 如 果 该 数 组 存 在 但 是 大 小 不 足 以 容 纳 文 件 信

息 则 V isual FoxPro 自 动 增 加 该 数 组 的 大 小 如 果 该 数 组 比 所 需 的 要 大 则

V isual FoxPro 会 截 短 该 数 组

下表列出了 该 数组 每个元素的内容

续 表

15 翻译代码 例如 可以用以下代码来判断 VisualFoxPro 可执行文件的 LocaleID

DIMENSION aFiles[1] AGETFILEVERSION(aFiles,”VFP6.EXE”)

? EVAL(“ 0x”+LEFT(aFiles[15],4))

** Returns 1033 for US version

cFileName

指 定 文 件 名 该 文 件 的 信 息 放 在 数 组 中 所 指 定 的 类 库 名 显 示 在 文 件 名 ”

文 本 框 中 如 果 所 指 定 的 类 库 不 存 在 会 产 生 一 个 错 误

说 明

通常 AGETFILEVERSION 用于获得文件的 Windows 版本资源的 信息 例如 .exe . dll 和 . fll 文件 或在 Visual FoxPro 中创建的自动服务文件 为了获得

Windows 版本资源 必须在 EXE 版本 对话框 中为一个 Visual FoxPro 自动服务程

序至少指定一项

AGETFILEVERSION 返回数组 的元素数 如果所指定的文件没有 W indows 版本资源 会返回零 并 且 数组 如果 已经创建 保持不变

AGETFILEVERSION 最小可以截短为 5 个字符

请 参 阅

ADIR ( ) , DIR 或 DIRECTORY