| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1408 人关注过本帖
标题:如何给用户留一个可插入图片的图片框?
只看楼主 加入收藏
jrs123
Rank: 2
等 级:论坛游民
威 望:1
帖 子:627
专家分:14
注 册:2006-9-5
结帖率:94.12%
收藏
 问题点数:0 回复次数:13 
如何给用户留一个可插入图片的图片框?
在一个已完成的软件窗体上,留一个由用户来输入的图片的图片框?
1、图片框的大小位置已固定(如2寸相片大小);
2、在图片框范围内,允许用户调整图片的长宽比;
3、允许多次选插图片(后者复盖前者);
4、双击此图片框即弹出对话框,可从C盘选图片插入的文件夹;
这样的代码应如何编写?
搜索更多相关主题的帖子: 用户 
2006-11-15 15:46
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
使用CommonDialog控件就可以了啊..

private sub picture1_dblClick()
with commonDialog1
.initDir = "C:\"
.filter = "gif files(*.gif)|*.gif|jpg files(*.jpg)|*.jpg"
.ShowOpen
if .FileName <> "" then
picture1.picture = loadpicture(.filename)
end if
end with
end sub

我的msn: myfend@
2006-11-15 16:05
jrs123
Rank: 2
等 级:论坛游民
威 望:1
帖 子:627
专家分:14
注 册:2006-9-5
收藏
得分:0 
谢谢purana版主,运行了上面的代码,这一行出错,不知何原因?请看一下:
.initDir = "C:\" (这一行呈黄底,提示实时错误424,要求对象,对象不就是c盘吗?为何出错?)
2006-11-15 16:26
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
我测试...没错

你是否有名为commonDialog1这个控件..

我的msn: myfend@
2006-11-15 16:31
jrs123
Rank: 2
等 级:论坛游民
威 望:1
帖 子:627
专家分:14
注 册:2006-9-5
收藏
得分:0 

VB6中没有,要从外部下载吗?

版主能上传一个吗?先谢了!

[此贴子已经被作者于2006-11-15 16:37:52编辑过]

2006-11-15 16:36
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
工程->部件->Microsoft Common Dialog Control 6.0

我的msn: myfend@
2006-11-15 16:40
jrs123
Rank: 2
等 级:论坛游民
威 望:1
帖 子:627
专家分:14
注 册:2006-9-5
收藏
得分:0 

已经从部件中找到,谢谢purana版主!

2006-11-15 16:48
jrs123
Rank: 2
等 级:论坛游民
威 望:1
帖 子:627
专家分:14
注 册:2006-9-5
收藏
得分:0 
可以插入图片,是固定大小,不知能否对其大小进行拖动调整?要改哪一地方,在commonDialog1的属性中也未找到可用的内容,
2006-11-15 17:01
flyly
Rank: 1
等 级:新手上路
帖 子:254
专家分:0
注 册:2006-11-13
收藏
得分:0 
斑竹,有DBGrid控件啊?发个给我啊!

2006-11-15 17:15
jrs123
Rank: 2
等 级:论坛游民
威 望:1
帖 子:627
专家分:14
注 册:2006-9-5
收藏
得分:0 
还有一个问题请教一下:
插入的图片好象留不住,即系统退出后就不再保留了.
如何能将此图保留住,直到下一次复盖呢?
2006-11-15 17:24
快速回复:如何给用户留一个可插入图片的图片框?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.034317 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved