unit2.dfm

来自「一个不用编写任何代码的DELPHI停靠窗体的控件原码」· DFM 代码 · 共 57 行

object Form2: TForm2
  Left = 311
  Top = 300
  Width = 123
  Height = 130
  BorderStyle = bsSizeToolWin
  Caption = '窗体二'
  Color = clBtnFace
  DockSite = True
  DragKind = dkDock
  DragMode = dmAutomatic
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 115
    Height = 102
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Caption = 'Panel1'
    TabOrder = 0
    object Memo1: TMemo
      Left = 2
      Top = 2
      Width = 111
      Height = 98
      Align = alClient
      BorderStyle = bsNone
      ImeName = ''
      Lines.Strings = (
        'Memo1')
      TabOrder = 0
    end
  end
  object lbDockClient1: TlbDockClient
    OnFormShow = lbDockClient1FormShow
    OnFormHide = lbDockClient1FormHide
    LRDockWidth = 100
    TBDockHeight = 100
    DirectDrag = True
    ShowHint = True
    EachOtherDock = False
    DockStyle = MainForm.lbVCDockStyle1
    Left = 48
    Top = 40
  end
end