From 3f991b1e83ee972373bab594da97aa2544c09d3f Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 6 Mar 2004 18:56:06 +0000
Subject: [PATCH] fixed clearing glyphs in designer

git-svn-id: trunk@5276 -
---
 ideintf/graphpropedits.pas | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/ideintf/graphpropedits.pas b/ideintf/graphpropedits.pas
index 3ceae0fd4a..924b628c95 100644
--- a/ideintf/graphpropedits.pas
+++ b/ideintf/graphpropedits.pas
@@ -494,11 +494,13 @@ begin
         if TheDialog.Modified then begin
           LoadBitmap;
           SetOrdValue(Longint(ABitmap));
-          Modified;
         end;
       end
-      else
-        ABitmap.FreeImage;
+      else begin
+        ABitmap.Width:=0;
+        ABitmap.Height:=0;
+      end;
+      Modified;
     end;
   finally
     TheDialog.Free;