object Form1: TForm1 Left = 237 Top = 200 Width = 600 Height = 400 ActiveControl = ListBoxText Caption = 'SingedIT' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object TabbedNotebook1: TTabbedNotebook Left = 0 Top = 0 Width = 152 Height = 373 Align = alLeft TabFont.Charset = DEFAULT_CHARSET TabFont.Color = clBtnText TabFont.Height = -11 TabFont.Name = 'MS Sans Serif' TabFont.Style = [] TabOrder = 1 TabStop = False object TTabPage Left = 4 Top = 24 Caption = 'Actions' object Label11: TLabel Left = 0 Top = 52 Width = 38 Height = 13 Caption = '.lrc files:' end object Label12: TLabel Left = 0 Top = 98 Width = 47 Height = 13 Caption = '.mp3 files:' end object Label13: TLabel Left = 0 Top = 193 Width = 28 Height = 13 Caption = 'Lines:' end object Label14: TLabel Left = 0 Top = 301 Width = 49 Height = 13 Caption = 'Time-tags:' end object Label16: TLabel Left = 0 Top = 7 Width = 50 Height = 13 Caption = 'Edit mode:' end object Label17: TLabel Left = 72 Top = 142 Width = 61 Height = 23 Alignment = taCenter Caption = '[00:00]' Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial Black' Font.Style = [] ParentColor = False ParentFont = False end object ButtonLoad: TButton Left = 30 Top = 68 Width = 33 Height = 25 Hint = 'Load a lyric' Caption = 'Load' ParentShowHint = False ShowHint = True TabOrder = 0 TabStop = False OnClick = ButtonLoadClick end object ButtonSave: TButton Left = 63 Top = 68 Width = 32 Height = 25 Hint = 'Save the current lyric' Caption = 'Save' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 1 TabStop = False OnClick = ButtonSaveClick end object ButtonSaveAs: TButton Left = 95 Top = 68 Width = 49 Height = 25 Hint = 'Save the current lyric as ...' Caption = 'Save As' ParentShowHint = False ShowHint = True TabOrder = 2 TabStop = False OnClick = ButtonSaveAsClick end object ButtonNew: TButton Left = 0 Top = 68 Width = 30 Height = 25 Hint = 'Create a new lyric' Caption = 'New' ParentShowHint = False ShowHint = True TabOrder = 3 TabStop = False OnClick = ButtonNewClick end object ButtonSort: TButton Left = 0 Top = 261 Width = 74 Height = 25 Hint = 'Sort all lines by time' Caption = 'Sort' ParentShowHint = False ShowHint = True TabOrder = 4 TabStop = False OnClick = ButtonSortClick end object ButtonLoadMp3: TButton Left = 0 Top = 115 Width = 62 Height = 25 Hint = 'Load an MP3 file' Caption = 'Load MP3' ParentShowHint = False ShowHint = True TabOrder = 5 TabStop = False OnClick = ButtonLoadMp3Click end object ButtonPlay: TButton Left = 62 Top = 115 Width = 40 Height = 25 Hint = 'Play the MP3 file' Caption = 'Play' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 6 TabStop = False OnClick = ButtonPlayClick end object ButtonStop: TButton Left = 102 Top = 115 Width = 42 Height = 25 Hint = 'Stop playing the MP3 file' Caption = 'Stop' Enabled = False ParentShowHint = False ShowHint = True TabOrder = 7 TabStop = False OnClick = ButtonStopClick end object ButtonDeleteNonTimeTag: TButton Left = 0 Top = 236 Width = 144 Height = 25 Hint = 'Delete all lines without time-tag' Caption = 'Delete lines without tags' ParentShowHint = False ShowHint = True TabOrder = 8 TabStop = False OnClick = ButtonDeleteNonTimeTagClick end object ButtonFont: TButton Left = 74 Top = 261 Width = 70 Height = 25 Hint = 'Change the font used' Caption = 'Font' TabOrder = 9 TabStop = False OnClick = ButtonFontClick end object ButtonIns: TButton Left = 0 Top = 319 Width = 74 Height = 25 Hint = 'Insert a time-tag' Caption = 'Ins key' ParentShowHint = False ShowHint = True TabOrder = 10 TabStop = False OnClick = ButtonInsClick end object ButtonDel: TButton Left = 74 Top = 319 Width = 70 Height = 25 Hint = 'Delete a time-tag' Caption = 'Del key' ParentShowHint = False ShowHint = True TabOrder = 11 TabStop = False OnClick = ButtonDelClick end object ButtonEditMode: TButton Left = 0 Top = 23 Width = 74 Height = 25 Caption = 'Notepad' TabOrder = 12 TabStop = False OnClick = ButtonEditModeClick end object ButtonTagMode: TButton Left = 74 Top = 23 Width = 70 Height = 25 Caption = 'Time-Tag' Enabled = False TabOrder = 13 TabStop = False OnClick = ButtonTagModeClick end object ScrollBar1: TScrollBar Left = 0 Top = 173 Width = 144 Height = 16 Enabled = False LargeChange = 10 TabOrder = 14 OnScroll = ScrollBar1Scroll end object ButtonPause: TButton Left = 0 Top = 140 Width = 62 Height = 25 Caption = 'Pause' Enabled = False TabOrder = 15 OnClick = ButtonPauseClick end object ButtonDeleteTimeTag: TButton Left = 0 Top = 211 Width = 144 Height = 25 Caption = 'Delete all time tags' TabOrder = 16 OnClick = ButtonDeleteTimeTagClick end end object TTabPage Left = 4 Top = 24 Caption = 'Properties' object Label1: TLabel Left = 0 Top = 113 Width = 48 Height = 13 Caption = 'Language' end object Label2: TLabel Left = 0 Top = 161 Width = 31 Height = 13 Caption = 'Author' end object Label9: TLabel Left = 0 Top = 16 Width = 23 Height = 13 Caption = 'Artist' end object Label10: TLabel Left = 0 Top = 64 Width = 20 Height = 13 Caption = 'Title' end object ComboLanguage: TComboBox Left = 0 Top = 129 Width = 129 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( 'Deutsch' 'English' 'French' 'Hebrew' 'Hungarian' 'Norwegian' 'Spanish' 'Swedish') Sorted = True TabOrder = 2 OnChange = ComboLanguageChange end object EditAuthor: TEdit Left = 0 Top = 177 Width = 129 Height = 21 TabOrder = 3 Text = 'You !' OnChange = EditAuthorChange end object EditTitle: TEdit Left = 0 Top = 80 Width = 129 Height = 21 TabOrder = 1 Text = 'Title of the song here' OnChange = EditTitleChange end object EditArtist: TEdit Left = 0 Top = 32 Width = 129 Height = 21 TabOrder = 0 Text = 'Artist name here' OnChange = EditArtistChange end object CheckBoxArtist: TCheckBox Left = 131 Top = 33 Width = 97 Height = 17 State = cbChecked TabOrder = 4 OnClick = CheckBoxArtistClick end object CheckBoxTitle: TCheckBox Left = 131 Top = 81 Width = 97 Height = 17 Caption = 'CheckBoxTitle' State = cbChecked TabOrder = 5 OnClick = CheckBoxTitleClick end object CheckBoxLanguage: TCheckBox Left = 131 Top = 130 Width = 97 Height = 17 Caption = 'CheckBoxLanguage' State = cbChecked TabOrder = 6 OnClick = CheckBoxLanguageClick end object CheckBoxAuthor: TCheckBox Left = 131 Top = 178 Width = 97 Height = 17 Caption = 'CheckBoxAuthor' State = cbChecked TabOrder = 7 OnClick = CheckBoxAuthorClick end end object TTabPage Left = 4 Top = 24 Caption = 'About' object Image1: TImage Left = 22 Top = 24 Width = 100 Height = 100 AutoSize = True Picture.Data = {} end object Label3: TLabel Left = 36 Top = 136 Width = 73 Height = 20 Caption = 'SingedIT' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 6 Top = 181 Width = 132 Height = 13 Caption = 'Copyright 1998 IT! Software' end object Label5: TLabel Left = 12 Top = 4 Width = 120 Height = 13 Cursor = crHandPoint Caption = 'www.altern.org/analogue' Font.Charset = DEFAULT_CHARSET Font.Color = clPurple Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False OnClick = Label5Click end object Label6: TLabel Left = 67 Top = 197 Width = 11 Height = 13 Caption = 'by' end object Label7: TLabel Left = 37 Top = 213 Width = 70 Height = 16 Caption = 'aNa|0Gue' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 55 Top = 158 Width = 33 Height = 13 Caption = 'v0.2g' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object ButtonCredits: TButton Left = 32 Top = 248 Width = 75 Height = 25 Caption = 'Credits' TabOrder = 0 TabStop = False OnClick = ButtonCreditsClick end object ButtonConfig: TButton Left = 32 Top = 304 Width = 75 Height = 25 Caption = 'Configure' TabOrder = 1 OnClick = ButtonConfigClick end end end object ListBoxText: TListBox Left = 152 Top = 0 Width = 440 Height = 373 Align = alClient ItemHeight = 13 TabOrder = 2 OnKeyDown = ListBoxTextKeyDown end object MemoText: TMemo Left = 152 Top = 0 Width = 440 Height = 373 Align = alClient ScrollBars = ssBoth TabOrder = 0 Visible = False WordWrap = False OnChange = MemoTextChange end object OpenDialog1: TOpenDialog DefaultExt = 'lrc' Filter = 'Lyrics (*.LRC)|*.LRC|Text Files (*.TXT)|*.TXT|All Files|*.*' Left = 464 Top = 320 end object SaveDialog1: TSaveDialog DefaultExt = 'lrc' Filter = 'Lyrics (*.LRC)|*.LRC|Text Files (*.TXT)|*.TXT|All Files|*.*' Left = 536 Top = 320 end object MPEGPlayer1: TMPEGPlayer Seekable = True FromStream = False PlayerPriority = Normal UseTimer = True TimerFreq = 100 AutoPlay = False OutputDevice = wavemapper WaveDeviceNum = 0 StartPos = 0 EndPos = 0 OnPosUpdate = MPEGPlayer1PosUpdate OnPlayEnd = MPEGPlayer1PlayEnd Left = 320 Top = 320 end object OpenDialog2: TOpenDialog DefaultExt = 'mp3' Filter = 'MP3 File|*.MP3|MP2 File|*.MP2|All Files|*.*' Left = 392 Top = 320 end object FontDialog1: TFontDialog Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Left = 248 Top = 320 end end