home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / borland / cb / setup / cbuilder / data.z / CLASSBRW.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1997-02-28  |  1.7 KB  |  43 lines
  1. //---------------------------------------------------------------------------
  2. // Borland C++Builder
  3. // Copyright (c) 1987, 1997 Borland International Inc.  All Rights Reserved.
  4. //---------------------------------------------------------------------------
  5. // Classbrw.cpp
  6. //
  7. // VCL Class Browser
  8. //---------------------------------------------------------------------------
  9. //---------------------------------------------------------------------------
  10. #include <vcl\vcl.h>
  11. #pragma hdrstop
  12. #include "splash.h"
  13. //---------------------------------------------------------------------------
  14. USERES("Classbrw.res");
  15. USEUNIT("Btsclass.pas");
  16. USEUNIT("Btsconst.pas");
  17. USEFORMNS("Clssdlph.pas", Clssdlph, MainDlg);
  18. USEFORMNS("Codepage.pas", Codepage, CodePageForm);
  19. USEUNIT("Intexpt.pas");
  20. USEUNIT("Mifiles.pas");
  21. USEFORMNS("Parshead.pas", Parshead, ParseHeaders);
  22. USEFORMNS("Rebuild.pas", Rebuild, TabRebuildStats);
  23. USEFORMNS("About.pas", About, AboutBox);
  24. USEFORM("splash.cpp", SplashScreen);
  25. //---------------------------------------------------------------------------
  26. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  27. {
  28.     Application->Initialize();
  29.     SplashScreen=new TSplashScreen(Application);
  30.     SplashScreen->Position=poScreenCenter;
  31.     SplashScreen->Show();
  32.     Application->ProcessMessages();
  33.     Application->CreateForm(__classid(TMainDlg), &MainDlg);
  34.     SplashScreen->Hide();
  35.     delete SplashScreen;
  36.     Application->CreateForm(__classid(TCodePageForm), &CodePageForm);
  37.     Application->CreateForm(__classid(TSplashScreen), &SplashScreen);
  38.     Application->Run();
  39.  
  40.     return 0;
  41. }
  42. //---------------------------------------------------------------------------
  43.