You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
35 lines
839 B
35 lines
839 B
//--------------------------------------------------------------------------- |
|
|
|
#include <vcl.h> |
|
#pragma hdrstop |
|
#include <tchar.h> |
|
//--------------------------------------------------------------------------- |
|
USEFORM("Unit1.cpp", Form1); |
|
//--------------------------------------------------------------------------- |
|
int WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int) |
|
{ |
|
try |
|
{ |
|
Application->Initialize(); |
|
Application->MainFormOnTaskBar = true; |
|
Application->CreateForm(__classid(TForm1), &Form1); |
|
Application->Run(); |
|
} |
|
catch (Exception &exception) |
|
{ |
|
Application->ShowException(&exception); |
|
} |
|
catch (...) |
|
{ |
|
try |
|
{ |
|
throw Exception(""); |
|
} |
|
catch (Exception &exception) |
|
{ |
|
Application->ShowException(&exception); |
|
} |
|
} |
|
return 0; |
|
} |
|
//---------------------------------------------------------------------------
|
|
|