Debugger: Workaround to fix exe-line-indicators (blue dots) at debug start

git-svn-id: trunk@38531 -
This commit is contained in:
martin 2012-09-05 17:00:19 +00:00
parent 1cc31824b0
commit 91d58f99ce

View File

@ -4558,6 +4558,7 @@ begin
FTheDebugger.FRunErrorBreak.SetByAddr(Self);
SetDebuggerState(dsInit); // triggers all breakpoints to be set.
Application.ProcessMessages; // workaround, allow source-editor to queue line info request (Async call)
if FTheDebugger.FBreakAtMain <> nil
then begin
CanContinue := False;