高手请进,分数多多(100分)

  • 主题发起人 主题发起人 delphikings
  • 开始时间 开始时间
D

delphikings

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟不才,想实现以下功能,请大虾们不吝赐教
有五组图片,a1,a2,a3,a4,a5,各有十张图片
现在想显示各组的图片,时间间隔为1.5秒,然后等一分钟显示a2组,依次显示a3,a4,a5
其中,显示的图片中有一些目标图片需要用户敲回车反应,等5组都显示完,把反应情况纪录下来,写到
一个文本文件中,做出反应记为1,否则为0
 
截获 enter
 
具体做起来,遇到不少问题,每组之间还要停顿显示一些东西,是不是要用很多timer控件
另外,如何判断是否在那1.5秒内敲了回车阿
 
大哥们,为啥没人答复阿,加分!!!!!!!!!!!!!!!!!!!!!!!!!!!1
 
只要用一个timer控件就可以了,在事件里面写代码判断各种情况并加以不同的处理。
 
如果时间间隔为1.5秒,那用户可以看清图片吗?,如果
没有看清楚,我想大部分的用户都会没有反应的.记录
是否有没有反应你可以在图片控件的keyup事件中处理,
如果只是延时,你可以用延时函数,不一定用timer控件,
再加上一个循环就可以了。
 
HunterTeam,大哥,你能详细说说吗,用一个timer ,那我显示第二组的时候,会不会第一组的图片
也会显示,能不能给点源代码,提醒一下
 
你用什么来显示图片呢?如果用Image控件,可以使用如下命令在不同时刻载入不同的图片:
Image1.Picture.LoadFromFile('图片文件名');
 
用的就是image,可是它没有keyup事件,我就是这么做的

问题是这样,要显示5组,而且每组之间还有间隔,间隔中显示其他的信息,要在1个timer
里写代码,如何控制显示的是哪一组阿,可能会很混乱

 
你不是要按顺序显示吗,那就不容易混乱了嘛。可以用两个变量比如i、j分别表示第几组,
组中的第几个图片,每显示一张,j:=j+1;if j>10 then i:=i+1;if i>5 then i:=1;
image没有keyup事件,可form有啊,你可在form的keydown等事件里设置,并将form的
keypreview属性设为true。
 
此程序可满足你的要求:
http://www.huasoft.net/huasoft2.exe
 

Similar threads

D
回复
0
查看
767
DelphiTeacher的专栏
D
D
回复
0
查看
809
DelphiTeacher的专栏
D
D
回复
0
查看
639
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部