-
Notifications
You must be signed in to change notification settings - Fork 0
/
mainProj.cpp
37 lines (37 loc) · 1.58 KB
/
mainProj.cpp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("mainProj.res");
USEFORM("main.cpp", mainForm);
USEFORM("parameters.cpp", paramForm);
USEFORM("graph.cpp", graphForm);
USEFORM("xuap.cpp", xuapForm);
USEFORM("traj.cpp", trajForm);
USEFORM("struct.cpp", structForm);
USEFORM("accuracy.cpp", accuracyForm);
USEFORM("structRepr.cpp", structReprForm);
USEFORM("kriging.cpp", krigingForm);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TmainForm), &mainForm);
Application->CreateForm(__classid(TparamForm), ¶mForm);
Application->CreateForm(__classid(TgraphForm), &graphForm);
Application->CreateForm(__classid(TxuapForm), &xuapForm);
Application->CreateForm(__classid(TtrajForm), &trajForm);
Application->CreateForm(__classid(TstructForm), &structForm);
Application->CreateForm(__classid(TaccuracyForm), &accuracyForm);
Application->CreateForm(__classid(TstructReprForm), &structReprForm);
Application->CreateForm(__classid(TkrigingForm), &krigingForm);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------