diff --git a/2.10/Changes.txt b/2.10/Changes.txt
index 2e06ab3..0a15648 100644
--- a/2.10/Changes.txt
+++ b/2.10/Changes.txt
@@ -1,4 +1,5 @@
 2.02h
++ Disable screen saver when rendering to disk
 
 2.02g
 + Delphi2005 Project
diff --git a/2.10/Source/FormRender.dfm b/2.10/Source/FormRender.dfm
index 4e93f1d..402ef25 100644
--- a/2.10/Source/FormRender.dfm
+++ b/2.10/Source/FormRender.dfm
@@ -401,7 +401,7 @@ object RenderForm: TRenderForm
       Width = 327
       Height = 21
       Style = csDropDownList
-      ItemHeight = 0
+      ItemHeight = 13
       TabOrder = 0
       OnChange = cmbPresetChange
     end
diff --git a/2.10/Source/FormRender.pas b/2.10/Source/FormRender.pas
index 4a57f08..7769aa9 100644
--- a/2.10/Source/FormRender.pas
+++ b/2.10/Source/FormRender.pas
@@ -311,6 +311,9 @@ begin
   if Assigned(Renderer) then Renderer.WaitFor;
   if not Assigned(Renderer) then
   begin
+      // disable screensaver
+    SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, 0, nil, 0);
+
     cp.sample_density := Sample_density;
     cp.spatial_oversample := Oversample;
     cp.spatial_filter_radius := Filter_Radius;
@@ -327,6 +330,9 @@ begin
     Renderer.SetCP(cp);
     Renderer.Priority := tpLower;
     Renderer.Resume;
+
+    // enable screensaver
+    SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, 1, nil, 0);
   end;
 end;