program kMIDIPlayer;

{$DEFINE MULTI_LANGUAGE}

uses
  gnugettext,
  Graphics,
  Forms,
  SyncLyricsAdjust in 'SyncLyricsAdjust.pas' {LyricsAdjustForm},
  ShowMIDILyrics in 'ShowMIDILyrics.pas' {ShowLyricsForm},
  MIDITest in 'MIDITest.pas' {MainForm},
  TempoControl in 'TempoControl.pas' {TempoControlForm},
  SetSyncTime in 'SetSyncTime.pas' {SetSyncShiftTimeForm},
  ViewChannel in 'ViewChannel.pas' {ViewChannelForm};

{$R *.res}

begin
 // This is the list of ignores for this project. The list of
 // ignores has to come before the first call to TranslateComponent().
 {$IFDEF MULTI_LANGUAGE}
  TP_GlobalIgnoreClass(TFont);
 {$ENDIF}
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TLyricsAdjustForm, LyricsAdjustForm);
  Application.CreateForm(TShowLyricsForm, ShowLyricsForm);
  Application.CreateForm(TTempoControlForm, TempoControlForm);
  Application.CreateForm(TSetSyncShiftTimeForm, SetSyncShiftTimeForm);
  Application.CreateForm(TViewChannelForm, ViewChannelForm);
  Application.Run;
end.