Foxtable(狐表)用户栏目专家坐堂 → [求助]设置窗口类型


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

主题:[求助]设置窗口类型

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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
[求助]设置窗口类型  发帖心情 Post By:2018/1/25 15:08:00 [显示全部帖子]

老师,
  如何代码设置窗口类型

Dim frm As New Windows.Forms.Form
frm.Text = "test"
frm.Topmost = True
frm.width = 500
frm.height = 500
frm.Show
frm.formstyle = 5
frm.Top = (SysInfo.ScreenHeight - frm.height) / 2
frm.left = (SysInfo.ScreenWidth - frm.width) / 2

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20180125150933.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2018/1/25 15:08:45编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/1/25 15:51:00 [显示全部帖子]

剪切 指定是 ?

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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/1/25 16:04:00 [显示全部帖子]

ok 清楚了


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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/1/25 16:11:00 [显示全部帖子]

老师,
  可否使用 这个实现呢

Dim frm As New Windows.Forms.Form
frm.Text = "test"
frm.Topmost = True
frm.width = 500
frm.height = 500
frm.Show
frm.Top = (SysInfo.ScreenHeight - frm.height) / 2
frm.left = (SysInfo.ScreenWidth - frm.width) / 2

If Vars("cs") Then
frm.BaseForm.Visible = False
frm.BaseForm.Show
basemainform.AddOwnedForm(frm.BaseForm)
End If


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20180125161153.png
图片点击可在新窗口打开查看



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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/1/25 16:36:00 [显示全部帖子]


觉得  点击 增加查询 修改时 要是 能创建窗体  就解决了建立很多窗口的问题
例如 页面 有增加查询 修改 三个按钮(最少用一个窗口)

10个页面 就要建立 10个窗口

增加 查询 修改 这样的 弹出的模式窗口太多了 怎么能优化下呢?
[此贴子已经被作者于2018/1/25 16:39:55编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/1/25 17:01:00 [显示全部帖子]

老师,
窗口要是动态的,动态增加控件,再绑定表和事件,比增加窗口要简单,因为增加 查询 修改 执行的事件 是基本一样的

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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/1/26 9:05:00 [显示全部帖子]

o  建立窗口需要 放到FOXTABLE的窗口 那就没有新建窗口的必要了  毕竟窗口类型 不能指定 那就回到 原点 最多说 是 动态添加 控件了

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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2018/2/10 9:52:00 [显示全部帖子]

老师,
 将新增窗口加入窗口不成功,剪切怎么做?

Dim frm As New Windows.Forms.Form
frm.controlbox=False
frm.WindowState = System.Windows.Forms.FormWindowState.Maximized
frm.Dock=5
Dim btn As WinForm.Button=e.Form.CreateControl("btn1",ControlTypeEnum.Button)
btn.text="1111"
frm.controls.add(btn.basecontrol)
frm.Show
frm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
e.Form.Controls("plall").BaseControl.Controls.Clear
e.Form.Controls("plall").BaseControl.Controls.add(frm)

.NET Framework 版本:2.0.50727.5420
Foxtable 版本:2017.12.31.1
错误所在事件:窗口,窗口1,AfterLoad
详细错误信息:
无法将顶级控件添加到控件。

[此贴子已经被作者于2018/2/10 9:52:40编辑过]

 回到顶部