TC官方合作论坛

标题: 数组删除问题 [打印本页]

作者: zxczxc1968531 时间: 2016-8-22 15:26
标题: 数组删除问题
变量A=数组（0，1，2，3，4）
数组指定位置删除(A,2)//删除下标2的值后
消息框（A）//这里发现删除后的数组为数组（0，1，3，4，5=“”），2键值删除了，但是后面多出一个下标5来
//重新获取数组
变量数组长度=数组大小（A）//数组长度这里依然是5，A依然是（0，1，3，4，5=“”）
//这样在我将数组每一个键输入文本文档成为一行，这里就会出现一个空行，不是最后一行空行，而是删除的那一行是空行
看官方视频，这里重新获取数组后可以重新排序，那么6.2版本这个好像不行，怎样才能让数组重新排序成为数组（0，1，2，3）或者数组（0，1，2，3，4=“”）也行，试过数组删除等都达不到效果

作者: zxczxc1968531 时间: 2016-8-22 16:22

算了加个判断语句就也行，如果为空行的行号就不写入字符，这样就没空行了，只不过TC这个数组大小改了有意思吗，照着视频一样写下来就是不一样
如果(i==行号-1)
否则
文件写入一行字符(文件句柄,文件内容数组[i])

作者: 言术 时间: 2016-8-22 17:34
功能开始_点击()
调试输出(数组删除(数组(0,1,2,3,4),2))
结束

功能数组删除(数组名,删除位置)
变量大小=数组大小(数组名)
遍历(变量 i = 删除位置; i < 大小-1; i++)
数组名[i] = 数组名[i+1]
结束
数组指定位置删除(数组名,大小-1)
返回数组名
结束

//我没做任何错误判断,只是大概写下思路

作者: zxczxc1968531 时间: 2016-8-22 18:44

言术发表于 2016-8-22 17:34
功能开始_点击()
调试输出(数组删除(数组(0,1,2,3,4),2))
结束

功能按钮1_点击()
修改文件("C:\\Users\\Administrator\\Desktop\\新建文本文档.txt","删除","5","改掉")

结束
功能修改文件(文件,类型,行号,内容)
变量长度=文件长度(文件路径)
变量文件句柄=文件打开(文件路径)
如果(文件句柄==-1)
      返回 "文件不存在"
结束
变量  文件内容=文件读字符(文件句柄,长度)
变量文件内容数组=数组()
字符串分割(文件内容,"\r\n",文件内容数组)

消息框(文件内容数组)
变量数组长度=数组大小(文件内容数组)

如果(数组长度<行号)
      返回 "行号超过文件最大行数"
结束

选择(类型)
      条件 "删除"

      数组指定位置删除(文件内容数组,4)

      消息框(文件内容数组)
      条件 "修改"
      文件内容数组[行号-1]=内容
      默认
      返回 "没有:"&类型&"这个操作类型"
结束
文件关闭(文件句柄)
文件句柄=文件打开(文件路径,"读写|文件要存在|共享写|共享读|清空文件")

数组长度=数组大小(文件内容数组)

消息框(文件内容数组)

遍历(变量 i = 0; i < 数组长度; i++)
      如果(i==行号-1)
      否则
         文件写入一行字符(文件句柄,文件内容数组)
         消息框(文件内容数组)
      结束
结束
文件关闭(文件句柄)
结束
我意思是去掉如果(i==行号-1)这个就会出现空一行，这个是我自己加上去的，  第二次再用这个数组长度=数组大小(文件内容数组)完全没有意思，数组没任何变化，并没有重新按序列排列，视频里面用这个看效果是重新排列了的，难道是版本改了数组一些功能？

作者: 言术 时间: 2016-8-23 07:28

zxczxc1968531 发表于 2016-8-22 18:44
功能按钮1_点击()
修改文件("C:\\Users\\Administrator\\Desktop\\新建文本文档.txt","删除","5"," ...

功能修改文件(文件路径,行号,修改类型="删除",修改内容="")
选择(修改类型)
      条件 "删除"
      文件删指定行(文件路径,行号)
      条件 "覆盖"
      文件删指定行(文件路径,行号)
      文件指定行插入(文件路径,修改内容,行号)
结束
结束

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1