2010-08-17 165 views
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 

我甚至無法看到的下拉水平,除非我把它的滾動創造了微小的滾動條上。它在屏幕上顯示四分之一英寸以查看標籤面板內的任何內容。從我所能看到的標籤面板上沒有大小的屬性。

這一直吃我整整一整天。有任何想法嗎?

回答

0

窗口和子面板都必須使用佈局類型'FIT'。