PerlEdit编辑器，扩展界面支持库

_启动窗口.移动 ((取屏幕宽度 () － 840) ÷ 2, (取屏幕高度 () － 600) ÷ 2, 840, 640)
初始化组件尺寸 ()
加载函数列表 ()
置状态 (0, “状态：函数库加载完毕！”)
配置代码编辑框 ()

编辑框_代码.清空编辑框 ()
编辑框_代码.加入文本 (“#!/usr/bin/perl” ＋ #换行符, -1)
_插入当前时间_被选择 ()
编辑框_代码.加入文本 (#换行符, -1)
' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''设置旁注栏，折叠栏等；
编辑框_代码.置属性 (“fold”, “1”) ' 旁注栏折叠重要属性，必须设置
编辑框_代码.置属性 (“fold.compact”, “0”) ' 旁注栏折叠尾部重要属性，必须设置
编辑框_代码.置旁注栏宽度 (2, 13) ' 旁注栏折叠器
编辑框_代码.置旁注栏掩码 (2, #代码编辑框常量.折叠器)
编辑框_代码.置旁注栏响应鼠标 (2, 真)
编辑框_代码.置折叠标志 (16)
编辑框_代码.置词法分析器 (#代码编辑框常量.词法分析器_PERL)
编辑框_代码.置关键字 (0, #关键字)
编辑框_代码.置关键字 (1, 获取函数 ())
所有关键字 ＝ 分割文本 (#关键字 ＋ “ ” ＋ 获取函数 (), “ ”, )
编辑框_代码.置风格字体 (32, “Courier New”) ' 32=风格_默认
编辑框_代码.置风格字体大小 (32, 12)
编辑框_代码.置风格粗体 (32, 真)
编辑框_代码.置风格前景色 (33, #黑色) ' 33=风格_行号