object FormRecord: TFormRecord
  Left = 639
  Height = 649
  Top = 223
  Width = 858
  Caption = 'Record'
  ClientHeight = 649
  ClientWidth = 858
  DesignTimePPI = 144
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  Position = poMainFormCenter
  LCLVersion = '2.2.2.0'
  object Panel1: TPanel
    Left = 4
    Height = 583
    Top = 4
    Width = 850
    Align = alTop
    Anchors = [akTop, akLeft, akRight, akBottom]
    BorderSpacing.Around = 4
    BevelOuter = bvNone
    TabOrder = 0
  end
  object ButtonOk: TButton
    Left = 759
    Height = 25
    Top = 603
    Width = 75
    Anchors = [akRight, akBottom]
    Caption = 'Ok'
    ModalResult = 1
    TabOrder = 1
  end
  object ButtonCancel: TButton
    Left = 648
    Height = 27
    Top = 603
    Width = 72
    Anchors = [akRight, akBottom]
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object ActionList1: TActionList
    Images = Core.ImageList1
    Left = 423
    Top = 379
    object ASave: TAction
      Caption = 'Save'
      OnExecute = ASaveExecute
    end
    object ACancel: TAction
      Caption = 'Cancel'
      OnExecute = ACancelExecute
    end
  end
end