0
所以我添加一個標籤面板到一個子窗口。我們的很多控件都是用戶定義的,但這看起來像是一個ExtJS問題。當我添加一個標籤面板,然後嘗試向該面板添加控件和內容時,該面板上的所有內容都將被切斷。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
我甚至無法看到的下拉水平,除非我把它的滾動創造了微小的滾動條上。它在屏幕上顯示四分之一英寸以查看標籤面板內的任何內容。從我所能看到的標籤面板上沒有大小的屬性。
這一直吃我整整一整天。有任何想法嗎?