_text 系统内存变量示例

下面的示例演示了如何把文本合并输出到不同的文件中。

set talk off
set textmerge on noshow && 启用文本合并,不输出到屏幕上。
set textmerge delimiters to && 默认的文本合并分隔符 <<,>>
set textmerge to date.txt && 创建并输出到 date.txt 文件中
store _text to gcdatehandle && 保存 date.txt 的文件句柄
store -1 to _text && 关闭对 date.txt 文件的输出,但保持 date.txt 文件打开
set textmerge to time.txt && 创建并输出到 time.txt 文件中
store _text to gctimehandle && 存贮 time.txt 的文件句柄

*** 向 time.txt 传送下列文本***
\the time is:
store gcdatehandle to _text && 现在把文本输出到 date.txt 文件
*** 向 date.txt 传送下列文本***
\today's date is:
store gctimehandle to _text && 现在把文本输出到 time.txt 文件
*** 把时间输出在同一行上***
\\ <<time( )>>
store gcdatehandle to _text && 现在把文本输出到 time.txt 文件
*** 把日期输出在同一行上***
\\ <<date( )>>
close all && 关闭所有文件

type date.txt && 查看 date.txt 文件的内容...
wait window && 暂停
type time.txt && ...以及 time.txt 文件的内容
erase date.txt
erase time.txt