main.lfm

object Form1: TForm1
  Left = 578
  Height = 419
  Top = 384
  Width = 694
  Caption = 'Simple Sub Work - 0.93'
  ClientHeight = 399
  ClientWidth = 694
  Color = clBtnFace
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Menu = MainMenu1
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  ShowHint = True
  LCLVersion = '1.2.0.3'
  object Panel1: TPanel
    Left = 0
    Height = 270
    Top = 129
    Width = 694
    Align = alClient
    ClientHeight = 270
    ClientWidth = 694
    TabOrder = 0
    object ListBox1: TListBox
      Left = 1
      Height = 228
      Hint = 'Double click number to select region  or text to edit'
      Top = 1
      Width = 692
      Align = alClient
      ItemHeight = 0
      OnClick = ListBox1Click
      OnDblClick = ListBox1DblClick
      TabOrder = 0
    end
    object StatusBar1: TStatusBar
      Left = 1
      Height = 23
      Top = 246
      Width = 692
      Panels = <>
      SimplePanel = False
    end
    object ProgressBar1: TProgressBar
      Left = 1
      Height = 17
      Top = 229
      Width = 692
      Align = alBottom
      Step = 1
      TabOrder = 2
      Visible = False
    end
  end
  object Panel3: TPanel
    Left = 0
    Height = 129
    Top = 0
    Width = 694
    Align = alTop
    ClientHeight = 129
    ClientWidth = 694
    TabOrder = 1
    OnResize = Panel3Resize
    object Panel2: TPanel
      Left = 0
      Height = 118
      Top = 0
      Width = 393
      BevelOuter = bvLowered
      ClientHeight = 118
      ClientWidth = 393
      TabOrder = 0
      object Label1: TLabel
        Left = 4
        Height = 13
        Top = 3
        Width = 383
        AutoSize = False
        ParentColor = False
      end
      object GroupBox2: TGroupBox
        Left = 228
        Height = 104
        Top = 17
        Width = 159
        Caption = 'Region'
        ClientHeight = 86
        ClientWidth = 155
        TabOrder = 0
        object Label3: TLabel
          Left = 11
          Height = 13
          Top = 6
          Width = 25
          Caption = 'First :'
          ParentColor = False
        end
        object Label4: TLabel
          Left = 11
          Height = 13
          Top = 33
          Width = 26
          Caption = 'Last :'
          ParentColor = False
        end
        object ComboBox1: TComboBox
          Left = 57
          Height = 21
          Hint = 'First subtitle to work on'
          Top = 3
          Width = 83
          ItemHeight = 13
          Style = csDropDownList
          TabOrder = 0
        end
        object ComboBox2: TComboBox
          Left = 57
          Height = 21
          Hint = 'Last subtitle to work on'
          Top = 30
          Width = 83
          ItemHeight = 13
          Style = csDropDownList
          TabOrder = 1
        end
        object ApplyBtn: TButton
          Left = 64
          Height = 20
          Hint = 'Do the work'
          Top = 56
          Width = 75
          Caption = 'Apply'
          Default = True
          Enabled = False
          OnClick = ApplyBtnClick
          TabOrder = 2
        end
      end
      object GroupBox1: TGroupBox
        Left = 4
        Height = 104
        Top = 17
        Width = 222
        Caption = 'Shift parameters'
        ClientHeight = 86
        ClientWidth = 218
        TabOrder = 1
        object Label2: TLabel
          Left = 32
          Height = 13
          Top = 32
          Width = 51
          Caption = 'Time shift :'
          ParentColor = False
        end
        object TowardEnd: TRadioButton
          Left = 26
          Height = 19
          Hint = 'Shift towards end'
          Top = 6
          Width = 58
          Caption = 'Forward'
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object TowardTop: TRadioButton
          Left = 105
          Height = 19
          Hint = 'Shift towards begining'
          Top = 6
          Width = 68
          Caption = 'Backward'
          TabOrder = 1
        end
        object Edit2: TEdit
          Left = 107
          Height = 21
          Hint = 'Time shift'
          Top = 28
          Width = 73
          MaxLength = 12
          ReadOnly = True
          TabOrder = 2
          Text = '00:00:00,000'
        end
        object SpinH: TSpinEdit
          Left = 24
          Height = 21
          Hint = 'Hours'
          Top = 56
          Width = 35
          MaxValue = 59
          OnChange = SpinChange
          TabOrder = 3
        end
        object SpinM: TSpinEdit
          Left = 67
          Height = 21
          Hint = 'Minutes'
          Top = 56
          Width = 35
          MaxValue = 59
          OnChange = SpinChange
          TabOrder = 4
        end
        object SpinS: TSpinEdit
          Left = 110
          Height = 21
          Hint = 'Seconds'
          Top = 56
          Width = 35
          MaxValue = 59
          OnChange = SpinChange
          TabOrder = 5
        end
        object SpinMs: TSpinEdit
          Left = 150
          Height = 21
          Hint = 'Seconds'
          Top = 56
          Width = 44
          MaxValue = 999
          OnChange = SpinChange
          TabOrder = 6
        end
      end
    end
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = '.*.srt'
    Filter = 'SubRip Files|*.srt'
    left = 312
    top = 179
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '.*.srt'
    Filter = 'SubRip Files|*.srt'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofEnableSizing]
    left = 280
    top = 179
  end
  object MainMenu1: TMainMenu
    left = 344
    top = 179
    object File1: TMenuItem
      Caption = '&File'
      object Open1: TMenuItem
        Caption = 'Open'
        OnClick = Open1Click
      end
      object Append1: TMenuItem
        Caption = '&Append'
        OnClick = Append1Click
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object Save2: TMenuItem
        Caption = 'Save'
        Enabled = False
        OnClick = Save2Click
      end
      object Save1: TMenuItem
        Caption = 'Save as'
        Enabled = False
        OnClick = Save1Click
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = '&Exit'
        ShortCut = 16472
        OnClick = Exit1Click
      end
    end
    object Edit3: TMenuItem
      Caption = 'Edit'
      object Modify1: TMenuItem
        Caption = 'Modify'
        OnClick = ListBox1DblClick
      end
      object Delete1: TMenuItem
        Caption = 'Delete'
        OnClick = Delete1Click
      end
      object Renumber1: TMenuItem
        Caption = '&Renumber'
        OnClick = Renumber1Click
      end
    end
    object N1: TMenuItem
      Caption = '?'
      object About1: TMenuItem
        Caption = '&About'
        ShortCut = 112
        OnClick = About1Click
      end
    end
  end
end