回 帖 发 新 帖 刷新版面

主题:请教图片为什么不刷新

为了显示图像,我在库中建立了一个字段 “头像”,字符型的。用来存放照片的路径用。
显示图片是通过一个按钮command1实现的。
现在在command1的init中写入:
  a=clxx.头像&clxx是库
  b=alltrim(thisform.车牌号1.value)   
  if .not.empty(a)
  thisform.command13.picture=a
  ELSE 
     thisform.command13.picture="pic\暂无图片.bmp"
     IF qxyh="ygs"
        thisform.command13.Enabled= .T.
        thisform.command13.caption="选定照片"   
    ENDIF
thisform.command13.Refresh
endif  
click事件中写入:
thisform.command13.caption=" "
  b=alltrim(thisform.车牌号1.value)   
  a=getpict()  
  c=right(a,3)   
   if   .not.isblank(a)   
   replace   clxx.头像   with   "pic\&b..&c"   
 thisform.command13.picture="pic\&b..&c" 
 thisform.command13.refresh   
  endif  


但是发现问题:选定后可以显示,但是按上一个或者下一个照片一直不会改变。手动改也不行。
上一个或者下一个按钮是我自己的command,里面有command1的refresh.     请指出问题出在哪里谢谢。

或者有什么好的方法可以显示图片。

回复列表 (共8个回复)

沙发

请高手帮忙啊,自己搞了一天。水平不够。
很郁闷。

板凳

唉 问题解决了 头脑发热了下

3 楼

把你按上一个和下一个按钮的代码发上来看一下。

4 楼

我把command1的init代码写进上一个下一个就可以了。
另外一个问题:
  if   .not.isblank(a)   
 &&&&&copy   file   "&a"   to  pic\&b..* &&&&&&& 还可以加入这一句
  replace   clxx.头像   with   "pic\&b..&c"  
想问下,copy file "&a"   to  pic\&b..*   怎么改,可以改成规定好图片的大小。比如310*355
知道的麻烦讲解下。

5 楼

你为什么要用COMMAND命令按钮来显示照片,用IMAGE控件不是更好,要控制显示图片的固定大小最好还是用IMAGE控件。还有就是init方法中加入代码只会在表单初次运行时运行代码的。

6 楼

我是在网上看了一些人的经验后,才用command1,放大的时候我也是用image的。用command主要是在没有图片的时候用使caption="点击我添加图片"。image没有caption好像。   
在init写代码确实是只有在刚进入表单的时候有效,所以才出现了我的第一个问题。如果不在上一个下一个写代码,那我应该写在哪里好些呢?

7 楼

[quote]我是在网上看了一些人的经验后,才用command1,放大的时候我也是用image的。用command主要是在没有图片的时候用使caption="点击我添加图片"。image没有caption好像。   
在init写代码确实是只有在刚进入表单的时候有效,所以才出现了我的第一个问题。如果不在上一个下一个写代码,那我应该写在哪里好些呢?[/quote]


要想有CAPTION属性,你可以建立一个自定义control容器类,并在此容器中包含两个对象一个标签(LABEL),一个IMAGE对象,用标签显示“点击我添加图片”,当有图片时把此标签隐藏,没图片时把IMAGE对象隐藏即可。

8 楼

[quote][quote]我是在网上看了一些人的经验后,才用command1,放大的时候我也是用image的。用command主要是在没有图片的时候用使caption="点击我添加图片"。image没有caption好像。   
在init写代码确实是只有在刚进入表单的时候有效,所以才出现了我的第一个问题。如果不在上一个下一个写代码,那我应该写在哪里好些呢?[/quote]


要想有CAPTION属性,你可以建立一个自定义control容器类,并在此容器中包含两个对象一个标签(LABEL),一个IMAGE对象,用标签显示“点击我添加图片”,当有图片时把此标签隐藏,没图片时把IMAGE对象隐藏即可。[/quote]
跟我想的一样我已经那样做了,因为我发现image可以有变比填充,省得去设置图片大小,只要形状差不多,变型不会很厉害。 还是谢谢你的回答。thank you.

我来回复

您尚未登录,请登录后再回复。点此登录或注册