mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-01 12:40:36 +00:00
Adds Copy button to call stack log dialog.
This commit is contained in:
parent
304a33f404
commit
5e4c3baa4b
|
@ -7816,7 +7816,7 @@ FUNCTION idecallstackbox
|
||||||
i = i + 1
|
i = i + 1
|
||||||
o(i).typ = 3
|
o(i).typ = 3
|
||||||
o(i).y = dialogHeight
|
o(i).y = dialogHeight
|
||||||
o(i).txt = idenewtxt("#Close")
|
o(i).txt = idenewtxt("#Close" + sep + "Co#py")
|
||||||
o(i).dft = 1
|
o(i).dft = 1
|
||||||
|
|
||||||
|
|
||||||
|
@ -7902,6 +7902,9 @@ FUNCTION idecallstackbox
|
||||||
EXIT FUNCTION
|
EXIT FUNCTION
|
||||||
END IF
|
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
|
'end of custom controls
|
||||||
mousedown = 0
|
mousedown = 0
|
||||||
|
|
Loading…
Reference in a new issue