jvid3v1mainformu.dfm

jvcl driver development envionment

object JvID3v1MainForm: TJvID3v1MainForm
  Left = 405
  Top = 240
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'TJvId3v1 example'
  ClientHeight = 228
  ClientWidth = 279
  Color = clBtnFace
  DefaultMonitor = dmDesktop
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poDesktopCenter
  Scaled = False
  ShowHint = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object lblArtist: TLabel
    Left = 25
    Top = 128
    Width = 23
    Height = 13
    Caption = '&Artist'
    FocusControl = edtArtist
  end
  object lblAlbum: TLabel
    Left = 19
    Top = 152
    Width = 29
    Height = 13
    Caption = 'Al&bum'
    FocusControl = edtAlbum
  end
  object lblYear: TLabel
    Left = 26
    Top = 176
    Width = 22
    Height = 13
    Caption = '&Year'
    FocusControl = edtYear
  end
  object lblComment: TLabel
    Left = 5
    Top = 200
    Width = 44
    Height = 13
    Caption = '&Comment'
    FocusControl = edtComment
  end
  object lblGenre: TLabel
    Left = 112
    Top = 176
    Width = 29
    Height = 13
    Caption = '&Genre'
    FocusControl = cmbGenre
  end
  object lblHasTag: TLabel
    Left = 16
    Top = 80
    Width = 48
    Height = 13
    Caption = 'lblHasTag'
  end
  object lblTitle: TLabel
    Left = 28
    Top = 104
    Width = 20
    Height = 13
    Caption = '&Title'
    FocusControl = edtTitle
  end
  object lblTrack: TLabel
    Left = 189
    Top = 80
    Width = 38
    Height = 13
    Caption = 'T&rack #'
    FocusControl = sedTrack
  end
  object JvFilenameEdit1: TJvFilenameEdit
    Left = 8
    Top = 56
    Width = 269
    Height = 21
    OnAfterDialog = JvFilenameEdit1AfterDialog
    AddQuotes = False
    ButtonFlat = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnKeyPress = JvFilenameEdit1KeyPress
  end
  object edtTitle: TEdit
    Left = 56
    Top = 104
    Width = 217
    Height = 21
    MaxLength = 30
    TabOrder = 2
  end
  object edtAlbum: TEdit
    Left = 56
    Top = 152
    Width = 217
    Height = 21
    MaxLength = 30
    TabOrder = 4
  end
  object edtArtist: TEdit
    Left = 56
    Top = 128
    Width = 217
    Height = 21
    MaxLength = 30
    TabOrder = 3
  end
  object edtYear: TEdit
    Left = 56
    Top = 176
    Width = 49
    Height = 21
    MaxLength = 4
    TabOrder = 5
  end
  object edtComment: TEdit
    Left = 56
    Top = 200
    Width = 217
    Height = 21
    MaxLength = 30
    TabOrder = 7
  end
  object cmbGenre: TComboBox
    Left = 149
    Top = 176
    Width = 125
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    Sorted = True
    TabOrder = 6
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 279
    Height = 44
    AutoSize = True
    ButtonHeight = 40
    ButtonWidth = 44
    Caption = 'ToolBar1'
    Images = ImageList1
    ParentShowHint = False
    ShowCaptions = True
    ShowHint = True
    TabOrder = 8
    Wrapable = False
    object ToolButton1: TToolButton
      Left = 0
      Top = 2
      Hint = 'Reload the tag data from the file'
      Action = actRefresh
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton2: TToolButton
      Left = 44
      Top = 2
      Hint = 'Save changes of the tag to the file'
      Action = actSave
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton3: TToolButton
      Left = 88
      Top = 2
      Hint = 'Erase the tag of the file'
      Action = actErase
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton4: TToolButton
      Left = 132
      Top = 2
      Hint = 'Toggle '#39'Always on Top'#39
      Action = actOnTop
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton5: TToolButton
      Left = 176
      Top = 2
      Hint = 'Show '#39'About'#39' dialog'
      Action = actAbout
      ParentShowHint = False
      ShowHint = True
    end
    object ToolButton6: TToolButton
      Left = 220
      Top = 2
      Hint = 'Close program'
      Action = actExit
      ParentShowHint = False
      ShowHint = True
    end
  end
  object sedTrack: TJvSpinEdit
    Left = 232
    Top = 80
    Width = 41
    Height = 21
    MaxValue = 255
    TabOrder = 1
  end
  object JvDragDrop1: TJvDragDrop
    DropTarget = Owner
    OnDrop = JvDragDrop1Drop
    Left = 88
    Top = 128
  end
  object JvId3v11: TJvID3v1
    Active = False
    Left = 152
    Top = 104
  end
  object ActionList1: TActionList
    Images = ImageList1
    Left = 152
    Top = 80
    object actSave: TAction
      Caption = 'Save'
      ImageIndex = 0