unit1.~dfm

可实现对文件夹的遍历,它的控件都可以在C＋＋BUILDER的控件中找到。如有意外

object Form1: TForm1
  Left = 216
  Top = 151
  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
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 48
    Top = 40
    Width = 137
    Height = 13
    AutoSize = False
    Caption = #30913#30424#39537#21160#22120#21015#34920#26694
  end
  object Label2: TLabel
    Left = 40
    Top = 136
    Width = 137
    Height = 13
    AutoSize = False
    Caption = #25991#20214#21015#34920#26694
  end
  object Label3: TLabel
    Left = 256
    Top = 40
    Width = 137
    Height = 13
    AutoSize = False
    Caption = #30446#24405#21015#34920#26694
  end
  object Label4: TLabel
    Left = 472
    Top = 160
    Width = 137
    Height = 13
    AutoSize = False
    Caption = #25991#20214#31867#22411#21015#34920#26694
  end
  object Label5: TLabel
    Left = 48
    Top = 384
    Width = 105
    Height = 13
    AutoSize = False
    Caption = #36873#20013#30340#25991#20214
  end
  object Label6: TLabel
    Left = 248
    Top = 272
    Width = 393
    Height = 13
    AutoSize = False
    Caption = 'windows'#25152#22312#30446#24405
  end
  object Label7: TLabel
    Left = 248
    Top = 320
    Width = 393
    Height = 13
    AutoSize = False
    Caption = 'system'#25152#22312#30446#24405
  end
  object DriveComboBox1: TDriveComboBox
    Left = 40
    Top = 80
    Width = 145
    Height = 19
    TabOrder = 0
    OnChange = DriveComboBox1Change
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 248
    Top = 80
    Width = 177
    Height = 153
    ItemHeight = 16
    TabOrder = 1
    OnChange = DirectoryListBox1Change
  end
  object FileListBox1: TFileListBox
    Left = 40
    Top = 160
    Width = 161
    Height = 201
    ItemHeight = 13
    TabOrder = 2
    OnChange = FileListBox1Change
  end
  object FilterComboBox1: TFilterComboBox
    Left = 464
    Top = 192
    Width = 145
    Height = 21
    TabOrder = 3
    OnChange = FilterComboBox1Change
  end
  object ComboBox1: TComboBox
    Left = 472
    Top = 72
    Width = 169
    Height = 21
    ItemHeight = 13
    TabOrder = 4
    Text = #26412#30446#24405#25152#26377#30340'BMP'#22270#29255
  end
  object Button1: TButton
    Left = 480
    Top = 112
    Width = 113
    Height = 25
    Caption = 'JPG'#22270#29255#36941#21382
    TabOrder = 5
    OnClick = Button1Click
  end
  object Edit1: TEdit
    Left = 176
    Top = 376
    Width = 433
    Height = 21
    TabOrder = 6
    Text = #26410#36873#20013
  end
  object Button2: TButton
    Left = 520
    Top = 232
    Width = 75
    Height = 25
    Caption = #33719#30693#30446#24405
    TabOrder = 7
    OnClick = Button2Click
  end
end