窗口布局问题,一定给分

Question

多用几个Panel不就可以了。
左边一个Panel，Align为alLeft，右边一个Panel，Align为alClient。
左边Panel，上边放ToolBar，下边TreeView的align为alClient。
右边Panel，上边方ToolBar，下边方TMemo，align为alBottom，最后方ListView，Align 为alClient .

Answer 1

分隔条搁置也很简单。两个Panel中间方一个Splitter，
Memo和ListView放一个Splitter,Align改为alBottom.

Answer 2

这里上载不了图片和文件，看看Form的源码:object Form1: TForm1
  Left = 110
  Top = 143
  Width = 696
  Height = 480
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 185
    Top = 0
    Width = 3
    Height = 453
    Cursor = crHSplit
  end
  object Panel1: TPanel
    Left = 188
    Top = 0
    Width = 500
    Height = 453
    Align = alClient
    BevelOuter = bvNone
    Caption = 'Panel1'
    TabOrder = 0
    object Splitter2: TSplitter
      Left = 0
      Top = 242
      Width = 500
      Height = 3
      Cursor = crVSplit
      Align = alTop
    end
    object ListView1: TListView
      Left = 0
      Top = 29
      Width = 500
      Height = 213
      Align = alTop
      Columns = <>
      TabOrder = 0
    end
    object Memo1: TMemo
      Left = 0
      Top = 245
      Width = 500
      Height = 208
      Align = alClient
      Lines.Strings = (
        'Memo1')
      TabOrder = 1
    end
    object ToolBar1: TToolBar
      Left = 0
      Top = 0
      Width = 500
      Height = 29
      Caption = 'ToolBar1'
      TabOrder = 2
      object ToolButton1: TToolButton
        Left = 0
        Top = 2
        Caption = 'ToolButton1'
        ImageIndex = 0
      end
      object ToolButton2: TToolButton
        Left = 23
        Top = 2
        Caption = 'ToolButton2'
        ImageIndex = 1
      end
      object ToolButton3: TToolButton
        Left = 46
        Top = 2
        Caption = 'ToolButton3'
        ImageIndex = 2
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 185
    Height = 453
    Align = alLeft
    BevelOuter = bvNone
    Caption = 'Panel2'
    TabOrder = 1
    object ToolBar2: TToolBar
      Left = 0
      Top = 0
      Width = 185
      Height = 29
      Caption = 'ToolBar2'
      TabOrder = 0
      object ToolButton4: TToolButton
        Left = 0
        Top = 2
        Caption = 'ToolButton4'
        ImageIndex = 0
      end
      object ToolButton5: TToolButton
        Left = 23
        Top = 2
        Caption = 'ToolButton5'
        ImageIndex = 1
      end
    end
    object TreeView1: TTreeView
      Left = 0
      Top = 29
      Width = 185
      Height = 424
      Align = alClient
      Indent = 19
      TabOrder = 1
    end
  end
end左边是一个TPanel，Align=alLeft，上面有一个TToolbar，Align=alTop；Panel1的右边是一个TSplitter，Align=alLeft；再右边是一个TPanel，Align=alClient，其中有一个TToolBar，Align=alTop，其下边为一个TListView，Align=alTop，再往下是一个TSplitter，Align=alTop，最下面是一个TMemo，Align=alClient。如果你想来源文件，给我来email: [email protected]。