A. 易语言图片框怎么显示文件夹的里的图片,点击按钮显示下一张
此效果可以通过枚举文件,配合“读入文件 ()”和数组操作来实现。
代码如下:
.版本2
.程序集窗口程序集_启动窗口
.程序集变量当前位置,整数型
.程序集变量文件列表,文本型,,"0"
.子程序__启动窗口_创建完毕
枚举文件(取运行目录()+“”,“.jpg”,文件列表)
.如果真(取数组成员数(文件列表)>0)
当前位置=1
图片框1.图片=读入文件(文件列表[1])
.如果真结束
.如果真(取数组成员数(文件列表)>1)
按钮_下一张.禁止=假
.如果真结束
.子程序_按钮_上一张_被单击
当前位置=当前位置-1
图片框1.图片=读入文件(文件列表[当前位置])
.如果(当前位置≤1)
按钮_上一张.禁止=真
.否则
按钮_上一张.禁止=假
按钮_下一张.禁止=假
.如果结束
.子程序_按钮_下一张_被单击
当前位置=当前位置+1
图片框1.图片=读入文件(文件列表[当前位置])
.如果(当前位置≥取数组成员数(文件列表))
按钮_下一张.禁止=真
.否则
按钮_上一张.禁止=假
按钮_下一张.禁止=假
.如果结束
.子程序枚举文件
.参数欲枚举文件的目录,文本型,,将要被枚举文件的目录。
.参数欲枚举的文件后缀名,文本型,可空,请输入如“.bmp”“.mp3”的后缀名。
.参数欲保存结果的变量,文本型,参考数组,保存结果的文本型数组。
.局部变量临_目录,文本型
.局部变量临_文件,文本型
.局部变量i,整数型,静态
'枚举目录
重定义数组(欲保存结果的变量,假,0)
临_目录=寻找文件(欲枚举文件的目录+“*”,#子目录)'第一次寻找要提供相应条件
.判断循环首(临_目录≠“”)'只要找到的结果不为空则继续寻找
.如果真(临_目录≠“.”且临_目录≠“..”)
枚举文件(欲枚举文件的目录+临_目录+“”,欲枚举的文件后缀名,欲保存结果的变量)
.如果真结束
临_目录=寻找文件(,#子目录)'之后系统会默认使用最近一次提供的条件进行寻找下一个结果,所以这里只需要指定寻找对象:#子目录
.判断循环尾()
'枚举文件
临_文件=寻找文件(欲枚举文件的目录+“*”+欲枚举的文件后缀名,)'第一次寻找要提供相应条件
.判断循环首(临_文件≠“”)'只要找到的结果不为空则继续寻找
临_文件=欲枚举文件的目录+临_目录+临_文件'文件全路径=目录+文件名+后缀名
加入成员(欲保存结果的变量,临_文件)
临_文件=寻找文件(,)
.判断循环尾()
在程序中,演示效果如下:
B. 易语言:我想让图片框n.图片=写入文件(“图片n.jpg”)这个代码怎么写
在易语言编程环境中,如果你想实现将24个图片框分别加载不同图片的功能,可以按照以下步骤操作。首先,确保在你的程序界面中已经添加了24个图片框组件。接着,为每个图片框赋予一个唯一的标记,如图片框1标记为1,图片框2标记为2,以此类推,直到图片框24标记为24。
接下来,编写相应的代码以实现图片加载功能。以下是一个示例代码段,用于加载标记为n的图片框中的图片。
.版本 2
.子程序 _按钮1_被单击
.局部变量 图片框, 图片框
.局部变量 n, 整数型
.计次循环首 (24, n)
图片框 = 取标记组件 (n)
图片框.图片 = 读入文件 (取运行目录 () + “\图片” + 到文本 (n) + “.jpg”)
.计次循环尾 ()
这段代码的主要逻辑是,通过循环遍历24个图片框,根据每个图片框的标记值n,动态地为对应的图片框加载指定路径的图片。这里使用了“取运行目录”函数来获取程序的运行目录,然后根据标记n拼接出相应的图片文件路径。最后,利用“读入文件”函数将文件内容加载到图片框中。
需要注意的是,确保图片文件路径和文件名与代码中的路径和文件名保持一致。此外,图片文件必须存在于指定的路径中,否则会出现加载失败的情况。
以上就是使用易语言编程实现将24个图片框分别加载不同图片的具体步骤和代码示例。希望对你有所帮助。
C. 易语言图片框显示某个文件夹里的照片
目前易语言的图片框只支持jpg、bmp、gif、ico格式,其他比如png、ttf、tga等格式不支持,那么确定了他所支持的格式,就要在搜索的时候把这些不支持的格式屏蔽掉,或者在载入图片之前要先转换格式,不然图片框什么都不显示,需要用到的命令:
计次循环首()
寻找文件()
延迟()
这三个命令,基本上就能完成你的目的,现在不在家,所以源码暂时没法写。