我的模块之日志模块 - 精易论坛

子程序名	返回值类型	公开	备注
_临时子程序

变量名	类型	静态	数组	备注
log	日志类

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
log.创建 (取运行目录 () ＋ “\test.log”)
log.清空日志 ()
log.写日志行 (“hello”, )
log.写日志行 (“world”, 假)
输出调试文本 (“第一次读日志：”, log.读所有文本 ())
log.写日志行 (“hello”, )
log.写日志行 (“易语言”, )
输出调试文本 (“第二次读日志：”, log.读所有文本 ())
log.清空日志 ()
log.写日志行 (“hello”, )
log.写日志行 (“world”, )
输出调试文本 (“第三次读日志：”, log.读所有文本 ())

* 第一次读日志：
* * [2023年1月8日13时28分14秒] hello
* world
* 第二次读日志：
* * [2023年1月8日13时28分14秒] hello
* world
* [2023年1月8日13时28分14秒] hello
* [2023年1月8日13时28分14秒] 易语言
* 第三次读日志：
* * [2023年1月8日13时28分14秒] hello
* [2023年1月8日13时28分14秒] world
被调试易程序运行完毕

复制代码

模块名称：日志模块
作者：精易论坛 chenyucheng
版本：1.0
日志类模块
@备注:
本模块使用类来读写日志。有什么命令需要，请到原帖提建议，我会帮你制作，除非我不会做。
------------------------------
.版本 2
.子程序运行错误时写日志, , 公开, 当运行时错误时自动写入日志。注意：本命令使用“置错误提示管理()”来执行自动写日志，之后不能使用“置错误提示管理()”，否则会覆盖错误提示子程序，导致不能写到日志。日志对象也必须创建，否则不能写日志。要想停用“运行错误时写日志”，请使用无参数的“置错误提示管理 ()”。
.参数日志对象, 日志类
.程序集日志类, , 公开
.子程序创建, 逻辑型, 公开, 创建日志对象。成功返回真，失败返回假。注意不能在已创建后创建。
.参数文件名, 文本型, 可空, 日志文本文件名，可包括路径。如果为空，则创建到程序运行目录下的“log.log”文件。
.子程序读所有文本, 文本型, 公开
.子程序清空日志, , 公开, 清空日志。
.子程序写日志行, , 公开, 写出一行日志到日志后面。
.参数日志文本, 文本型
.参数是否带时间, 逻辑型, 可空, 前面是否有时间标记。如果为空则默认带时间。

复制代码