paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 14:09:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

Qt: fixed focus policy of TQtTabWidget. issue #23238

Browse Source 
git-svn-id: trunk@42455 -
This commit is contained in:
zeljko 2013-08-23 09:24:07 +00:00
parent f300bc6edc
commit c61ea17038
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1958,6 +1958,9 @@ begin
begin
if csNoFocus in LCLObject.ControlStyle then
setFocusPolicy(QtNoFocus)
else
if (Self is TQtTabWidget) then
setFocusPolicy(QtTabFocus)
else
setFocusPolicy(QtClickFocus);
end;