home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / borland / cb / setup / cbuilder / data.z / QBFDEMO.CPP < prev    next >
C/C++ Source or Header  |  1997-02-28  |  1KB  |  31 lines
  1. //----------------------------------------------------------------------------
  2. //Borland C++Builder
  3. //Copyright (c) 1987, 1997 Borland International Inc. All Rights Reserved.
  4. //----------------------------------------------------------------------------
  5. //---------------------------------------------------------------------------
  6. #include <vcl\vcl.h>
  7. #pragma hdrstop
  8. #include <except.h>  //for xmsg 
  9. #include <cstring.h> //for xmsg.why().c_str()
  10. //---------------------------------------------------------------------------
  11. USERES("Qbfdemo.res");
  12. USEFORM("QBFForm.cpp", QueryForm);
  13. USEFORM("Rsltform.cpp", ResultForm);
  14. //---------------------------------------------------------------------------
  15. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  16. {
  17.   try{
  18.     Application->Initialize();
  19.     Application->CreateForm(__classid(TQueryForm), &QueryForm);
  20.     Application->Run();
  21.   }
  22.   catch(Exception& e){
  23.     ShowMessage(e.Message);
  24.   }
  25.   catch(xmsg& e){
  26.     ShowMessage(e.why().c_str());
  27.   }
  28.   return 0;
  29. }
  30. //---------------------------------------------------------------------------
  31.