|
xue@0
|
1 /*
|
|
xue@0
|
2 Harmonic Visualiser
|
|
xue@0
|
3
|
|
xue@0
|
4 An audio file viewer and editor.
|
|
xue@0
|
5 Centre for Digital Music, Queen Mary, University of London.
|
|
xue@0
|
6 This file copyright 2011 Wen Xue.
|
|
xue@0
|
7
|
|
xue@0
|
8 This program is free software; you can redistribute it and/or
|
|
xue@0
|
9 modify it under the terms of the GNU General Public License as
|
|
xue@0
|
10 published by the Free Software Foundation; either version 2 of the
|
|
xue@0
|
11 License, or (at your option) any later version.
|
|
xue@0
|
12 */
|
|
xue@0
|
13 //---------------------------------------------------------------------------
|
|
xue@0
|
14
|
|
xue@0
|
15 #include <vcl.h>
|
|
xue@0
|
16 #pragma hdrstop
|
|
xue@0
|
17 //---------------------------------------------------------------------------
|
|
xue@0
|
18 USEFORM("BackUpTool.cpp", BackupForm1);
|
|
xue@0
|
19 USEFORM("EditorPanelUnit.cpp", EditorPanel);
|
|
xue@0
|
20 USEFORM("EventBoxUnit.cpp", EventBox);
|
|
xue@0
|
21 USEFORM("RecordingUnit.cpp", RecordingForm);
|
|
xue@0
|
22 USEFORM("SFDemoUnit.cpp", SFDemoForm);
|
|
xue@0
|
23 USEFORM("Unit1.cpp", Form1);
|
|
xue@0
|
24 USEFORM("UnitRangeEdit.cpp", RangeEdit);
|
|
xue@0
|
25 USEFORM("VibratoDemoUnit.cpp", VibratoDemoForm);
|
|
xue@0
|
26 //---------------------------------------------------------------------------
|
|
xue@0
|
27 WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
|
|
xue@0
|
28 {
|
|
xue@0
|
29 try
|
|
xue@0
|
30 {
|
|
xue@0
|
31 Application->Initialize();
|
|
xue@0
|
32 Application->CreateForm(__classid(TForm1), &Form1);
|
|
xue@0
|
33 Application->CreateForm(__classid(TBackupForm1), &BackupForm1);
|
|
xue@0
|
34 Application->CreateForm(__classid(TEditorPanel), &EditorPanel);
|
|
xue@0
|
35 Application->CreateForm(__classid(TEventBox), &EventBox);
|
|
xue@0
|
36 Application->CreateForm(__classid(TRecordingForm), &RecordingForm);
|
|
xue@0
|
37 Application->CreateForm(__classid(TSFDemoForm), &SFDemoForm);
|
|
xue@0
|
38 Application->CreateForm(__classid(TRangeEdit), &RangeEdit);
|
|
xue@0
|
39 Application->CreateForm(__classid(TVibratoDemoForm), &VibratoDemoForm);
|
|
xue@0
|
40 Application->Run();
|
|
xue@0
|
41 }
|
|
xue@0
|
42 catch (Exception &exception)
|
|
xue@0
|
43 {
|
|
xue@0
|
44 Application->ShowException(&exception);
|
|
xue@0
|
45 }
|
|
xue@0
|
46 catch (...)
|
|
xue@0
|
47 {
|
|
xue@0
|
48 try
|
|
xue@0
|
49 {
|
|
xue@0
|
50 throw Exception("");
|
|
xue@0
|
51 }
|
|
xue@0
|
52 catch (Exception &exception)
|
|
xue@0
|
53 {
|
|
xue@0
|
54 Application->ShowException(&exception);
|
|
xue@0
|
55 }
|
|
xue@0
|
56 }
|
|
xue@0
|
57 return 0;
|
|
xue@0
|
58 }
|
|
xue@0
|
59 //---------------------------------------------------------------------------
|
