LCL, fix dbgrid editor position on new record if dgAlwaysShowEditor option is on, issue #17241

git-svn-id: trunk@27172 -
This commit is contained in:
jesus 2010-08-23 17:32:16 +00:00
parent 2c75806565
commit 136fc6f86a

View File

@ -732,7 +732,7 @@ begin
UpdateActive;
if not (gsStartEditing in FGridStatus) then begin
SelectEditor;
if (dgAlwaysShowEditor in Options) then
if (dgAlwaysShowEditor in Options) and not EditorMode then
EditorMode := true;
end;
{$Ifdef dbgDBGrid}
@ -2841,7 +2841,7 @@ begin
UpdateGridColumnSizes;
if FDatalink.Active and (FDatalink.ActiveRecord>=0) then
SetColRow(Col, FixedRows + FDatalink.ActiveRecord);
AdjustEditorBounds(Col, FixedRows + FDatalink.ActiveRecord);
end;
finally
EndUpdate;