.版本 2 .程序集 窗口程序集_窗口1 .子程序 _按钮1_被单击 .局部变量 原始字节集长度, 整数型 .局部变量 现在字节集长度, 整数型 .局部变量 当前字节集, 字节集 .局部变量 窗口数据, 字节集 .局部变量 窗口标题, 字节集 .局部变量 窗口顶边, 字节集 .局部变量 窗口左边, 字节集 .局部变量 窗口高度, 字节集 .局部变量 窗口宽度, 字节集 窗口标题 ＝ 到字节集 (“标题标题标题标题标题标题标题标题标题标题标题标题标题”) 窗口左边 ＝ 到字节集 (“左边左边左边左边左边左边左边左边左边左边左边左边左边”) 窗口顶边 ＝ 到字节集 (“顶边顶边顶边顶边顶边顶边顶边顶边顶边顶边顶边顶边顶边”) 窗口高度 ＝ 到字节集 (“高度高度高度高度高度高度高度高度高度高度高度高度高度”) 窗口宽度 ＝ 到字节集 (“宽度宽度宽度宽度宽度宽度宽度宽度宽度宽度宽度宽度宽度”) 原始字节集长度 ＝ 52 现在字节集长度 ＝ 取字节集长度 (到字节集 (编辑框_标题.内容)) 当前字节集 ＝ 到字节集 (编辑框_标题.内容) ＋ 取空白字节集 (原始字节集长度 － 现在字节集长度) 窗口数据 ＝ 字节集替换 (#窗口, 寻找字节集 (#窗口, 窗口标题, ), 52, 当前字节集) 现在字节集长度 ＝ 取字节集长度 (到字节集 (编辑框_顶边.内容)) 当前字节集 ＝ 到字节集 (编辑框_顶边.内容) ＋ 取空白字节集 (原始字节集长度 － 现在字节集长度) 窗口数据 ＝ 字节集替换 (窗口数据, 寻找字节集 (窗口数据, 窗口顶边, ), 52, 当前字节集) 现在字节集长度 ＝ 取字节集长度 (到字节集 (编辑框_左边.内容)) 当前字节集 ＝ 到字节集 (编辑框_左边.内容) ＋ 取空白字节集 (原始字节集长度 － 现在字节集长度) 窗口数据 ＝ 字节集替换 (窗口数据, 寻找字节集 (窗口数据, 窗口左边, ), 52, 当前字节集) 现在字节集长度 ＝ 取字节集长度 (到字节集 (编辑框_宽度.内容)) 当前字节集 ＝ 到字节集 (编辑框_宽度.内容) ＋ 取空白字节集 (原始字节集长度 － 现在字节集长度) 窗口数据 ＝ 字节集替换 (窗口数据, 寻找字节集 (窗口数据, 窗口宽度, ), 52, 当前字节集) 现在字节集长度 ＝ 取字节集长度 (到字节集 (编辑框_高度.内容)) 当前字节集 ＝ 到字节集 (编辑框_高度.内容) ＋ 取空白字节集 (原始字节集长度 － 现在字节集长度) 窗口数据 ＝ 字节集替换 (窗口数据, 寻找字节集 (窗口数据, 窗口高度, ), 52, 当前字节集) .如果 (通用对话框1.打开 () ＝ 真) 写到文件 (通用对话框1.文件名, 窗口数据) .否则 .如果结束