fpspreadsheet: Better position for "inherited" in TsCellEdit.EditingDone (reverting previous commit).

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7575 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2020-07-27 16:21:50 +00:00 · 2020-07-27 16:21:50 +00:00 · 370c5ad6c0
commit 370c5ad6c0
parent 6a91dfcf02
1 changed files with 2 additions and 2 deletions
--- a/components/fpspreadsheet/source/visual/fpspreadsheetctrls.pas
+++ b/components/fpspreadsheet/source/visual/fpspreadsheetctrls.pas
@ -2297,8 +2297,6 @@ procedure TsCellEdit.EditingDone;
 var
  s: String;
 begin
-  inherited;
-
  if (Worksheet = nil) then
    exit;

@ -2308,6 +2306,8 @@ begin
  end;

  WriteToCell;
+
+  inherited;
 end;

 {@@ ----------------------------------------------------------------------------