TC官方合作论坛

标题: 求助~~求写列表框配置~~谢谢 [打印本页]

作者: jianqiumy    时间: 2013-4-22 01:48
标题: 求助~~求写列表框配置~~谢谢
几天都上不了论坛,不知道为什么!!
刚好今天可以上了,就上来求帮忙~~~麻烦各位了

求助~~求写列表框配置~~谢谢

我想用写2个列表框: "列表框0和列表框1" 的配置,不要分开写,用一个循环或者遍历,用数组也行, 代码少就最好.~要是分开一个个写就没意义了~~求帮忙




作者: pp5201210    时间: 2013-4-22 02:20
  1. 空间 测试用
  2. //默认空间


  3. //开始按钮_点击操作
  4. 功能 开始_点击()

  5.    
  6. 功能结束

  7. //退出按钮_点击操作
  8. 功能 退出_点击()

  9. 辅助.退出()
  10. 功能结束

  11. 功能 按钮0_点击()
  12.     //这里添加你要执行的代码
  13.     返回串,大小
  14.     内容=编辑框.获得文本("编辑框0")
  15.     //辅助.消息框(内容)
  16.     字符串.分割(内容,"|",返回串)
  17.     数组空间.大小(返回串,大小)
  18.     遍历(i=0;i<大小;i++)
  19.         如果(i<=(大小-1)/2)
  20.             列表框.增加文本("列表框0",返回串[i])
  21.         如果结束
  22.         如果(大小-i-1>i)
  23.             列表框.增加文本("列表框1",返回串[大小-1-i])
  24.         如果结束
  25.     遍历结束
  26.    
  27. 功能结束

  28. 空间结束
复制代码

作者: pp5201210    时间: 2013-4-22 02:22
不知道是不是楼主需要的 随便写了个
作者: jianqiumy    时间: 2013-4-22 02:26
谢谢辛苦了,你怎么打个编辑框呢?还是打错字呢?
我要写2个列表框的配置
谢谢帮忙,我只要列表框的,不要编辑框

作者: zhmap    时间: 2013-4-22 06:26
个数=列表框.得到个数("列表框0")
for(j=0;j<个数;j++)
辅助.写配置("界面控件配置","列表框"&j,列表框.获得文本("列表框0",j),"d:\\abc.ini")
endfor
作者: 幼园留级老油条    时间: 2013-4-22 11:29
  1.    // "保存":   //保存列表信息
  2.     遍历(i=0;i<列表框最大序号;i++)
  3.         个数=列表框.得到个数(列表框&i)
  4.         内容=数组[个数]
  5.         遍历(j=0;j<个数;j++)
  6.             内容[j]=列表框.获得文本(列表框&i,j)
  7.             辅助.写配置("列表框"&i,"行数"&j,内容[j],系统.获取程序路径()&"信息.ini")
  8.         遍历结束
  9.     遍历结束
复制代码

作者: jianqiumy    时间: 2013-4-22 17:16
[code]   // "保存":   //保存列表信息
    遍历(i=0;i<列表框最大序号;i++)
        个数=列表框.得到个数(列表框&i)
        内容=数组[个数]
        遍历(j=0;j<个数;j++)
           ......
幼园留级老油条 发表于 2013-4-22 11:29:48

谢谢,请问 " 列表框最大序号" 上面要怎么写?因为结数组不熟!!!
作者: 幼园留级老油条    时间: 2013-4-22 17:19
你先采纳
作者: jianqiumy    时间: 2013-4-22 18:10
你先采纳
幼园留级老油条 发表于 2013-4-22 17:19:03

谢谢!!!!!!采纳了,因为打开论坛很慢,电信12m的网!!!几好分钟也打不开这论坛!!!汗了
作者: 幼园留级老油条    时间: 2013-4-22 18:37
  1. 功能 开始_点击()
  2.     遍历(i=0;i<4;i++)
  3.         个数=列表框.得到个数(列表框&i)
  4.         内容=数组[个数]
  5.         遍历(j=0;j<个数;j++)
  6.             内容[j]=列表框.获得文本(列表框&i,j)
  7.             辅助.写配置("列表框"&i,"行数"&j,内容[j],系统.获取程序路径()&"信息.ini")
  8.         遍历结束
  9.     遍历结束
  10.    功能结束
复制代码

作者: jianqiumy    时间: 2013-4-22 19:00
[code]功能 开始_点击()
    遍历(i=0;i<4;i++)
        个数=列表框.得到个数(列表框&i)
        内容=数组[个数]
        遍历(j=0;j<个数;j++)
            内容[j]=列表框.获得文本(列表框&i,j)
......
幼园留级老油条 发表于 2013-4-22 18:37:43

谢谢~~~老油条~~我明白你的意思~~~~~今天又学了一点~~~~还学会了运用一维数组,呵呵~~~开心啊
你的几行代码让我想到好几个方法可以实现这个问题!!!!!!谢谢啊
人笨没办法!!!其实刚才(变量 列表框最大序号=N个 就可以了)


作者: 幼园留级老油条    时间: 2013-4-22 19:20
[quote][code]功能 开始_点击()
    遍历(i=0;i<4;i++)
        个数=列表框.得到个数(列表框&i)
        内容=数组[个数]
        遍历(j=0;j<个数;j++)
            内容[j]=列表框.获得文本(列表框......
jianqiumy 发表于 2013-4-22 19:00:46
以后跟哥后面学,我这里知识多呢,
作者: jianqiumy    时间: 2013-4-22 21:37
[quote][quote][code]功能 开始_点击()
    遍历(i=0;i<4;i++)
        个数=列表框.得到个数(列表框&i)
        内容=数组[个数]
        遍历(j=0;j<个数;j++)
            内容[j]=列表框.获得文本......
幼园留级老油条 发表于 2013-4-22 19:20:26

谢谢油条哥,我会跟着你学的~~我知道你会的多~就怕你不教~~先谢谢了~~~~
作者: jianqiumy    时间: 2013-4-22 21:54
[quote][quote][code]功能 开始_点击()
    遍历(i=0;i<4;i++)
        个数=列表框.得到个数(列表框&i)
        内容=数组[个数]
        遍历(j=0;j<个数;j++)
            内容[j]=列表框.获得文本......
幼园留级老油条 发表于 2013-4-22 19:20:26

油条哥~~~不好意思再请教个问题:
我想把列表框配置文件写成这样不知道能不能?怎么样写呢?

[用户配置]
列表框0行数0=1111
列表框0行数1=2222
列表框1行数0=1111
列表框1行数1=2222


作者: 幼园留级老油条    时间: 2013-4-22 22:28
  1.   // "保存":   //保存列表信息
  2.     遍历(i=0;i<列表框最大序号;i++)
  3.         个数=列表框.得到个数(列表框&i)
  4.         内容=数组[个数]
  5.         遍历(j=0;j<个数;j++)
  6.             内容[j]=列表框.获得文本(列表框&i,j)
  7.             辅助.写配置("用户配置","列表框"&i&"行数"&j,内容[j],系统.获取程序路径()&"信息.ini")
  8.         遍历结束
  9.     遍历结束
复制代码

作者: jianqiumy    时间: 2013-4-22 22:31
[code]  // "保存":   //保存列表信息
    遍历(i=0;i<列表框最大序号;i++)
        个数=列表框.得到个数(列表框&i)
        内容=数组[个数]
        遍历(j=0;j<个数;j++)
            内容[......
幼园留级老油条 发表于 2013-4-22 22:28:03

~~~感激啊~~~~~~又长知识了~~~~~谢谢油条哥
厉害啊怎么改都行!!!我一定要好好学习

作者: jianqiumy    时间: 2013-4-23 00:22
[code]  // "保存":   //保存列表信息
    遍历(i=0;i<列表框最大序号;i++)
        个数=列表框.得到个数(列表框&i)
        内容=数组[个数]
        遍历(j=0;j<个数;j++)
            内容[......
幼园留级老油条 发表于 2013-4-22 22:28:03

油条哥好~~~刚出去一会~~~~~~~~没试读配置,我用这个原来能读的,现在只可以读一部分,又得麻烦你了,真不好意思
//读改成这样就只可以读一部分了!!真晕
            i=0
           循环(真)
        内容=辅助.读配置("用户配置","列表框"&i&"行数"&i,路径)
        如果(内容=="")
            跳出
        否则
             列表框.增加文本("列表框"&i,内容)
        如果结束
           i=i+1
           循环结束




作者: 幼园留级老油条    时间: 2013-4-23 00:53
  1. 功能 读配置()
  2. 遍历(i=0;i<2;i++)
  3.         遍历(j=0;j<10000;j++)
  4.             内容=辅助.读配置("用户配置","列表框"&i&"行数"&j,系统.获取程序路径()&"信息.ini")
  5.             如果(内容!="")
  6.                 列表框.增加文本("列表框"&i,内容)
  7.             否则
  8.                 跳出
  9.             如果结束
  10.         遍历结束
  11. 遍历结束
  12. 功能结束
复制代码

作者: 幼园留级老油条    时间: 2013-4-23 00:58
我是冷月教出来的
作者: jianqiumy    时间: 2013-4-23 01:37
我是冷月教出来的
幼园留级老油条 发表于 2013-4-23 0:58:21

谢谢油条哥~泪流满面啊!!!!!

不管谁教的,只要是你本身脑子转得快才学得那么厉害那么快,现在是师父级了

本来刚才我也加了内容[j],也不行,原来还得加多一个遍历或者循环~~~谢谢提点啊
刚才我也试过用2个遍历但这里我搞错了   

遍历(j=0;j<10000;j++)

我写成    遍历(j=0;j<2;j++)!!

还有这里
如果(内容[j]!="")

我写如果(内容[j]=="")这2个地方

!汗!!!脑子笨,不会变没办法,难怪只读2个


作者: jianqiumy    时间: 2013-4-23 01:59
[code]功能 读配置()
遍历(i=0;i<2;i++)
        遍历(j=0;j<10000;j++)
            内容[j]=辅助.读配置("用户配置","列表框"&i&"行数"&j,系统.获取程序路径()&......
幼园留级老油条 发表于 2013-4-23 0:53:30

好了~~~~谢谢~~~~




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