Permalink
Browse files

Issue #57: Prevent more SynEdit paint exceptions if connection was ki…

…lled outside.
  • Loading branch information...
ansgarbecker committed Jan 19, 2019
1 parent b3c676d commit 09ea93639cd62cf0650e126f62873839cc7f768e
Showing with 1 addition and 0 deletions.
  1. +1 −0 source/main.pas
@@ -2682,6 +2682,7 @@ procedure TMainForm.actExecuteQueryExecute(Sender: TObject);

// Start the execution thread
Screen.Cursor := crAppStart;
ActiveConnection.Ping(True); // Prevents SynEdit paint exceptions if connection was killed outside
Tab.QueryRunning := True;
Tab.ExecutionThread := TQueryThread.Create(ActiveConnection, Batch, Tab.Number);
end;

0 comments on commit 09ea936

Please sign in to comment.