[求助]日历，逛逛那个，怎么改到：并列窗口中？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=56011&replyID=&skin=1

上面是逛逛的例子。他设置的主窗口，我想改到：并列窗口中。（PANL 不放大）

我，并列窗口，的内部函数代码如下：

Dim e As Object = Args(0)

Dim Tcl As C1.Win.C1Command.C1DockingTab = e.Form.panel.parent.parent

AddHandler Tcl.DoubleClick, AddressOf C1DockingTab_DoubleClick

Functions.Execute("编辑权限",e.form.Name)
图片点击可在新窗口打开查看

此主题相关图片如下：1.jpg

我看它传递：panle绑定代码如下：

'为了方便应用,直接将控件绑定到传入的Panel控件

Public Sub Panel绑定(ByVal pl As Foxtable.WinForm.Panel)

'绑定后刷新数据

_Panel = pl.BaseControl

_Panel.AutoScroll = True

Me.Dock = Windows.Forms.DockStyle.Fill

pl.BaseControl.Controls.Add(Me)

事务标签背景刷新()

表格计算() '此处次序不能搞错

数据刷新()

事务标签布局()

_bl = True

End Sub

1、我想改到：并列窗口中。（PANL 不放大）

2、为什么，我双击一个日历中的日期后，弹出：事务编辑，窗口后，马上关闭，它还是增加了行？刷新一下日历页面，这一行又出来了。显示当日有事务？（这个问题，我发现是哪里的问题了。因为中我加了一个：操作员，列，自动录入当前：操作员）想的是，以后，根据当前登录的操作员。只显示本人的事务。）麻烦请老师，教一下，需要怎么改代码？

[此贴子已经被作者于2016/12/31 21:16:14编辑过]

我试了一下，这个没有放大的状态。如果点一下：WINDOWS下面的任务栏狐表的图标，最小化，然后，再点一下：最大化，它就变大了。

此主题相关图片如下：1.jpg

我这个是调整行高代码，是改过的。

''' 尺寸变化时重算行高列宽

Protected Overrides Sub OnResize(ByVal e As System.EventArgs)

If _bl = False Then Return '检测初始化是否已完成

Dim c As Integer = Me.Width / 7 '计算列宽度

_事务标签_宽度 = c '将宽度传递给变量

事务标签背景刷新() '刷新事务标签背景图

For i As Integer = 1 To 6 '设置列宽

Me.Cols(i).Width = c

Me.Cols(Me.Cols.Count - 1).Width = Me.Width - (Me.Cols(Me.Cols.Count - 2).Left + Me.Cols(Me.Cols.Count - 2).Width)

Me.Rows(1).Height = _日历标题_行高 '设置行高

Dim 日历行数 As Integer = (_表格行数 - 2) / 2

Dim h As Integer = (Me.Height - _日历标题_行高 - 日历行数 * _日历日历_行高) / 日历行数

For i As Integer = 2 To _表格行数 - 2

If i Mod 2 = 0 Then

Me.Rows(i).Height = _日历日历_行高

Else

Me.Rows(i).Height = h

End If

Me.Rows(Me.Rows.Count - 1).Height = Me.Height - (Me.Rows(Me.Rows.Count - 2).Top + Me.Rows(Me.Rows.Count - 2).Height) '自适应最后一行

事务标签布局() '刷新事务

End Sub

[此贴子已经被作者于2017/1/1 9:28:57编辑过]

上面的代码也是COPY的，不懂真实意思。

我大概理解，你的意思是设一个全局代码。然后，在打开窗口的时候引用，是吗？

写全局代码时，提醒错。

此主题相关图片如下：1.jpg

[此贴子已经被作者于2017/1/1 10:37:03编辑过]

主题：[求助]日历，逛逛那个，怎么改到：并列窗口中？