LCL, grids, fix editor not focused if it's visible and grid is being focused, from Éderson Cássio, issue #24194

git-svn-id: trunk@40780 -
This commit is contained in:
jesus 2013-04-10 06:16:28 +00:00
parent 49ae53840a
commit d6a1f48258
2 changed files with 7 additions and 1 deletions

View File

@ -10,6 +10,7 @@ Antônio Galvão
Bogusław Brandys
Daniel Simões de Almeida
Diogo Piçarra
Éderson Cássio
Flávio Etrusco
Jörg Braun
Juan Salvador Pérez García

View File

@ -8801,7 +8801,12 @@ begin
end;
end;
end;
inherited SetFocus;
if (Editor <> nil) and (Editor.Visible) then
Editor.SetFocus
else
inherited SetFocus;
{$IFDEF dbgGrid}
DebugLnExit('TCustomGrid.SetFocus END');
{$ENDIF}