Foxtable(狐表)用户栏目专家坐堂 → [求助]ListView问题


  共有3117人关注过本帖树形打印复制链接

主题:[求助]ListView问题

帅哥哟,离线,有人找我吗?
pcxjxjhkw
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
  发帖心情 Post By:2015/3/11 16:15:00 [只看该作者]

问题1:想实现,单击ListView中不同的图标,在图片框中显示该图片。
问题2:想实现,将图片框中的图片旋转90度后,在ListView对应的图标也旋转90度。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/11 16:17:00 [只看该作者]

 很简单啊,直接在事件里写代码就行啊。

 

 不会做,就请上传例子。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/3/11 16:42:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/11 16:52:00 [只看该作者]

第一个问题

 

If e.Sender.Current IsNot Nothing Then
    e.Form.Controls("PictureBox1").Image = e.Sender.Images.LargeImages(e.Row.ImageKey)
End If

 

第二个问题

 

Dim pic As WinForm.PictureBox = e.Form.Controls("PictureBox1")
Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")

Dim bmp As New bitmap(pic.image)
bmp.RotateFlip(RotateFlipType.Rotate90FlipNone)
pic.image = bmp

Dim vr As  WinForm.ListViewRow = lvw.Current
Dim ikey As String = Guid.NewGuid.TOstring()
lvw.Images.LargeImages.add(ikey, bmp)
vr.ImageKey = ikey


 回到顶部
帅哥哟,离线,有人找我吗?
pcxjxjhkw
  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
  发帖心情 Post By:2015/3/11 16:57:00 [只看该作者]

谢谢甜老师

 回到顶部
总数 15 上一页 1 2