From d6a4a9f6518549cb33823123078e5e4d740997ca Mon Sep 17 00:00:00 2001 From: zeljko Date: Thu, 25 Mar 2010 10:37:23 +0000 Subject: [PATCH] Gtk: fixed bug in TGtkWSCustomNotebook.GetTabIndexAtPos(), it should check if tabwidget is mapped.fixes #15472 git-svn-id: trunk@24209 - --- lcl/interfaces/gtk/gtkwsextctrls.pp | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/lcl/interfaces/gtk/gtkwsextctrls.pp b/lcl/interfaces/gtk/gtkwsextctrls.pp index 7f304377a7..4fd90631c2 100644 --- a/lcl/interfaces/gtk/gtkwsextctrls.pp +++ b/lcl/interfaces/gtk/gtkwsextctrls.pp @@ -606,11 +606,14 @@ begin {$ENDIF} // go through all tabs Count:=g_list_length(NoteBookWidget^.Children); - for i:=0 to Count-1 do begin + for i:=0 to Count-1 do + begin PageWidget:=gtk_notebook_get_nth_page(NoteBookWidget,i); - if PageWidget<>nil then begin + if PageWidget<>nil then + begin TabWidget:=gtk_notebook_get_tab_label(NoteBookWidget, PageWidget); - if TabWidget<>nil then begin + if (TabWidget<>nil) and GTK_WIDGET_MAPPED(TabWidget) then + begin // test if position is in tabwidget if (TabWidget^.Allocation.X<=NoteBookPos.X) and (TabWidget^.Allocation.Y<=NoteBookPos.Y)