1234567891011121314151617181920212223242526272829303132333435 |
- //---------------------------------------------------------------------------
- #include <vcl.h>
- #pragma hdrstop
- #include <tchar.h>
- //---------------------------------------------------------------------------
- USEFORM("FrmMainF.cpp", Form1);
- //---------------------------------------------------------------------------
- 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;
- }
- //---------------------------------------------------------------------------
|