From 7f1de98fae064e7c701cdd0134dac1041f8adadc Mon Sep 17 00:00:00 2001
From: micha <micha@lazarus-ide.org>
Date: Fri, 10 Sep 2004 11:20:44 +0000
Subject: [PATCH] remove LM_SETTEXT message as it is not used

git-svn-id: trunk@5955 -
---
 lcl/interfaces/gtk/gtkobject.inc     | 5 +++--
 lcl/interfaces/win32/win32object.inc | 5 +++--
 lcl/lmessages.pp                     | 5 +++--
 3 files changed, 9 insertions(+), 6 deletions(-)

diff --git a/lcl/interfaces/gtk/gtkobject.inc b/lcl/interfaces/gtk/gtkobject.inc
index 71bcc6be2d..06d83699ee 100644
--- a/lcl/interfaces/gtk/gtkobject.inc
+++ b/lcl/interfaces/gtk/gtkobject.inc
@@ -3156,8 +3156,6 @@ begin
       handle := hwnd(ObjectToGtkObject(Sender));
       Case LM_Message of
 
-      LM_SetText  : SetText(PgtkWidget(Handle), Data);
-
       LM_AddChild :
       begin
         {$IFDEF OldToolBar}
@@ -8931,6 +8929,9 @@ end;
  { =============================================================================
 
   $Log$
+  Revision 1.544  2004/09/10 11:20:44  micha
+  remove LM_SETTEXT message as it is not used
+
   Revision 1.543  2004/09/10 09:43:13  micha
   convert LM_SETLABEL message to interface methods
 
diff --git a/lcl/interfaces/win32/win32object.inc b/lcl/interfaces/win32/win32object.inc
index e87201b328..f227e82a12 100644
--- a/lcl/interfaces/win32/win32object.inc
+++ b/lcl/interfaces/win32/win32object.inc
@@ -349,8 +349,6 @@ Begin
           TWin32WSWinControl.SetText(Sender as TWinControl, S);
         end;
       End;
-      LM_SETTEXT:
-        SetText(Handle, Data);
       LM_ADDCHILD:
       Begin
         Assert(False, 'Trace:Adding a child to Parent');
@@ -2817,6 +2815,9 @@ End;
 
 {
   $Log$
+  Revision 1.237  2004/09/10 11:20:44  micha
+  remove LM_SETTEXT message as it is not used
+
   Revision 1.236  2004/09/10 09:43:13  micha
   convert LM_SETLABEL message to interface methods
 
diff --git a/lcl/lmessages.pp b/lcl/lmessages.pp
index 9c7c97dfac..22a03c8d96 100644
--- a/lcl/lmessages.pp
+++ b/lcl/lmessages.pp
@@ -59,7 +59,6 @@ const
   LM_RESIZECHILDREN = LM_ComUser+13;
   LM_AddPage        = LM_ComUser+15;
   LM_GetLineCount   = LM_ComUser+16;
-  LM_SETTEXT        = LM_ComUser+17;
   LM_GETTEXT        = LM_ComUser+18;
   LM_CANVASCREATE   = LM_ComUser+19;
   LM_ReDraw         = LM_ComUser+26;
@@ -871,7 +870,6 @@ begin
   LM_RESIZECHILDREN :Result:='LM_RESIZECHILDREN';
   LM_AddPage        :Result:='LM_AddPage';
   LM_GetLineCount   :Result:='LM_GetLineCount';
-  LM_SETTEXT        :Result:='LM_SETTEXT';
   LM_GETTEXT        :Result:='LM_GETTEXT';
   LM_CANVASCREATE   :Result:='LM_CANVASCREATE';
   LM_ReDraw         :Result:='LM_ReDraw';
@@ -1038,6 +1036,9 @@ end.
 
 {
   $Log$
+  Revision 1.78  2004/09/10 11:20:44  micha
+  remove LM_SETTEXT message as it is not used
+
   Revision 1.77  2004/09/10 09:43:12  micha
   convert LM_SETLABEL message to interface methods