mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-01 23:00:27 +02:00
parent
3870f0df36
commit
a08869b964
@ -4389,8 +4389,8 @@ begin
|
|||||||
{$IFDEF UNIX}
|
{$IFDEF UNIX}
|
||||||
if (Result <> 0) and (Result <> hWnd) and not
|
if (Result <> 0) and (Result <> hWnd) and not
|
||||||
((TQtWidget(Hwnd) is TQtMainWindow) or
|
((TQtWidget(Hwnd) is TQtMainWindow) or
|
||||||
(TQtWidget(Result) is TQtMainWindow) and
|
(TQtWidget(Result) is TQtMainWindow)) and
|
||||||
Supports(TQtWidget(Result), IQtEdit, QtEdit))
|
Supports(TQtWidget(Result), IQtEdit, QtEdit)
|
||||||
then
|
then
|
||||||
QWidget_clearFocus(TQtWidget(Result).Widget);
|
QWidget_clearFocus(TQtWidget(Result).Widget);
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
Loading…
Reference in New Issue
Block a user