unfrmusesunit.dfm

简单好用的Delphi专家一个简单好用的Delphi专家 安装后Delphi将增加两个小功能: 1.在窗体/DataModule上可以按Ctrl-F进行查找定位组件, 在一个窗体/DataM

object frmUsesUnit: TfrmUsesUnit
  Left = 205
  Top = 134
  Width = 371
  Height = 390
  Caption = 'Uses Unit'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001001010000001000800680500001600000028000000100000002000
    000001000800000000000001000000000000000000000001000000000000FFFF
    FF00EBEBEC00D2D2D300C6D1C500CCCCCD00B8CFB500AACFA5009BE592009FCE
    9A009BCF9400BBBBBC00B0BBB100B4B4B500ABB8AA00A9A9AA00A2AFA100A7A7
    A800A4A4A50098B0950091AF8E008BBE850085A68100FFB84800F9B44200F2AC
    3B00E9A53100E09D2900D8952000CF8E1700C6860E0080DD7400BC7C030064D6
    54004CCE3A007FA57A00769772006E936A006A88650061835C00268718006F6F
    70004A4A4A00424242003B3B3B00333433002B2C2B001E1F1E00000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000202020000000000000000000000000003E3E
    3E00000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000FFFFFF002F2F
    2F2F2F2F2F2F2F2F2F2F2F2F2F2FF0F0F0F0F0F0F0F0F0F0F0F0F02F2F2FF004
    04040404040404040404F02F2F2FF00E0101020A0C0E0E1010ECECEC2F2FF00E
    010102030B0B0B0B0BEC07EC2F2FF00E020A0F12152325ECEC271E27ECECF00E
    02030506080914EC1E1E201E07ECF00E020A0F13222426ECEC272127ECECF00E
    010102030D0D0D0D0DEC1E2B2F2FF00E0101020A0C0E111111ECECEC2F2FF00E
    01010101010101010101F02F2F2FF02828282828282828282828F02F2F2FF016
    161718191A1B1C1D1F1FF02F2F2FF016161718191A1B1C1D1F1FF02F2F2FF0F0
    F0F0F0F0F0F0F0F0F0F0F02F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2FFFFF
    FFFF0007FFFF0007FFFF0003FFFF0003FFFF0000FFFF0000FFFF0000FFFF0003
    FFFF0003FFFF0007FFFF0007FFFF0007FFFF0007FFFF0007FFFFFFFFFFFF}
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  DesignSize = (
    363
    363)
  PixelsPerInch = 96
  TextHeight = 13
  object bvl1: TBevel
    Left = 271
    Top = 76
    Width = 89
    Height = 7
    Anchors = [akTop, akRight]
    Shape = bsBottomLine
  end
  object bvl2: TBevel
    Left = 271
    Top = 132
    Width = 89
    Height = 7
    Anchors = [akTop, akRight]
    Shape = bsBottomLine
  end
  object bbtOK: TBitBtn
    Left = 274
    Top = 9
    Width = 82
    Height = 25
    Anchors = [akTop, akRight]
    TabOrder = 2
    OnClick = bbtOKClick
    Kind = bkOK
  end
  object bbtCancel: TBitBtn
    Left = 274
    Top = 40
    Width = 82
    Height = 25
    Anchors = [akTop, akRight]
    TabOrder = 3
    Kind = bkCancel
  end
  object lstUnits: TListBox
    Left = 6
    Top = 30
    Width = 260
    Height = 325
    Anchors = [akLeft, akTop, akRight, akBottom]
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    Items.Strings = (
      'ActiveX'
      'Buttons'
      'Classes'
      'ComCtrls'
      'ComObj'
      'Contnrs'
      'Controls'
      'DateUtils'
      'Dialogs'
      'ExtCtrls'
      'Forms'
      'Graphics'
      'Math'
      'Menus'
      'Messages'
      'ShellAPI'
      'StdCtrls'
      'StrUtils'
      'SysUtils'
      'Variants'
      'Windows')
    MultiSelect = True
    ParentFont = False
    Sorted = True
    TabOrder = 1
    OnClick = lstUnitsClick
    OnDblClick = lstUnitsDblClick
  end
  object edUnitName: TEdit
    Left = 6
    Top = 8
    Width = 260
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnChange = edUnitNameChange
    OnKeyDown = edUnitNameKeyDown
    OnKeyPress = edUnitNameKeyPress
  end
  object btOldUsesUnit: TButton
    Left = 275
    Top = 320
    Width = 82
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = '&Default Uses'
    TabOrder = 4
    OnClick = btOldUsesUnitClick
  end
  object rbtShowAllUnits: TRadioButton
    Left = 279
    Top = 91
    Width = 77
    Height = 17
    Anchors = [akTop, akRight]
    Caption = '&All Units'
    Checked = True
    TabOrder = 5
    TabStop = True
    OnClick = rbtShowAllUnitsClick
  end
  object rbtShowFormUnits: TRadioButton
    Left = 279
    Top = 114
    Width = 77
    Height = 17
    Anchors = [akTop, akRight]
    Caption = '&Form Units'
    TabOrder = 6
    OnClick = rbtShowFormUnitsClick
  end
end