u_drht.dfm

很好的合同管理系统完整源码,适合初学者参考

object frm_drht: Tfrm_drht
  Left = 440
  Top = 73
  Width = 364
  Height = 191
  Caption = #23548#20837#21512#21516
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 356
    Height = 164
    Align = alClient
    BevelInner = bvSpace
    BevelOuter = bvLowered
    TabOrder = 0
    object Label3: TLabel
      Left = 64
      Top = 27
      Width = 70
      Height = 14
      Caption = #21512#21516#31867#22411#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 64
      Top = 75
      Width = 70
      Height = 14
      Caption = #36335'    '#24452#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Edit3: TEdit
      Left = 136
      Top = 24
      Width = 121
      Height = 22
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
    end
    object Edit4: TEdit
      Left = 136
      Top = 72
      Width = 121
      Height = 22
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object BitBtn1: TBitBtn
      Left = 256
      Top = 72
      Width = 33
      Height = 22
      Caption = #36873#25321
      TabOrder = 2
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 256
      Top = 24
      Width = 33
      Height = 22
      Caption = #36873#25321
      TabOrder = 3
      OnClick = BitBtn2Click
    end
    object BitBtn3: TBitBtn
      Left = 56
      Top = 120
      Width = 75
      Height = 25
      Caption = #20445#23384
      TabOrder = 4
      OnClick = BitBtn3Click
    end
    object BitBtn4: TBitBtn
      Left = 232
      Top = 120
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 5
      OnClick = BitBtn4Click
    end
    object FileListBox1: TFileListBox
      Left = -72
      Top = 104
      Width = 105
      Height = 97
      ItemHeight = 13
      Mask = '*.doc'
      TabOrder = 6
      Visible = False
    end
    object Panel2: TPanel
      Left = 15
      Top = 6
      Width = 330
      Height = 147
      TabOrder = 7
      Visible = False
      object STV: TShellTreeView
        Left = 5
        Top = 6
        Width = 320
        Height = 135
        ObjectTypes = [otFolders]
        Root = 'rfDesktop'
        UseShellImages = True
        AutoRefresh = False
        Indent = 19
        ParentColor = False
        RightClickSelect = True
        ShowRoot = False
        TabOrder = 0
        OnDblClick = STVDblClick
        OnKeyDown = STVKeyDown
      end
    end
  end
  object WordDocument1: TWordDocument
    AutoConnect = False
    ConnectKind = ckRunningOrNew
    Left = 216
    Top = 16
  end
  object WordApplication1: TWordApplication
    AutoConnect = False
    ConnectKind = ckRunningOrNew
    AutoQuit = False
    Left = 248
    Top = 72
  end
end