umain.dfm

为管理和查阅的方便, 对指定目录下的所有目录及文件以格式化形式保存到文本文件中.

object FrmMain: TFrmMain
  Left = 194
  Top = 112
  BorderStyle = bsDialog
  Caption = #30446#24405#26126#32454#20445#23384#21161#25163
  ClientHeight = 186
  ClientWidth = 338
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 64
    Width = 72
    Height = 13
    Caption = #35831#36873#25321#30446#24405':'
  end
  object Label2: TLabel
    Left = 8
    Top = 12
    Width = 300
    Height = 26
    Caption = #20026#31649#29702#21644#26597#38405#30340#26041#20415', '#23545#25351#23450#30446#24405#19979#30340#25152#26377#30446#24405#21450#25991#20214#20197#26684#24335#21270#24418#24335#20445#23384#21040#25991#26412#25991#20214#20013'.'
    WordWrap = True
  end
  object Bevel1: TBevel
    Left = 8
    Top = 41
    Width = 321
    Height = 9
    Shape = bsBottomLine
  end
  object SBDir: TSpeedButton
    Left = 298
    Top = 87
    Width = 23
    Height = 22
    Caption = '...'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    OnClick = SBDirClick
  end
  object Edit1: TEdit
    Left = 8
    Top = 88
    Width = 289
    Height = 21
    TabOrder = 0
    Text = 'F:\'
  end
  object BtnSave: TButton
    Left = 8
    Top = 128
    Width = 105
    Height = 25
    Caption = #20445#23384#26126#32454'(&s)'
    TabOrder = 1
    OnClick = BtnSaveClick
  end
  object BtnExit: TButton
    Left = 232
    Top = 128
    Width = 89
    Height = 25
    Caption = #36864#20986'(&x)'
    TabOrder = 2
    OnClick = BtnExitClick
  end
  object BtnLook: TButton
    Left = 120
    Top = 128
    Width = 105
    Height = 25
    Caption = #25171#24320#26597#30475'(&L)'
    TabOrder = 3
    OnClick = BtnLookClick
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 167
    Width = 338
    Height = 19
    Panels = <
      item
        Width = 50
      end>
    SimplePanel = True
    SimpleText = #31243#24207#30001'zyqhml'#32534#20889'.2005'#24180'6'#26376'23'#26085','#29256#26412'V1.0'
    SizeGrip = False
  end
  object SDDir: TSaveDialog
    DefaultExt = 'txt'
    Filter = #25991#26412#25991#20214'(*.txt)|*.txt'
    Left = 288
    Top = 16
  end
  object ODDir: TOpenDialog
    Filter = #25991#26412#25991#20214'(*.txt)|*.txt'
    Left = 256
    Top = 16
  end
end