精易论坛

标题: [求教]字符串截取2个字符和循环图片框的问题 [打印本页]

作者: relax    时间: 2011-9-8 13:40
标题: [求教]字符串截取2个字符和循环图片框的问题
字符串截取问题:
在C盘Alspot目录下有很多文件夹 ,这些文件夹里放置着很多图片


分别取出2个目录下的文件路径 ,如下图:

我百度了一下 ,"C:\Alspot\"要取出后面的字符串 用 取文本中间() 函数 好像只能取出指定的位置和字符数目 。

代码如:
编辑框2.内容 = 取文本右边 ( 编辑框2.内容 , 取文本长度(编辑框1.内容) - 倒找文本(编辑框1.内容 ,"/" , ,假 ) )
得到的结果如 23555_1.gif ,如何只取出数字部分呢?


(紧接上面的问题)
  图片框问题:
因为有几百张至上千张图片 ,怎么才能把它们像表格一样列出来呢 ?
(下图为模拟效果图)


不知道是如何实现的 ?
求助好心人提示一下实现的思路或者是建议!{:soso_e154:}

作者: exit11    时间: 2011-9-8 13:54
得到的结果如 23555_1.gif ,如何只取出数字部分呢
将结果再取左边的就好了

将所有的图片路径存放到一个数组里,然后按指定顺序读到图片框
作者: relax    时间: 2011-9-8 13:58
exit11 发表于 2011-9-8 13:54
得到的结果如 23555_1.gif ,如何只取出数字部分呢
将结果再取左边的就好了


/9/ 和 /10/ 这2个应该怎么取呢 ?
图片放到数组里了,但是图片框也只有一个啊。应该怎么将图片框循环出来啊。
作者: exit11    时间: 2011-9-8 15:22
.版本 2
.支持库 spec

.子程序 __启动窗口_创建完毕
.局部变量 xx, 文本型
.局部变量 a
.局部变量 b

xx = “c:\sdfsd\9\123_1.kkk”
a = 倒找文本 (xx, “\”, , 假)
调试输出 (取文本右边 (xx, 取文本长度 (xx) - a))  ' 带后缀

a = 倒找文本 (xx, “.”, , 假)
b = 倒找文本 (xx, “\”, a, 假)
调试输出 (取文本中间 (xx, b + 1, a - b - 1))  ' 不带后缀
a = 倒找文本 (xx, “\”, , 假)
b = 倒找文本 (xx, “\”, a - 1, 假)
调试输出 (取文本中间 (xx, b + 1, a - b - 1), b, a, b - a)  ' 所在目录

作者: exit11    时间: 2011-9-8 15:27
本帖最后由 exit11 于 2011-9-8 15:29 编辑

[e]
.版本 2
.程序集 窗口程序集1
.程序集变量 路径, 文本型, , "0"
.程序集变量 当前位置, 整数型
.子程序 _按钮1_被单击
.局部变量 文件名, 文本型
.局部变量 x, 整数型
文件名 = 寻找文件 (“D:\data\桌面\sgs\*.*”, )
.判断循环首 (文件名 ≠ “”)
    .如果真 (文件名 ≠ “”)
        加入成员 (路径, “D:\data\桌面\sgs\” + 文件名)
    .如果真结束
    文件名 = 寻找文件 (, )
.判断循环尾 ()

.子程序 _按钮2_被单击
.局部变量 x, 整数型
.局部变量 计次, 整数型
.判断开始 (当前位置 = 0 或 当前位置 > 取数组成员数 (路径))
    当前位置 = 1
.默认
.判断结束
图片框1.图片 = 读入文件 (路径 [当前位置])
当前位置 = 当前位置 + 1[/e]

作者: relax    时间: 2011-9-8 15:55
exit11 发表于 2011-9-8 15:27

这种效果如何实现啊? 刚看了下你写的图片框,只有一个,我想的是一张图片一个图片框,但是手动加得有几千个。。
作者: qq793359277    时间: 2011-9-8 18:25
这种图片 应该使用超级列表框
你的取子目录 应该用 批量取中间   在取出结果里找下位置就可以了




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4