fMandelC.cpp 982 B

123456789101112131415161718192021222324252627
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4. #include "fMandelC.h"
  5. //---------------------------------------------------------------------------
  6. #pragma package(smart_init)
  7. #pragma link "GR32_ExtImage"
  8. #pragma link "GR32_Image"
  9. #pragma resource "*.dfm"
  10. TFormMandelC *FormMandelC;
  11. //---------------------------------------------------------------------------
  12. __fastcall TFormMandelC::TFormMandelC(TComponent* Owner)
  13. : TForm(Owner)
  14. {
  15. }
  16. //---------------------------------------------------------------------------
  17. void __fastcall TFormMandelC::FormCreate(TObject *Sender)
  18. {
  19. MandelSampler = TMandelbrotSampler->Create(Img);
  20. AdaptiveSampler = TAdaptiveSuperSampler->Create(MandelSampler);
  21. SuperSampler = TSuperSampler->Create(MandelSampler);
  22. JitteredSampler = TPatternSampler->Create(MandelSampler);
  23. Sampler = MandelSampler();
  24. }
  25. //---------------------------------------------------------------------------