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

Qt,Qt5,Qt6: fixed focus indication. issue #41562

Browse Source 
(cherry picked from commit 33c532e60e)

Co-authored-by: zeljan1 <zeljko@holobit.hr>
This commit is contained in:
Željan Rikalo 2025-04-03 18:10:40 +02:00 committed by Željan Rikalo
parent e90c1c6516
commit 6e9f268657
3 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -5008,7 +5008,7 @@ end;
procedure TQtWidget.setFocus;
begin
if getFocusPolicy <> QtNoFocus then
QWidget_setFocus(Widget, QtOtherFocusReason) {issue #10155}
QWidget_setFocus(Widget, QtTabFocusReason) {issue #10155}
else
QWidget_setFocus(Widget);
end;

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

@ -5164,7 +5164,7 @@ end;
procedure TQtWidget.setFocus;
begin
if getFocusPolicy <> QtNoFocus then
QWidget_setFocus(Widget, QtOtherFocusReason) {issue #10155}
QWidget_setFocus(Widget, QtTabFocusReason) {issue #10155}
else
QWidget_setFocus(Widget);
end;

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

@ -5168,7 +5168,7 @@ end;
procedure TQtWidget.setFocus;
begin
if getFocusPolicy <> QtNoFocus then
QWidget_setFocus(Widget, QtOtherFocusReason) {issue #10155}
QWidget_setFocus(Widget, QtTabFocusReason) {issue #10155}
else
QWidget_setFocus(Widget);
end;