simglisteditor.dfm

AlphaControls是一个Delphi标准控件的集合

object FormImgListEditor: TFormImgListEditor
  Left = 343
  Top = 299
  Width = 365
  Height = 345
  Caption = 'ImageList'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton5: TSpeedButton
    Left = 263
    Top = 60
    Width = 86
    Height = 25
    Action = ActionOk
    Anchors = [akLeft, akBottom]
  end
  object SpeedButton6: TSpeedButton
    Left = 263
    Top = 87
    Width = 86
    Height = 25
    Action = ActionCancel
    Anchors = [akLeft, akBottom]
  end
  object SpeedButton7: TSpeedButton
    Left = 263
    Top = 114
    Width = 86
    Height = 25
    Action = ActionApply
    Anchors = [akLeft, akBottom]
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 356
    Height = 54
    Anchors = [akLeft, akTop, akRight, akBottom]
    Caption = ' Images '
    TabOrder = 0
    object SpeedButton1: TSpeedButton
      Left = 8
      Top = 24
      Width = 84
      Height = 25
      Action = ActionAdd
      Anchors = [akLeft, akBottom]
      Flat = True
    end
    object SpeedButton2: TSpeedButton
      Left = 93
      Top = 24
      Width = 84
      Height = 25
      Action = ActionDelete
      Anchors = [akLeft, akBottom]
      Flat = True
    end
    object SpeedButton3: TSpeedButton
      Left = 178
      Top = 24
      Width = 84
      Height = 25
      Action = ActionClear
      Anchors = [akLeft, akBottom]
      Flat = True
    end
    object SpeedButton4: TSpeedButton
      Left = 263
      Top = 24
      Width = 84
      Height = 25
      Action = ActionExport
      Anchors = [akLeft, akBottom]
      Flat = True
    end
    object ListView1: TListView
      Left = 4
      Top = 13
      Width = 342
      Height = 7
      Anchors = [akLeft, akTop, akRight, akBottom]
      Columns = <>
      DragMode = dmAutomatic
      IconOptions.Arrangement = iaLeft
      IconOptions.AutoArrange = True
      LargeImages = ImageList1
      TabOrder = 0
      OnChange = ListView1Change
      OnDragDrop = ListView1DragDrop
      OnDragOver = ListView1DragOver
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 54
    Width = 253
    Height = 264
    Anchors = [akLeft, akBottom]
    Caption = ' Selected image '
    TabOrder = 1
    object Panel1: TPanel
      Left = 15
      Top = 26
      Width = 220
      Height = 220
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Caption = ' '
      Color = clWindow
      TabOrder = 0
    end
  end
  object ActionList1: TActionList
    Left = 243
    Top = 30
    object ActionAdd: TAction
      Caption = 'Add'
      OnExecute = ActionAddExecute
    end
    object ActionDelete: TAction
      Caption = 'Delete'
      OnExecute = ActionDeleteExecute
    end
    object ActionClear: TAction
      Caption = 'Clear'
      OnExecute = ActionClearExecute
    end
    object ActionExport: TAction
      Caption = 'Export'
    end
    object ActionOk: TAction
      Caption = 'Ok'
      ShortCut = 13
      OnExecute = ActionOkExecute
    end
    object ActionCancel: TAction
      Caption = 'Cancel'
      ShortCut = 27
      OnExecute = ActionCancelExecute
    end
    object ActionApply: TAction
      Caption = 'Apply'
    end
  end
  object ImageList1: TImageList
    Left = 271
    Top = 31
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Filter = 
      'All (*.bmp, *.ico)|*.bmp;*.ico|Icons (*.ico)|*.ico|Bitmaps (*.bm' +
      'p)|*.bmp'
    Title = 'Add image'
    Left = 300
    Top = 32
  end
end