ffrmmain.dfm

照片自动分类归并

object frmMain: TfrmMain
  Left = 329
  Top = 230
  BorderStyle = bsDialog
  Caption = #25968#30721#29031#29255#20998#31867#24037#20855'---Ver 1.0 Beta'
  ClientHeight = 361
  ClientWidth = 440
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 375
    Top = 14
    Width = 23
    Height = 22
    Caption = '...'
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 375
    Top = 42
    Width = 23
    Height = 22
    Caption = '...'
    OnClick = SpeedButton2Click
  end
  object Label1: TLabel
    Left = 150
    Top = 73
    Width = 60
    Height = 13
    Caption = #30446#24405#26641#26679#24335
  end
  object Label2: TLabel
    Left = 40
    Top = 142
    Width = 24
    Height = 13
    Caption = #36827#24230
  end
  object edtSrcDir: TLabeledEdit
    Left = 88
    Top = 16
    Width = 288
    Height = 21
    EditLabel.Width = 48
    EditLabel.Height = 13
    EditLabel.Caption = #21407#25991#20214#22841
    LabelPosition = lpLeft
    TabOrder = 0
  end
  object edtDesDir: TLabeledEdit
    Left = 88
    Top = 43
    Width = 288
    Height = 21
    EditLabel.Width = 60
    EditLabel.Height = 13
    EditLabel.Caption = #30446#26631#25991#20214#22841
    LabelPosition = lpLeft
    TabOrder = 1
  end
  object chkIncludeSubDir: TCheckBox
    Left = 33
    Top = 72
    Width = 97
    Height = 17
    Caption = #22788#29702#23376#30446#24405
    Checked = True
    State = cbChecked
    TabOrder = 2
  end
  object rgCat: TRadioGroup
    Left = 33
    Top = 95
    Width = 145
    Height = 41
    Caption = #29031#29255#20998#31867#26041#24335
    Columns = 2
    ItemIndex = 0
    Items.Strings = (
      #22797#21046
      #31227#21160)
    TabOrder = 3
  end
  object rgExist: TRadioGroup
    Left = 216
    Top = 97
    Width = 182
    Height = 41
    Caption = #37325#21517#25991#20214
    Columns = 3
    ItemIndex = 0
    Items.Strings = (
      #35206#30422
      #24573#30053
      #37325#21629#21517)
    TabOrder = 4
  end
  object cmbDirType: TComboBox
    Left = 216
    Top = 70
    Width = 182
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    TabOrder = 5
    Items.Strings = (
      #24180'-'#26376'-'#26085
      #24180'-'#26085
      #24180)
  end
  object BitBtn1: TBitBtn
    Left = 72
    Top = 258
    Width = 121
    Height = 25
    Caption = #24320#22987#25972#29702
    TabOrder = 6
    OnClick = BitBtn1Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 216
    Top = 258
    Width = 121
    Height = 25
    Caption = #36864#20986
    TabOrder = 7
    Kind = bkClose
  end
  object Memo1: TMemo
    Left = 7
    Top = 289
    Width = 425
    Height = 72
    BorderStyle = bsNone
    Color = clBtnFace
    Lines.Strings = (
      #26377#32593#21451#29992'.NET'#20889#20102#25968#30721#29031#29255#20998#31867#24037#20855#65292#20351#29992#36215#26469#24456#26041#20415#65292#21482#19981#36807#35201#23433#35013'.NET'#36816#34892
      #24211#12290#25105#29992'Delphi 2007'#20223#29031#20889#20102#20010'Win32'#31243#24207#65292#30028#38754#37117#22797#21046#20102#65292#35874#35874#37027#20010#32593#21451'!'
      #32511#33394#36719#20214#65292#21487#20219#24847#22797#21046#20998#21457'!'#27809#26377#20219#20309#38480#21046'!'
      #27880#65306#25805#20316#21069#35831#26368#22909#22791#20221#25968#25454#65292#27426#36814#21453#39304'Bug'#21450#25552#20986#24314#35758'!'
      'EMail:[e-mail]')
    ReadOnly = True
    TabOrder = 8
  end
  object memLog: TMemo
    Left = 25
    Top = 163
    Width = 373
    Height = 89
    ScrollBars = ssBoth
    TabOrder = 9
  end
  object prgMain: TProgressBar
    Left = 70
    Top = 140
    Width = 328
    Height = 17
    Step = 1
    TabOrder = 10
  end
end