Restore previous scroll position after saving routine, trigger, event or view. See https://www.heidisql.com/forum.php?t=40291

This commit is contained in:
Ansgar Becker
2023-01-26 09:57:42 +01:00
parent 4abc5c1b3d
commit f2cc5124d3
5 changed files with 20 additions and 1 deletions

View File

@ -114,6 +114,7 @@ begin
Mainform.SynCompletionProposal.AddEditor(SynMemoBody);
Parameters := TRoutineParamList.Create;
editName.MaxLength := NAME_LEN;
FMainSynMemo := SynMemoBody;
end;
@ -164,6 +165,7 @@ begin
lblDisabledWhy.Visible := Obj.Body = '';
PageControlMain.Enabled := not lblDisabledWhy.Visible;
SynMemoBody.Enabled := PageControlMain.Enabled;
SynMemoBody.TopLine := FMainSynMemoPreviousTopLine;
end else begin
editName.Text := '';
end;