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

Debugger: "Copy callstack" do not clear clipboard to early. Issue #39880

Browse Source
This commit is contained in:
Martin 2022-09-05 21:01:46 +02:00
parent 715d70dc38
commit f4e3f0e7e7
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
debugger/callstackdlg.pp
View File

@ -513,10 +513,11 @@ var
Entry: TIdeCallStackEntry;
S: String;
begin
if (GetSelectedCallstack=nil) or (GetSelectedCallstack.Count=0) then
exit;
Clipboard.Clear;
if (GetSelectedCallstack=nil) or (GetSelectedCallstack.Count=0) then exit;
S := '';
// GetSelectedCallstack.PrepareRange();
for n:= 0 to GetSelectedCallstack.Count-1 do