From 65f64330757cd2158fca1109e3e7c1e9080942ed Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Thu, 19 Aug 2010 23:52:34 +0000
Subject: [PATCH] SynEdit: debug for caret

git-svn-id: trunk@27152 -
---
 components/synedit/syneditpointclasses.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/components/synedit/syneditpointclasses.pas b/components/synedit/syneditpointclasses.pas
index 240c78c581..0ad5e0fdfb 100644
--- a/components/synedit/syneditpointclasses.pas
+++ b/components/synedit/syneditpointclasses.pas
@@ -1778,6 +1778,7 @@ begin
   if (not FCurrentCreated) or (FCurrentClippedWidth <> w) then begin
     {$IFDeF SynCaretDebug}
     debugln(['SynEditCaret CreateCaret for handle=',FHandle, ' DebugShowCount=', FDebugShowCount, ' Width=', w, ' pref-width=', FPixelWidth, ' Height=', FPixelHeight, '  FCurrentCreated=',FCurrentCreated,  ' FCurrentVisible=',FCurrentVisible]);
+    FDebugShowCount := 0;
     {$ENDIF}
     //if FCurrentCreated then
     //  LCLIntf.DestroyCaret(FHandle);