- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 界面功能，求帮助。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=58656)
-- 发布时间：2014/10/21 17:20:00
-- 界面功能，求帮助。
我看到瓜哥的作品感觉蛮好，想借鉴一下。但是想做一个改进。我只是构想，具体如何实现，想请大神提供一下帮助，
界面采用listview。
需要实现的功能：能在界面管理窗口中，对界面进行管理。图标能够可以直接添加。
主窗体生产的图标，点击后打开相应的窗口。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.foxdb |
-- 发布时间：2014/10/21 17:36:00
--
1、没看懂你说的直接添加是什么意思；
2、点击事件，加入打开窗口的代码 forms(e.Sender.Current.Text).Show
-- 发布时间：2014/10/21 17:40:00
--
图标直接添加，就是在admin 这个表里。图标地址列，添加图片后，就能作为主窗体的图标显示。
-- 发布时间：2014/10/21 17:51:00
--
以下是引用zhupengfei在2014-10-21 17:40:00的发言：
图标直接添加，就是在admin 这个表里。图标地址列，添加图片后，就能作为主窗体的图标显示。
图标直接添加，就是在admin 这个表里。图标地址列，添加图片后，就能作为主窗体的图标显示。
这个目前是做不到的。
-- 发布时间：2014/10/22 8:43:00
--
For Each dr As DataRow In DataTables("admin").datarows
Dim Key As String = dr("图标地址")
Dim r As WinForm.ListViewRow = lvw.Rows.Add() \'增加一行
lvw.Images.AddImage(Key, Key , Key ) \'添加代表这行的一对图标
r.ImageKey = Key
r.Text = dr("窗口名称")
r.Group = dr("分组名称")
Next