2011-07-21 09:39:48 +00:00
|
|
|
object EditID3: TEditID3
|
|
|
|
Left = 383
|
|
|
|
Height = 454
|
|
|
|
Top = 258
|
|
|
|
Width = 432
|
|
|
|
HorzScrollBar.Page = 395
|
|
|
|
HorzScrollBar.Range = 383
|
|
|
|
VertScrollBar.Page = 441
|
|
|
|
VertScrollBar.Range = 409
|
|
|
|
ActiveControl = metacontrol
|
|
|
|
BorderStyle = bsDialog
|
|
|
|
Caption = 'Edit ID3 Tag'
|
|
|
|
ClientHeight = 454
|
|
|
|
ClientWidth = 432
|
|
|
|
OnClose = EditID3Close
|
|
|
|
OnCreate = FormCreate
|
|
|
|
OnHide = FormHide
|
|
|
|
Position = poMainFormCenter
|
|
|
|
ShowInTaskBar = stNever
|
2011-07-26 06:36:09 +00:00
|
|
|
LCLVersion = '0.9.31'
|
2011-07-21 09:39:48 +00:00
|
|
|
object metacontrol: TPageControl
|
|
|
|
Left = 8
|
|
|
|
Height = 402
|
|
|
|
Top = 8
|
|
|
|
Width = 411
|
|
|
|
ActivePage = metatab
|
|
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
|
|
TabIndex = 0
|
|
|
|
TabOrder = 0
|
|
|
|
object metatab: TTabSheet
|
|
|
|
Caption = 'Meta-Info'
|
|
|
|
ClientHeight = 371
|
|
|
|
ClientWidth = 405
|
|
|
|
object lblYear: TLabel
|
2011-07-26 06:36:09 +00:00
|
|
|
Left = 22
|
2011-07-21 09:39:48 +00:00
|
|
|
Height = 14
|
2011-07-26 06:36:09 +00:00
|
|
|
Top = 256
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 26
|
|
|
|
Caption = 'Year'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object lblPath: TLabel
|
|
|
|
Left = 15
|
|
|
|
Height = 14
|
|
|
|
Top = 66
|
|
|
|
Width = 62
|
|
|
|
Caption = 'Path to file'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object AlbumCoverImg: TImage
|
|
|
|
Left = 232
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 151
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 214
|
2011-07-26 06:36:09 +00:00
|
|
|
Width = 160
|
2011-07-21 09:39:48 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
|
|
AutoSize = True
|
|
|
|
Proportional = True
|
|
|
|
Stretch = True
|
|
|
|
end
|
|
|
|
object lblArtist: TLabel
|
|
|
|
Left = 22
|
|
|
|
Height = 14
|
|
|
|
Top = 118
|
|
|
|
Width = 31
|
|
|
|
Caption = 'Artist'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object lblTitle: TLabel
|
|
|
|
Left = 22
|
|
|
|
Height = 14
|
|
|
|
Top = 150
|
|
|
|
Width = 25
|
|
|
|
Caption = 'Title'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object lblAlbum: TLabel
|
|
|
|
Left = 22
|
|
|
|
Height = 14
|
|
|
|
Top = 182
|
|
|
|
Width = 36
|
|
|
|
Caption = 'Album'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object lblTrack: TLabel
|
|
|
|
Left = 22
|
|
|
|
Height = 14
|
|
|
|
Top = 214
|
|
|
|
Width = 30
|
|
|
|
Caption = 'Track'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object lblGenre: TLabel
|
2011-07-26 06:36:09 +00:00
|
|
|
Left = 20
|
2011-07-21 09:39:48 +00:00
|
|
|
Height = 14
|
2011-07-26 06:36:09 +00:00
|
|
|
Top = 296
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 36
|
|
|
|
Caption = 'Genre'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object lblComment: TLabel
|
2011-07-26 06:36:09 +00:00
|
|
|
Left = 22
|
2011-07-21 09:39:48 +00:00
|
|
|
Height = 14
|
2011-07-26 06:36:09 +00:00
|
|
|
Top = 328
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 56
|
|
|
|
Caption = 'Comment'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object GroupBox1: TGroupBox
|
|
|
|
Left = 15
|
|
|
|
Height = 53
|
|
|
|
Top = 7
|
|
|
|
Width = 241
|
|
|
|
Caption = 'Tag to name'
|
|
|
|
ClientHeight = 38
|
2011-07-26 06:36:09 +00:00
|
|
|
ClientWidth = 233
|
2011-07-21 09:39:48 +00:00
|
|
|
TabOrder = 10
|
|
|
|
object btnOptions: TButton
|
|
|
|
Left = 125
|
|
|
|
Height = 23
|
|
|
|
Hint = '( %a/%a - %b - %n - %t )'
|
2011-07-26 06:36:09 +00:00
|
|
|
Top = 8
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 105
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.Around = 4
|
|
|
|
Caption = 'Options'
|
|
|
|
OnClick = btnOptionsClick
|
|
|
|
ParentShowHint = False
|
|
|
|
ShowHint = True
|
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object Button1: TButton
|
|
|
|
Left = 15
|
|
|
|
Height = 23
|
2011-07-26 06:36:09 +00:00
|
|
|
Top = 8
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 105
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.Around = 4
|
|
|
|
Caption = 'Apply now'
|
|
|
|
OnClick = Button1Click
|
|
|
|
ParentShowHint = False
|
|
|
|
ShowHint = True
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
end
|
|
|
|
object artistedit1: TEdit
|
|
|
|
Left = 66
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 21
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 114
|
2011-07-26 06:36:09 +00:00
|
|
|
Width = 326
|
2011-07-21 09:39:48 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight]
|
|
|
|
OnChange = activateEMode
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
object titleedit1: TEdit
|
2011-07-26 06:36:09 +00:00
|
|
|
Left = 66
|
|
|
|
Height = 21
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 146
|
2011-07-26 06:36:09 +00:00
|
|
|
Width = 326
|
2011-07-21 09:39:48 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight]
|
|
|
|
OnChange = activateEMode
|
|
|
|
TabOrder = 2
|
|
|
|
end
|
|
|
|
object albumedit1: TEdit
|
2011-07-26 06:36:09 +00:00
|
|
|
Left = 66
|
|
|
|
Height = 21
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 178
|
2011-07-26 06:36:09 +00:00
|
|
|
Width = 326
|
2011-07-21 09:39:48 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight]
|
|
|
|
OnChange = activateEMode
|
|
|
|
TabOrder = 3
|
|
|
|
end
|
|
|
|
object yearEdit1: TEdit
|
2011-07-26 06:36:09 +00:00
|
|
|
Left = 152
|
|
|
|
Height = 21
|
|
|
|
Top = 256
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 64
|
|
|
|
MaxLength = 4
|
|
|
|
TabOrder = 5
|
|
|
|
end
|
|
|
|
object commentedit1: TEdit
|
2011-07-26 06:36:09 +00:00
|
|
|
Left = 21
|
|
|
|
Height = 21
|
|
|
|
Top = 336
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 194
|
|
|
|
OnChange = activateEMode
|
|
|
|
TabOrder = 6
|
|
|
|
end
|
|
|
|
object pathedit1: TEdit
|
|
|
|
Left = 15
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 21
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 82
|
2011-07-26 06:36:09 +00:00
|
|
|
Width = 378
|
2011-07-21 09:39:48 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight]
|
|
|
|
OnChange = activateEMode
|
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object trackedit1: TEdit
|
|
|
|
Left = 66
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 21
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 210
|
2011-07-26 06:36:09 +00:00
|
|
|
Width = 60
|
2011-07-21 09:39:48 +00:00
|
|
|
MaxLength = 4
|
|
|
|
OnChange = activateEMode
|
|
|
|
TabOrder = 4
|
|
|
|
end
|
|
|
|
object guessname1: TButton
|
|
|
|
Left = 278
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 27
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 31
|
2011-07-26 06:36:09 +00:00
|
|
|
Width = 100
|
2011-07-21 09:39:48 +00:00
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Around = 4
|
|
|
|
Caption = 'Tag from name'
|
|
|
|
OnClick = guessnameClick
|
|
|
|
TabOrder = 7
|
|
|
|
end
|
|
|
|
object cmbYear: TComboBox
|
2011-07-26 06:36:09 +00:00
|
|
|
Left = 153
|
|
|
|
Height = 29
|
|
|
|
Top = 252
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 64
|
|
|
|
ItemHeight = 0
|
|
|
|
MaxLength = 4
|
|
|
|
OnChange = cmbYearChange
|
|
|
|
Sorted = True
|
|
|
|
TabOrder = 8
|
|
|
|
Text = 'cmbY'
|
|
|
|
Visible = False
|
|
|
|
end
|
|
|
|
object cmbComment: TComboBox
|
2011-07-26 06:36:09 +00:00
|
|
|
Left = 20
|
|
|
|
Height = 29
|
|
|
|
Top = 332
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 196
|
|
|
|
ItemHeight = 0
|
|
|
|
OnChange = activateEMode
|
|
|
|
Sorted = True
|
|
|
|
TabOrder = 9
|
|
|
|
Text = 'cmbComment'
|
|
|
|
Visible = False
|
|
|
|
end
|
|
|
|
object GenreBox: TComboBox
|
|
|
|
Left = 67
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 29
|
|
|
|
Top = 288
|
2011-07-21 09:39:48 +00:00
|
|
|
Width = 150
|
|
|
|
AutoComplete = True
|
|
|
|
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
|
|
|
|
ItemHeight = 0
|
|
|
|
OnChange = activateEMode
|
|
|
|
Sorted = True
|
|
|
|
TabOrder = 11
|
|
|
|
end
|
|
|
|
end
|
|
|
|
object fileinfo: TTabSheet
|
|
|
|
Caption = 'File-Info'
|
|
|
|
ClientHeight = 371
|
|
|
|
ClientWidth = 405
|
|
|
|
object mtype: TLabel
|
|
|
|
Left = 40
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 14
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 34
|
|
|
|
Width = 62
|
|
|
|
Caption = 'Mediatype:'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object bitrate: TLabel
|
|
|
|
Left = 40
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 14
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 114
|
|
|
|
Width = 81
|
|
|
|
Caption = 'Bitrate: 0kbps'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object fsize: TLabel
|
|
|
|
Left = 40
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 14
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 94
|
|
|
|
Width = 77
|
|
|
|
Caption = 'Filesize: 0 MB'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object srate: TLabel
|
|
|
|
Left = 40
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 14
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 134
|
|
|
|
Width = 71
|
|
|
|
Caption = 'Samplerate:'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object plength: TLabel
|
|
|
|
Left = 40
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 14
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 58
|
|
|
|
Width = 43
|
|
|
|
Caption = 'Length:'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object idlabel: TLabel
|
|
|
|
Left = 41
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 14
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 178
|
|
|
|
Width = 37
|
|
|
|
Caption = 'Fileid: '
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object indexlabel: TLabel
|
|
|
|
Left = 40
|
2011-07-26 06:36:09 +00:00
|
|
|
Height = 14
|
2011-07-21 09:39:48 +00:00
|
|
|
Top = 194
|
|
|
|
Width = 53
|
|
|
|
Caption = 'FileIndex:'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object Filelogo: TImage
|
|
|
|
Left = 230
|
|
|
|
Height = 100
|
|
|
|
Top = 34
|
|
|
|
Width = 100
|
|
|
|
end
|
|
|
|
end
|
|
|
|
object StreamTab: TTabSheet
|
|
|
|
Caption = 'Stream-Info'
|
|
|
|
ClientHeight = 371
|
|
|
|
ClientWidth = 405
|
|
|
|
object Label1: TLabel
|
|
|
|
Left = 26
|
|
|
|
Height = 14
|
|
|
|
Top = 15
|
|
|
|
Width = 34
|
|
|
|
Caption = 'Name'
|
|
|
|
Color = clBackground
|
|
|
|
ParentColor = False
|
|
|
|
Transparent = False
|
|
|
|
end
|
|
|
|
object Label2: TLabel
|
|
|
|
Left = 26
|
|
|
|
Height = 14
|
|
|
|
Top = 79
|
|
|
|
Width = 68
|
|
|
|
Caption = 'Stream URL'
|
|
|
|
Color = clBackground
|
|
|
|
ParentColor = False
|
|
|
|
Transparent = False
|
|
|
|
end
|
|
|
|
object Label3: TLabel
|
|
|
|
Left = 26
|
|
|
|
Height = 14
|
|
|
|
Top = 143
|
|
|
|
Width = 65
|
|
|
|
Caption = 'Description'
|
|
|
|
Color = clBackground
|
|
|
|
ParentColor = False
|
|
|
|
Transparent = False
|
|
|
|
end
|
|
|
|
object NameEdit: TEdit
|
|
|
|
Left = 46
|
|
|
|
Height = 23
|
|
|
|
Top = 33
|
|
|
|
Width = 296
|
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object URLEdit: TEdit
|
|
|
|
Left = 46
|
|
|
|
Height = 23
|
|
|
|
Top = 97
|
|
|
|
Width = 296
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
object DescEdit: TMemo
|
|
|
|
Left = 46
|
|
|
|
Height = 66
|
|
|
|
Top = 167
|
|
|
|
Width = 296
|
|
|
|
TabOrder = 2
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
object cancelbut1: TButton
|
|
|
|
Left = 280
|
|
|
|
Height = 25
|
|
|
|
Top = 418
|
|
|
|
Width = 75
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.InnerBorder = 4
|
|
|
|
Cancel = True
|
|
|
|
Caption = '&Cancel'
|
|
|
|
OnClick = cancelbutClick
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
object savebut1: TButton
|
|
|
|
Left = 176
|
|
|
|
Height = 25
|
|
|
|
Top = 418
|
|
|
|
Width = 75
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.InnerBorder = 4
|
|
|
|
Caption = '&Save'
|
|
|
|
Default = True
|
|
|
|
OnClick = savebutClick
|
|
|
|
TabOrder = 2
|
|
|
|
end
|
|
|
|
object btnReset: TButton
|
|
|
|
Left = 32
|
|
|
|
Height = 25
|
|
|
|
Top = 418
|
|
|
|
Width = 75
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.InnerBorder = 4
|
|
|
|
Caption = '&Reset'
|
|
|
|
OnClick = btnResetClick
|
|
|
|
TabOrder = 3
|
|
|
|
end
|
|
|
|
object PicDownloadTimer: TTimer
|
|
|
|
Enabled = False
|
|
|
|
Interval = 100
|
|
|
|
OnTimer = PicDownloadTimerTimer
|
|
|
|
OnStartTimer = PicDownloadTimerStartTimer
|
|
|
|
left = 344
|
|
|
|
end
|
|
|
|
end
|