mail.cpp

来自「关于书籍《Borland c++Builder工程实践》的源代码」· C++ 代码 · 共 26 行

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
USEFORM("MainForm.cpp", MainForm);
USEFORM("SendForm.cpp", SendForm);
USEFORM("SettingForm.cpp", SettingForm);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
    try
    {
         Application->Initialize();
         Application->CreateForm(__classid(TMainForm), &MainForm);
         Application->CreateForm(__classid(TSendForm), &SendForm);
         Application->CreateForm(__classid(TSettingForm), &SettingForm);
         Application->Run();
    }
    catch (Exception &exception)
    {
         Application->ShowException(&exception);
    }
    return 0;
}
//---------------------------------------------------------------------------