1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-06-26 17:10:38 +00:00

Adds Copy button to call stack log dialog.

This commit is contained in:
FellippeHeitor 2021-07-31 19:47:12 -03:00
parent 304a33f404
commit 5e4c3baa4b

View file

@ -7816,7 +7816,7 @@ FUNCTION idecallstackbox
i = i + 1
o(i).typ = 3
o(i).y = dialogHeight
o(i).txt = idenewtxt("#Close")
o(i).txt = idenewtxt("#Close" + sep + "Co#py")
o(i).dft = 1
@ -7902,6 +7902,9 @@ FUNCTION idecallstackbox
EXIT FUNCTION
END IF
IF K$ = CHR$(13) OR (focus = 3 AND info <> 0) OR (UCASE$(K$) = "C" AND KCTRL <> 0) THEN
_CLIPBOARD$ = StrReplace$(callstacklist$, sep, CHR$(10))
END IF
'end of custom controls
mousedown = 0