frmmain.dfm

Apprehend Screen Capture Component Version 4.2 A non-visible component to capture images. Freeware w

object FormMain: TFormMain
  Left = 240
  Top = 215
  Width = 506
  Height = 355
  ActiveControl = StatusBar1
  Caption = 'Apprehend 2001 Envision Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFF000000
    0FFF0000FF000FF000FF00FFFF0000000FFFF00FFF0F0FF0F0FF00FFFF000000
    0FFFF00FF00F0F00F0FF00FFFF0000000FFFFF00F00F0F00F0FF00FFFF000000
    0FFF0000F00F0F00F0FF00FFFF0000000FFFF000FF000FF000FF00FFFF000000
    0FFFFFFFFFFFFFFFFFFFFFFFFF0000000FFFFFFFFFFFFFFFFFFFFFFFFF000000
    00000000000000000000000000000000EE0B333B333033B0EE08000000000000
    EEE0BB0B0003BB0EEE08000000000000EEE0BB0B0003BB0EEE08000000000000
    EEEE0030EEE000EEEE08000000000000EEEEEE0EEEEEEEEEEE08000000000000
    EEEEEEEEEEEEEEEEEE08000000000000EEEEEEEEEEEEEEEEEE08000000000000
    EEEEEEEEEEEEEEEEEE08000000000000EEEEEEEEEEEE000EEE08000000000000
    EEEEEEEEEEE0BBB0EE08000000000000EEEEEEEEEEE0BBB0EE08000000000000
    EEEEEEEEEEE0BBB0EE08000000000000EEEEEEEEEEEE000EEE08000000000000
    EEEEEEEEEEEEEEEEEE08000000000000EEEEEEEEEEEEEEEEEE08000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFF0000001F0000001F0000001F0000001F0000001F0000001F000
    0001F0000001F0000001F0000001E0000001E00000FFE00000FFE00000FFE000
    00FFE00000FFE00000FFE00000FFE00000FFE00000FFE00000FFE00000FFE000
    00FFE00000FFE00000FFE00000FFE00001FFFFFFFFFFFFFFFFFFFFFFFFFF}
  KeyPreview = True
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 498
    Height = 30
    AutoSize = True
    BorderWidth = 1
    Color = clBtnFace
    EdgeBorders = [ebTop, ebBottom]
    Flat = True
    Images = ImageList1
    Indent = 5
    ParentColor = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    Wrapable = False
    object ToolButton9: TToolButton
      Left = 5
      Top = 0
      Action = FileNew1
    end
    object ToolButton1: TToolButton
      Left = 28
      Top = 0
      Action = FileOpen1
    end
    object ToolButton4: TToolButton
      Left = 51
      Top = 0
      Action = FileClose1
    end
    object ToolButton12: TToolButton
      Left = 74
      Top = 0
      Action = FileCloseAll1
    end
    object ToolButton2: TToolButton
      Left = 97
      Top = 0
      Action = FileSave1
    end
    object ToolButton5: TToolButton
      Left = 120
      Top = 0
      Action = FileSaveAs1
    end
    object ToolButton8: TToolButton
      Left = 143
      Top = 0
      Width = 8
      Caption = 'ToolButton8'
      ImageIndex = 24
      Style = tbsSeparator
    end
    object ToolButton6: TToolButton
      Left = 151
      Top = 0
      Action = EditCopy1
    end
    object ToolButton13: TToolButton
      Left = 174
      Top = 0
      Action = EditPaste1
    end
    object ToolButton21: TToolButton
      Left = 197
      Top = 0
      Action = EditCrop1
    end
    object ToolButton24: TToolButton
      Left = 220
      Top = 0
      Width = 8
      Caption = 'ToolButton24'
      ImageIndex = 24
      Style = tbsSeparator
    end
    object ToolButton22: TToolButton
      Left = 228
      Top = 0
      Action = EditUndo1
    end
    object ToolButton7: TToolButton
      Left = 251
      Top = 0
      Width = 8
      Caption = 'ToolButton7'
      ImageIndex = 3
      Style = tbsSeparator
    end
    object ToolButton14: TToolButton
      Left = 259
      Top = 0
      Action = CaptureDesktop1
    end
    object ToolButton15: TToolButton
      Left = 282
      Top = 0
      Action = CaptureArea1
    end
    object ToolButton16: TToolButton
      Left = 305
      Top = 0
      Action = CaptureActive1
    end
    object ToolButton18: TToolButton
      Left = 328
      Top = 0
      Action = CaptureObject1
    end
    object ToolButton17: TToolButton
      Left = 351
      Top = 0
      Width = 8
      Caption = 'ToolButton17'
      ImageIndex = 21
      Style = tbsSeparator
    end
    object ToolButton19: TToolButton
      Left = 359
      Top = 0
      Action = FileExit1
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 290
    Width = 498
    Height = 19
    Panels = <
      item
        Width = 300
      end
      item
        Width = 150
      end
      item
        Width = 150
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 54
    Width = 498
    Height = 228
    Align = alClient
    Images = CaptureImageList
    TabOrder = 2
    OnChange = PageEditChange
  end
  object ProgressBar1: TProgressBar
    Left = 0
    Top = 282
    Width = 498
    Height = 8
    Align = alBottom
    Min = 0
    Max = 100
    TabOrder = 3
    Visible = False
  end
  object ToolBar2: TToolBar
    Left = 0
    Top = 30
    Width = 498
    Height = 24
    AutoSize = True
    Caption = 'ToolBar2'
    EdgeBorders = [ebBottom]
    Flat = True
    Images = ImageList1
    Indent = 5
    TabOrder = 4
    object FitButton: TToolButton
      Left = 5
      Top = 0
      Hint = 'Image Fit|Image Fit'
      Action = ImageFit1
      DropdownMenu = PopupMenuFit
      ParentShowHint = False
      ShowHint = True
      Style = tbsDropDown
    end
    object EffectsButton: TToolButton
      Left = 41
      Top = 0
      Hint = 'Image Effects|Image Effects'
      Action = ImageEffects1
      DropdownMenu = PopupMenuEffects
      ParentShowHint = False
      ShowHint = True
      Style = tbsDropDown
    end
    object TypeButton: TToolButton
      Left = 77
      Top = 0
      Hint = 'Image Type|Image Effects'
      Action = ImageType1
      DropdownMenu = TypePopupMenu
      ParentShowHint = False
      ShowHint = True
      Style = tbsDropDown
    end
    object RotateButton: TToolButton
      Left = 113
      Top = 0
      Hint = 'Rotate |Rotate'
      Action = Rotate901
      DropdownMenu = PopupMenuRotate
      ParentShowHint = False
      ShowHint = True
      Style = tbsDropDown
    end
    object ZoomButton: TToolButton
      Left = 149
      Top = 0
      Hint = 'Zoom|Zoom'
      Caption = 'Zoom'
      DropdownMenu = ZoomPopupMenu
      ImageIndex = 32
      ParentShowHint = False
      ShowHint = True
      Style = tbsDropDown
    end
    object ToolButton3: TToolButton
      Left = 185
      Top = 0
      Width = 8
      Caption = 'ToolButton3'
      ImageIndex = 33
      Style = tbsSeparator
    end
    object ZoomCombo: TComboBox
      Left = 193
      Top = 0
      Width = 72
      Height = 21
      Hint = 'Zoom'
      DropDownCount = 12
      ItemHeight = 13
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      Text = '100'
      OnChange = ZoomComboChange
      Items.Strings = (
        '10'
        '20'
        '25'
        '30'
        '40'
        '50'
        '60'
        '70'
        '75'
        '80'
        '90'
        '100'
        '125'
        '150'
        '175'
        '200'
        '250'