From 09ea93639cd62cf0650e126f62873839cc7f768e Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Sat, 19 Jan 2019 17:19:04 +0100 Subject: [PATCH] Issue #57: Prevent more SynEdit paint exceptions if connection was killed outside. --- source/main.pas | 1 + 1 file changed, 1 insertion(+) diff --git a/source/main.pas b/source/main.pas index 2da60312..c596a7bf 100644 --- a/source/main.pas +++ b/source/main.pas @@ -2682,6 +2682,7 @@ begin // 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;