From 810e39aa71063540cf59e04a5a0f8266a564c50b Mon Sep 17 00:00:00 2001
From: micha <micha@lazarus-ide.org>
Date: Thu, 16 Sep 2004 14:52:20 +0000
Subject: [PATCH] need to call method of a class

git-svn-id: trunk@6016 -
---
 lcl/include/customlistbox.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/include/customlistbox.inc b/lcl/include/customlistbox.inc
index d01a6f2787..fab7add84d 100644
--- a/lcl/include/customlistbox.inc
+++ b/lcl/include/customlistbox.inc
@@ -217,7 +217,7 @@ procedure TCustomListBox.SendItemSelected(Index: integer; IsSelected: boolean);
 begin
   if HandleAllocated then begin
     LockSelectionChange;
-    TWSCustomListBox(WidgetSetClass).SelectItem(Self, Index, IsSelected);
+    TWSCustomListBoxClass(WidgetSetClass).SelectItem(Self, Index, IsSelected);
     UnlockSelectionChange;
   end;
 end;