Subversion Repositories DevTools

Rev

Rev 2263 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2263 Rev 2265
Line 3... Line 3...
3 
#include <vcl.h>
 3 
#include <vcl.h>
4 
#pragma hdrstop
 4 
#pragma hdrstop
5 
//---------------------------------------------------------------------------
 5 
//---------------------------------------------------------------------------
6 
USEFORM("DataModule.cpp", Data_Module); /* TDataModule: File Type */
 6 
USEFORM("DataModule.cpp", Data_Module); /* TDataModule: File Type */
7 
USEFORM("GenerationProperties.cpp", GenerationPropertiesForm);
 7 
USEFORM("GenerationProperties.cpp", GenerationPropertiesForm);
8 
USEFORM("ImportTransactionParameters.cpp", ImportTransactionParametersForm);
 - 
 
9 
USEFORM("InitProgress.cpp", InitValuesProgressForm);
 8 
USEFORM("InitProgress.cpp", InitValuesProgressForm);
10 
USEFORM("Login.cpp", LoginForm);
 9 
USEFORM("Login.cpp", LoginForm);
11 
USEFORM("Main.cpp", MainForm);
 10 
USEFORM("Main.cpp", MainForm);
12 
USEFORM("ParameterScope.cpp", ParameterScopeForm);
 11 
USEFORM("ParameterScope.cpp", ParameterScopeForm);
13 
USEFORM("ScenarioParameters.cpp", ScenarioParamsForm);
 12 
USEFORM("ScenarioParameters.cpp", ScenarioParamsForm);
14 
USEFORM("TestScenarioProperties.cpp", TestScenarioPropertiesForm);
 13 
USEFORM("TestScenarioProperties.cpp", TestScenarioPropertiesForm);
15 
USEFORM("TransactionConfig.cpp", TxnConfig);
 14 
USEFORM("TransactionConfig.cpp", TxnConfig);
16 
USEFORM("UdTransferHistory.cpp", UdTransferHistoryForm);
 - 
 
17 
USEFORM("UdTransfer.cpp", UdTransferForm);
 15 
USEFORM("About.cpp", AboutForm);
18 
//---------------------------------------------------------------------------
 16 
//---------------------------------------------------------------------------
19 
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
 17 
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
20 
{
 18 
{
21 
	try
 19 
	try
22 
	{
 20 
	{
Line 29... Line 27...
29 
                 Application->CreateForm(__classid(TScenarioParamsForm), &ScenarioParamsForm);
 27 
                 Application->CreateForm(__classid(TScenarioParamsForm), &ScenarioParamsForm);
30 
                 Application->CreateForm(__classid(TParameterScopeForm), &ParameterScopeForm);
 28 
                 Application->CreateForm(__classid(TParameterScopeForm), &ParameterScopeForm);
31 
                 Application->CreateForm(__classid(TInitValuesProgressForm), &InitValuesProgressForm);
 29 
                 Application->CreateForm(__classid(TInitValuesProgressForm), &InitValuesProgressForm);
32 
                 Application->CreateForm(__classid(TTestScenarioPropertiesForm), &TestScenarioPropertiesForm);
 30 
                 Application->CreateForm(__classid(TTestScenarioPropertiesForm), &TestScenarioPropertiesForm);
33 
                 Application->CreateForm(__classid(TGenerationPropertiesForm), &GenerationPropertiesForm);
 31 
                 Application->CreateForm(__classid(TGenerationPropertiesForm), &GenerationPropertiesForm);
34 
                 Application->CreateForm(__classid(TImportTransactionParametersForm), &ImportTransactionParametersForm);
 - 
 
35 
                 Application->CreateForm(__classid(TUdTransferHistoryForm), &UdTransferHistoryForm);
 - 
 
36 
                 Application->CreateForm(__classid(TUdTransferForm), &UdTransferForm);
 32 
                 Application->CreateForm(__classid(TAboutForm), &AboutForm);
37 
                 Application->Run();
 33 
                 Application->Run();
38 
	}
 34 
	}
39 
	catch (Exception &exception)
 35 
	catch (Exception &exception)
40 
	{
 36 
	{
41 
		Application->ShowException(&exception);
 37 
		Application->ShowException(&exception);