home *** CD-ROM | disk | FTP | other *** search
- inherited InformationForm: TInformationForm
- Caption = 'File Information'
- ClientHeight = 338
- ClientWidth = 380
- PixelsPerInch = 96
- TextHeight = 13
- object AlbumLabel: TStaticText [0]
- Left = 3
- Top = 11
- Width = 79
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Album:'
- TabOrder = 0
- end
- object Album: TEdit [1]
- Left = 88
- Top = 9
- Width = 284
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 200
- TabOrder = 1
- end
- object ArtistLabel: TStaticText [2]
- Left = 3
- Top = 38
- Width = 79
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Artist:'
- TabOrder = 2
- end
- object Artist: TEdit [3]
- Left = 88
- Top = 36
- Width = 284
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 200
- TabOrder = 3
- end
- object TitleLabel: TStaticText [4]
- Left = 3
- Top = 65
- Width = 79
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Title:'
- TabOrder = 4
- end
- object Title: TEdit [5]
- Left = 88
- Top = 63
- Width = 284
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 200
- TabOrder = 5
- end
- object CopyrightLabel: TStaticText [6]
- Left = 3
- Top = 92
- Width = 79
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Copyright:'
- TabOrder = 6
- end
- object Copyright: TEdit [7]
- Left = 88
- Top = 90
- Width = 284
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 200
- TabOrder = 7
- end
- object GenreLabel: TStaticText [8]
- Left = 3
- Top = 119
- Width = 79
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Genre:'
- TabOrder = 8
- end
- object Genre: TEdit [9]
- Left = 88
- Top = 117
- Width = 284
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 200
- TabOrder = 9
- end
- object DateLabel: TStaticText [10]
- Left = 3
- Top = 146
- Width = 79
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Date:'
- TabOrder = 10
- end
- object Date: TEdit [11]
- Left = 88
- Top = 144
- Width = 143
- Height = 21
- MaxLength = 100
- TabOrder = 11
- end
- object DateFormatLabel: TStaticText [12]
- Left = 237
- Top = 147
- Width = 133
- Height = 17
- Caption = 'YYYY/MM/DD HH:MM:SS'
- TabOrder = 12
- end
- object URLLabel: TStaticText [13]
- Left = 3
- Top = 173
- Width = 79
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'URL:'
- TabOrder = 13
- end
- object URL: TEdit [14]
- Left = 88
- Top = 171
- Width = 284
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 200
- TabOrder = 14
- end
- object TrackLabel: TStaticText [15]
- Left = 3
- Top = 200
- Width = 79
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Track number:'
- TabOrder = 15
- end
- object TrackNumber: TEdit [16]
- Left = 88
- Top = 198
- Width = 68
- Height = 21
- MaxLength = 7
- TabOrder = 16
- end
- object ISRCLabel: TStaticText [17]
- Left = 198
- Top = 200
- Width = 32
- Height = 17
- Caption = 'ISRC:'
- TabOrder = 17
- end
- object ISRC: TEdit [18]
- Left = 236
- Top = 198
- Width = 136
- Height = 21
- MaxLength = 100
- TabOrder = 18
- end
- object DescriptionLabel: TStaticText [19]
- Left = 3
- Top = 225
- Width = 79
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Description:'
- TabOrder = 19
- end
- object Description: TMemo [20]
- Left = 88
- Top = 225
- Width = 284
- Height = 75
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 500
- TabOrder = 20
- WantReturns = False
- end
- object Copy: TBitton [21]
- Left = 15
- Top = 308
- Width = 25
- Height = 25
- Image.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 88888888888888888888888888844444444488888884FFFFFFF488888884F000
- 00F480000004FFFFFFF480FFFFF4F00000F480F00004FFFFFFF480FFFFF4F00F
- 444480F00004FFFF4F4880FFFFF4FFFF448880F00F044444488880FFFF0F0888
- 888880FFFF008888888880000008888888888888888888888888}
- FocusAllowed = True
- Action = ActionCopy
- ParentShowHint = False
- ShowHint = True
- TabOrder = 21
- end
- object Paste: TBitton [22]
- Left = 46
- Top = 308
- Width = 25
- Height = 25
- Image.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888884444444
- 4444888884FFFFFFFFF4888884F0000000F4800004FFFFFFFFF4073734F00000
- 00F4037374FFFFFFFFF4073734F0000F4444037374FFFFFF4F48073734FFFFFF
- 4488037374444444408807373737373730880370000000037088073088888807
- 308803730B00B0737088800000BB000008888888800008888888}
- FocusAllowed = True
- Action = ActionPaste
- ParentShowHint = False
- ShowHint = True
- TabOrder = 22
- end
- inherited ButtonOk: TButton
- Left = 137
- Top = 308
- TabOrder = 23
- OnClick = ButtonOkClick
- end
- inherited ButtonCancel: TButton
- Left = 217
- Top = 308
- TabOrder = 24
- end
- inherited ButtonHelp: THelpButton
- Left = 297
- Top = 308
- TabOrder = 25
- HelpKey = 'file_information'
- end
- object ActionList: TActionList
- Left = 28
- Top = 272
- object ActionCopy: TAction
- Category = 'Edit'
- Caption = 'Copy'
- Hint = 'Copies information to the clipboard'
- OnExecute = CopyExecute
- end
- object ActionPaste: TAction
- Category = 'Edit'
- Caption = 'Paste'
- Hint = 'Pastes information from the clipboard'
- OnExecute = PasteExecute
- OnUpdate = PasteUpdate
- end
- end
- end
-