paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-17 21:49:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazDebuggerFp: Don't set breakpoints when the debug session is already over

Browse Source
This commit is contained in:
Martin 2024-01-19 15:42:26 +01:00
parent ec98b15709
commit fd792b5d6f
1 changed files with 2 additions and 1 deletions

3
components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
View File

@ -2123,7 +2123,8 @@ procedure TFPBreakpoint.DoChanged;
begin
if FResetBreakFlag and not FSetBreakFlag then
ResetBreak
else if FSetBreakFlag then
else
if FSetBreakFlag and not (TFpDebugDebugger(Debugger).State in [dsStop, dsError]) then
SetBreak;
FSetBreakFlag := false;