数据 = 读入文件 (取执行文件名 ()) ' 加载本身
提取数据 = 分割字节集 (数据, 到字节集 (#分割符号), ) ' 把数据提取出来,取中间部分
.如果真 (取数组成员数 (提取数据) < 5) ' 文件头+数据+文件尾,因为要算上程序本身带有的分割符,一共五个部分,所以当提取出来的数组小于3的话,代表数据没加入软件。
信息框 (“请把数据打包在打开本软件!”, 0, )
结束 ()
.如果真结束
_启动窗口.底图 = 提取数据 [3] ' 因为要算上程序本身带有的分割符,所以分割出来的数据有五分,数据在中间,分割出来后,直接调用
上一篇 彗星真彩动态窗口例程