duplicateremover.lfm

object duplicateForm: TduplicateForm
  Left = 330
  Height = 573
  Top = 121
  Width = 783
  Caption = 'Historie-Duplikate-Finder'
  ClientHeight = 573
  ClientWidth = 783
  OnCreate = FormCreate
  LCLVersion = '1.8.1.0'
  Scaled = False
  object Panel2: TPanel
    Left = 0
    Height = 72
    Top = 501
    Width = 783
    Align = alBottom
    AutoSize = True
    BorderSpacing.InnerBorder = 5
    BevelOuter = bvNone
    ClientHeight = 72
    ClientWidth = 783
    TabOrder = 0
    object Button1: TButton
      AnchorSideLeft.Control = cbTimeConstraint
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = cbTimeConstraint
      AnchorSideBottom.Control = cbTimeConstraint
      AnchorSideBottom.Side = asrBottom
      Left = 298
      Height = 33
      Top = 29
      Width = 121
      Anchors = [akLeft, akBottom]
      AutoSize = True
      BorderSpacing.Left = 30
      Caption = 'Duplikate löschen'
      OnClick = Button1Click
      TabOrder = 0
    end
    object Button2: TButton
      AnchorSideTop.Control = Button1
      AnchorSideTop.Side = asrCenter
      Left = 699
      Height = 33
      Top = 29
      Width = 72
      Anchors = [akTop, akRight]
      AutoSize = True
      Cancel = True
      Caption = 'Schließen'
      OnClick = Button2Click
      TabOrder = 1
    end
    object cbAccounts: TComboBox
      AnchorSideLeft.Control = cbTimeConstraint
      Left = 68
      Height = 31
      Top = 0
      Width = 200
      ItemHeight = 0
      ItemIndex = 1
      Items.Strings = (
        'alle Konten'
        'individuelle Konten'
      )
      OnSelect = cbAccountsSelect
      Style = csDropDownList
      TabOrder = 2
      Text = 'individuelle Konten'
    end
    object cbTimeConstraint: TComboBox
      AnchorSideLeft.Control = Label2
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = cbAccounts
      AnchorSideTop.Side = asrBottom
      Left = 68
      Height = 31
      Top = 31
      Width = 200
      BorderSpacing.Left = 15
      ItemHeight = 0
      ItemIndex = 0
      Items.Strings = (
        'keine Einschränkung'
        'zeitlich überlappend'
        'identisches Ausleihdatum'
      )
      OnChange = cbAccountsSelect
      Style = csDropDownList
      TabOrder = 3
      Text = 'keine Einschränkung'
    end
    object Label1: TLabel
      AnchorSideTop.Control = cbAccounts
      AnchorSideTop.Side = asrCenter
      Left = 0
      Height = 19
      Top = 6
      Width = 47
      Caption = 'Konten:'
      ParentColor = False
    end
    object Label2: TLabel
      AnchorSideTop.Control = cbTimeConstraint
      AnchorSideTop.Side = asrCenter
      Left = 1
      Height = 19
      Top = 37
      Width = 52
      Caption = 'Zeitlimit:'
      ParentColor = False
    end
    object lbCount: TLabel
      AnchorSideLeft.Control = cbAccounts
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = cbAccounts
      AnchorSideTop.Side = asrCenter
      Left = 298
      Height = 1
      Top = 15
      Width = 1
      BorderSpacing.Left = 30
      ParentColor = False
    end
  end
end