mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-19 23:49:36 +02:00
Qt: fixed crash when QComboBox is raised from eg. cell of TStringGrid with DblClick.
git-svn-id: trunk@29252 -
This commit is contained in:
parent
094d5909f8
commit
3f02a01956
@ -7885,6 +7885,20 @@ begin
|
||||
end;
|
||||
Result := inherited EventFilter(Sender, Event);
|
||||
end;
|
||||
|
||||
QEventMouseButtonDblClick:
|
||||
begin
|
||||
// avoid crash on unfocused combobox raised from
|
||||
// eg. TStringGrid as picklist.
|
||||
// crash happens when combo is hidden in cell, and then we
|
||||
// dbl click on position of combo button. Control raises combo
|
||||
// and propagate dbl click to combobox which must grab focus in
|
||||
// that case.
|
||||
if CanSendLCLMessage and getEnabled and not hasFocus then
|
||||
setFocus;
|
||||
Result := inherited EventFilter(Sender, Event);
|
||||
end;
|
||||
|
||||
QEventKeyPress:
|
||||
begin
|
||||
if (QKeyEvent_key(QKeyEventH(Event)) = QtKey_F4) or
|
||||
|
Loading…
Reference in New Issue
Block a user