ImgView_Layers.cpp 1012 B

1234567891011121314151617181920212223242526
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4. USERES("ImgView_Layers.res");
  5. USEFORMNS("MainUnit.pas", Mainunit, MainForm);
  6. USEFORMNS("NewImageUnit.pas", Newimageunit, NewImageForm);
  7. USEFORMNS("RGBALoaderUnit.pas", Rgbaloaderunit, RGBALoaderForm);
  8. //---------------------------------------------------------------------------
  9. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  10. {
  11. try
  12. {
  13. Application->Initialize();
  14. Application->CreateForm(__classid(TMainForm), &MainForm);
  15. Application->CreateForm(__classid(TNewImageForm), &NewImageForm);
  16. Application->CreateForm(__classid(TRGBALoaderForm), &RGBALoaderForm);
  17. Application->Run();
  18. }
  19. catch (Exception &exception)
  20. {
  21. Application->ShowException(&exception);
  22. }
  23. return 0;
  24. }
  25. //---------------------------------------------------------------------------