paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-25 19:29:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

qt: probably fix tab change by mouse click in TPageControl

Browse Source 
git-svn-id: trunk@12142 -
This commit is contained in:
paul 2007-09-23 02:56:28 +00:00
parent 15362cf05c
commit 015e551c12
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/qt/qtwidgets.pas
View File

@ -4495,7 +4495,7 @@ end;
procedure TQtTabWidget.setFocusPolicy(const APolicy: QtFocusPolicy);
begin
inherited setFocusPolicy(APolicy);
QWidget_setFocusPolicy(TabBar, QtNoFocus{APolicy});
QWidget_setFocusPolicy(TabBar, QtClickFocus);
end;
{------------------------------------------------------------------------------