（求助）关于超级列表框1.现行选中项换到另一行 （在线等）

391835159

如上图：
超级列表框1.现行选中项换到另一行已经运行中的而使无法更换数据也换不成功
意思就是运行中的无法换到运行中的。只能换到 空闲 的如何做到


下面是源码

1. 
   
2. .版本 2
   
3. .支持库 iext
   
4. 
   
5. .子程序 _按钮1_被单击
   
6. .局部变量 寄存信息, 文本型
   
7. 
   
8. .判断开始 (编辑框1.内容 ≠ “”)
   
9.     寄存信息 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 2)
   
10.     超级列表框1.置标题 (超级列表框1.现行选中项, 2, “0”)
    
11.     超级列表框1.置标题 (到整数 (编辑框1.内容) － 1, 2, 寄存信息)
    
12. .默认
    
13. 
    
14. .判断结束
    
15. 
    

复制代码

wqejnyt

[e].版本 2
.支持库 iext
.程序集 窗口程序集1
.程序集变量 存入文本1, 文本型
.程序集变量 存入文本2, 文本型
.程序集变量 存入文本3, 文本型
.程序集变量 记录编号, 文本型
.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
.计次循环首 (10, i)
    超级列表框1.插入表项 (, , , , , )
    超级列表框1.置表项数值 (i － 1, i － 1)
    超级列表框1.置标题 (i － 1, 0, “0” ＋ 到文本 (i))
    超级列表框1.置标题 (i － 1, 1, “状态” ＋ 到文本 (i))
    超级列表框1.置标题 (i － 1, 2, “金额” ＋ 到文本 (i))
    超级列表框1.置标题 (i － 1, 3, “时间” ＋ 到文本 (i))
.计次循环尾 ()

.子程序 _超级列表框1_左键单击表项
记录编号 ＝ “”
存入文本1 ＝ “”
存入文本2 ＝ “”
存入文本3 ＝ “”
.如果真 (记录编号 ＝ “”)
    记录编号 ＝ 到文本 (超级列表框1.取表项数值 (超级列表框1.现行选中项))
    存入文本1 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 1)
    存入文本2 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 2)
    存入文本3 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 3)
.如果真结束
返回 ()
.子程序 _超级列表框1_右键单击表项
.如果真 (记录编号 ≠ “”)
    超级列表框1.置标题 (到数值 (记录编号), 1, 超级列表框1.取标题 (超级列表框1.现行选中项, 1))
    超级列表框1.置标题 (到数值 (记录编号), 2, 超级列表框1.取标题 (超级列表框1.现行选中项, 2))
    超级列表框1.置标题 (到数值 (记录编号), 3, 超级列表框1.取标题 (超级列表框1.现行选中项, 3))
    超级列表框1.置标题 (超级列表框1.现行选中项, 1, 存入文本1)
    超级列表框1.置标题 (超级列表框1.现行选中项, 2, 存入文本2)
    超级列表框1.置标题 (超级列表框1.现行选中项, 3, 存入文本3)
    记录编号 ＝ “”
    存入文本1 ＝ “”
    存入文本2 ＝ “”
    存入文本3 ＝ “”
.如果真结束
返回 ()

[/e]

原理和以下一样只是楼主不愿动动脑想一想！
[e] .版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
编辑框1.内容 ＝ “1111”
编辑框2.内容 ＝ “2222”

.子程序 _按钮1_被单击
.局部变量 暂存, 文本型
暂存 ＝ 编辑框1.内容
编辑框1.内容 ＝ 编辑框2.内容
编辑框2.内容 ＝ 暂存


[/e]

xbzx

看不懂你说的是什么，请不要使用错别字，最好错误的源码提供。

白河小鸟

你又来了= ={:3_225:}你还搞不懂这个，我上次那个源码看不懂= =？

391835159

回复 3# qq5045100


    是又来了, 换数据的时候不能换到有数据那行去,
目的只想只能换到空闲去

意思就是不能跟运行那行换,只可以换到没有运行那行去

airpppp

回复  qq5045100


    是又来了, 换数据的时候不能换到有数据那行去,
目的只想只能换到空闲去

意思 ...
391835159 发表于 2010-8-26 19:00

    看来又是十足的"伸手党",别人给了例程了,自己变通下加个判断也不会?

391835159

回复 6# wqejnyt

谢谢这位大哥了辛苦了，我动过脑了。用大哥这个例子还是没有办法完成我说的那样。
谢谢了，我的主题？？？

391835159

回复 5# airpppp


    这位大哥你好，谢谢你的建议。我不是你说的那样，加判断我试过了，可还是无法做到而且没有反映。
我是初学易没有多久所以不懂的都在这样请教。请多多包涵，谢谢

程序开发推广

有事说清楚点。。

391835159

回复 9# 源之缘

如主题
    超级列表框1.现行选中项换到另一行已经运行中的而使无法更换数据也换不成功
意思就是运行中的无法换到运行中的。只能换到 空闲 的如何做到