view hv.cpp @ 0:a6a46af64546

first upload

/*
    Harmonic Visualiser

    An audio file viewer and editor.
    Centre for Digital Music, Queen Mary, University of London.
    This file copyright 2011 Wen Xue.

    This program is free software; you can redistribute it and/or
    modify it under the terms of the GNU General Public License as
    published by the Free Software Foundation; either version 2 of the
    License, or (at your option) any later version. 
*/
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("BackUpTool.cpp", BackupForm1);
USEFORM("EditorPanelUnit.cpp", EditorPanel);
USEFORM("EventBoxUnit.cpp", EventBox);
USEFORM("RecordingUnit.cpp", RecordingForm);
USEFORM("SFDemoUnit.cpp", SFDemoForm);
USEFORM("Unit1.cpp", Form1);
USEFORM("UnitRangeEdit.cpp", RangeEdit);
USEFORM("VibratoDemoUnit.cpp", VibratoDemoForm);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
  try
  {
    Application->Initialize();
    Application->CreateForm(__classid(TForm1), &Form1);
    Application->CreateForm(__classid(TBackupForm1), &BackupForm1);
    Application->CreateForm(__classid(TEditorPanel), &EditorPanel);
    Application->CreateForm(__classid(TEventBox), &EventBox);
    Application->CreateForm(__classid(TRecordingForm), &RecordingForm);
    Application->CreateForm(__classid(TSFDemoForm), &SFDemoForm);
    Application->CreateForm(__classid(TRangeEdit), &RangeEdit);
    Application->CreateForm(__classid(TVibratoDemoForm), &VibratoDemoForm);
    Application->Run();
  }
  catch (Exception &exception)
  {
    Application->ShowException(&exception);
  }
  catch (...)
  {
    try
    {
       throw Exception("");
    }
    catch (Exception &exception)
    {
       Application->ShowException(&exception);
    }
  }
  return 0;
}
//---------------------------------------------------------------------------