From d0324f58e46ad9dcf1903f3528e62697a846a27f Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 22 Jul 2009 10:06:22 +0000
Subject: [PATCH] clean up

git-svn-id: trunk@20921 -
---
 designer/framedesigner.pas | 1 -
 1 file changed, 1 deletion(-)

diff --git a/designer/framedesigner.pas b/designer/framedesigner.pas
index fb5c2c8696..6f3678ce55 100644
--- a/designer/framedesigner.pas
+++ b/designer/framedesigner.pas
@@ -111,7 +111,6 @@ end;
 procedure TFrameDesignerForm.OnControlResize(Sender: TObject);
 var
   AControl: TControl;
-  a: TAnchorKind;
 begin
   if FResizing then Exit;
   AControl := TControl(LookupRoot);