所以我将一个选项卡面板添加到子窗口。我们的许多控件都是用户定义的,但这看起来像是一个ExtJS问题。当我添加一个选项卡面板,然后尝试向该面板添加控件和内容时,该面板上的所有内容都会被切断。
以下是我正在使用的代码:
Using ViewDetailsWin As New Pages.ChildWindow
With ViewDetailsWin
.IconCls = Model.WorkflowStepDefinition.SmallIcon
.Ref = "viewDetailsWin"
.RenderTo = "workspacePanel.getEl()"
.DestroyerRef = "mainPanel"
.MethodName = "getViewDetailsWin"
.Title = "View Details/Amortization Schedule"
.Layout = Pages.Panel.LayoutType.Form
.Closable = True
.CloseAction = Pages.Window.CloseActionType.Hide
.Maximizable = False
.Modal = False
.Height = 700
.Width = 1000
.BodyStyle = "padding:10px"
.Toolbar.AddButton("Close", "function(){getViewDetailsWin().hide();}", "icon-button-cancel", , "Close")
.Toolbar.AddButton("Select This Loan Terms Scenario", "function(){getViewDetailsWin().hide();}", "icon-button-save", , "Save")
With .AddPanel()
Dim Tabs As String() = {"Details", "Amortization Schedule"}
Dim tabCollection As TabCollection = .AddTabs(Tabs)
With tabCollection
With .Item(1)
With .AddFieldSet("Loan Calculation Results")
Dim ddlCalculateFor As New Controls.ComboBox("CalculateFor", "../../calculateFor", "Calculate For")
With ddlCalculateFor
.DisplayField = "LookupDesc"
.ValueField = "LookupID"
.ForceSelection = False
If Model.CalculateForId > 0 Then
.Value = Model.CalculateForId
End If
.ReadOnly = True
.BindData(Model.CalculateForMethods)
End With
.AddControl(ddlCalculateFor)
End With
End With
End With
End With
ViewResponse.AddScript(.ToJSObject("viewDetailsWin"))
End With
End Using
除非我滚动它创建的小小滚动条,否则我根本看不到下拉列表。它在屏幕上显示四分之一英寸,以便在标签面板内看到任何内容。我可以看到,选项卡面板上没有尺寸属性。
这整天都在吃东西。有什么想法吗?
答案 0 :(得分:0)
窗口和子面板都必须使用布局类型“FIT”。