From b349099ea1efd1ff3be8f65a3094d9c1c2ad1b37 Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 17 Aug 2002 23:41:28 +0000 Subject: [PATCH] default fpc src dirs and clean ups git-svn-id: trunk@2554 - --- lcl/include/speedbutton.inc | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lcl/include/speedbutton.inc b/lcl/include/speedbutton.inc index 20f6b0d3b4..b0779aa8a4 100644 --- a/lcl/include/speedbutton.inc +++ b/lcl/include/speedbutton.inc @@ -681,7 +681,6 @@ end; ------------------------------------------------------------------------------} procedure TSpeedButton.CMMouseLeave(var Message :TLMessage); begin -writeln('TSpeedButton.CMMouseLeave A ',FMouseInControl,' ',Enabled,' ',FDragging); inherited CMMouseLeave(Message); if csDesigning in ComponentState then exit; @@ -705,6 +704,9 @@ end; { ============================================================================= $Log$ + Revision 1.34 2003/02/06 20:46:51 mattias + default fpc src dirs and clean ups + Revision 1.33 2003/02/06 06:33:57 mattias fixed message