mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-22 12:39:29 +02:00
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:
parent
2c75806565
commit
136fc6f86a
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user