[Apophysis-cvs-commits] 2.10/Source Render.pas,1.15,1.16

[Peter S. <zu...@us...>]

Update of /cvsroot/apophysis/2.10/Source
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv12065

Modified Files:
	Render.pas 
Log Message:


Index: Render.pas
===================================================================
RCS file: /cvsroot/apophysis/2.10/Source/Render.pas,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -d -r1.15 -r1.16
*** Render.pas	8 Sep 2008 11:25:19 -0000	1.15
--- Render.pas	6 Oct 2008 10:16:50 -0000	1.16
***************
*** 122,126 ****
  
      property OnProgress: TOnProgress
!         read FOnProgress
         write FOnProgress;
      property MaxMem : integer
--- 122,126 ----
  
      property OnProgress: TOnProgress
! //      read FOnProgress
         write FOnProgress;
      property MaxMem : integer
***************
*** 342,346 ****
    if FStop > 0 then begin
      assert(false);
!     FImageMaker.OnProgress := OnProgress;
      FImageMaker.CreateImage;
    end;
--- 342,346 ----
    if FStop > 0 then begin
      assert(false);
!     FImageMaker.OnProgress := FOnProgress;
      FImageMaker.CreateImage;
    end;
***************
*** 374,378 ****
    FImageMaker.Init;
  
!   FImageMaker.OnProgress := OnProgress;
    FImageMaker.CreateImage;
  end;
--- 374,378 ----
    FImageMaker.Init;
  
!   FImageMaker.OnProgress := FOnProgress;
    FImageMaker.CreateImage;
  end;
***************
*** 383,387 ****
    if FStop > 0 then begin
      TimeTrace(Format('Creating image with quality = %f', [fcp.actual_density]));
!     FImageMaker.OnProgress := OnProgress;
      FImageMaker.CreateImage;
    end;
--- 383,387 ----
    if FStop > 0 then begin
      TimeTrace(Format('Creating image with quality = %f', [fcp.actual_density]));
!     FImageMaker.OnProgress := FOnProgress;
      FImageMaker.CreateImage;
    end;
***************
*** 579,583 ****
        TimeTrace(Format('Creating image with quality = %f', [fcp.actual_density]));
  
!     FImageMaker.OnProgress := OnProgress;
      FImageMaker.CreateImage;
    end;
--- 579,583 ----
        TimeTrace(Format('Creating image with quality = %f', [fcp.actual_density]));
  
!     FImageMaker.OnProgress := FOnProgress;
      FImageMaker.CreateImage;
    end;
***************
*** 662,666 ****
      if FStop = 0 then begin
        TimeTrace('Creating image');
!       FImageMaker.OnProgress := OnProgress;
        FImageMaker.CreateImage(Slice * fcp.height);
      end;
--- 662,666 ----
      if FStop = 0 then begin
        TimeTrace('Creating image');
!       FImageMaker.OnProgress := FOnProgress;
        FImageMaker.CreateImage(Slice * fcp.height);
      end;