unit1.dfm

在Windows的资源管理器中选择文件时是不是觉得有一些麻烦

object Form1: TForm1
  Left = 0
  Top = 0
  Width = 549
  Height = 453
  Caption = #31616#21333#36164#28304#31649#29702#22120
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  PopupMenu = PopupMenu1
  PixelsPerInch = 96
  TextHeight = 13
  object DriveComboBox1: TDriveComboBox
    Left = 8
    Top = 16
    Width = 193
    Height = 19
    TabOrder = 0
    OnChange = DriveComboBox1Change
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 8
    Top = 40
    Width = 193
    Height = 289
    ItemHeight = 16
    TabOrder = 1
    OnChange = DirectoryListBox1Change
  end
  object FileListBox1: TFileListBox
    Left = 208
    Top = 40
    Width = 329
    Height = 289
    ItemHeight = 13
    TabOrder = 2
  end
  object MainMenu1: TMainMenu
    Left = 264
    Top = 8
    object N1: TMenuItem
      Caption = #25991#20214
      object N2: TMenuItem
        Caption = #26032#24314
        object N13: TMenuItem
          Caption = #25991#20214
          OnClick = N13Click
        end
        object N14: TMenuItem
          Caption = #25991#20214#22841
          OnClick = N14Click
        end
      end
      object N3: TMenuItem
        Caption = #23646#24615
        OnClick = N3Click
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object N5: TMenuItem
        Caption = #36864#20986
        OnClick = N5Click
      end
    end
    object N6: TMenuItem
      Caption = #32534#36753
      object N7: TMenuItem
        Caption = #21098#20999
        OnClick = N7Click
      end
      object N8: TMenuItem
        Caption = #22797#21046
        OnClick = N8Click
      end
      object N9: TMenuItem
        Caption = #31896#36148
        Enabled = False
        OnClick = N9Click
      end
      object N10: TMenuItem
        Caption = #21024#38500
        OnClick = N10Click
      end
      object N11: TMenuItem
        Caption = '-'
      end
      object N12: TMenuItem
        Caption = #37325#21629#21517
        OnClick = N12Click
      end
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 336
    Top = 8
    object N22: TMenuItem
      Caption = #26032#24314
      object N23: TMenuItem
        Caption = #25991#20214
        OnClick = N13Click
      end
      object N24: TMenuItem
        Caption = #25991#20214#22841
        OnClick = N14Click
      end
    end
    object N21: TMenuItem
      Caption = '-'
    end
    object N15: TMenuItem
      Caption = #21098#20999
      OnClick = N7Click
    end
    object N16: TMenuItem
      Caption = #22797#21046
      OnClick = N8Click
    end
    object N17: TMenuItem
      Caption = #31896#36148
      OnClick = N9Click
    end
    object N18: TMenuItem
      Caption = #21024#38500
      OnClick = N10Click
    end
    object N19: TMenuItem
      Caption = '-'
    end
    object N20: TMenuItem
      Caption = #37325#21629#21517
      OnClick = N12Click
    end
    object N25: TMenuItem
      Caption = #23646#24615
      OnClick = N3Click
    end
  end
end