1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-05-03 20:50:13 +00:00

F5 will automatically remove "untitled.exe".

F5 shouldn't be leaving a bunch of "trash" everywhere. More work needs to be done to this, but this is a start.
This commit is contained in:
Cory Smith 2022-08-27 10:14:23 -05:00
parent ed98457777
commit a2fc776888
3 changed files with 7 additions and 11 deletions

View file

@ -1,6 +1,6 @@
# QB64
![QB64](source/qb64icon32.png)
![QB64](source/qb64.png)
QB64 is a modern extended BASIC+OpenGL language that retains QB4.5/QBasic compatibility and compiles native binaries for Windows (XP and up), Linux and macOS.
=======

View file

@ -331,7 +331,6 @@ FUNCTION ide2 (ignore)
m = m + 1: i = 0: RunMenuID = m
menu$(m, i) = "Run": i = i + 1
menu$(m, i) = "#Start F5": i = i + 1
menu$(m, i) = "Run only (No exe)": i = i + 1
menuDesc$(m, i - 1) = "Compiles current program and runs it"
menu$(m, i) = "Modify #COMMAND$...": i = i + 1
menuDesc$(m, i - 1) = "Sets string returned by COMMAND$ function"
@ -1672,6 +1671,9 @@ FUNCTION ide2 (ignore)
END IF
IF KB = KEY_F5 THEN 'Note: F5 or SHIFT+F5 accepted
IF LEN(ideprogname) = 0 THEN
NoExeSaved = -1
END IF
startPaused = 0
idemrun:
startPausedPending = 0
@ -5805,19 +5807,13 @@ FUNCTION ide2 (ignore)
IF menu$(m, s) = "#Start F5" THEN
PCOPY 3, 0: SCREEN , , 3, 0
IF LEN(ideprogname) = 0 THEN
NoExeSaved = -1
END IF
startPaused = 0
GOTO idemrun
END IF
IF menu$(m, s) = "Run only (No exe)" THEN
PCOPY 3, 0: SCREEN , , 3, 0
NoExeSaved = -1
startPaused = 0
GOTO idemrun
END IF
IF menu$(m, s) = "Modify #COMMAND$..." THEN
PCOPY 2, 0
ModifyCOMMAND$ = " " + ideinputbox$("Modify COMMAND$", "#Enter text for COMMAND$", _TRIM$(ModifyCOMMAND$), "", 60, 0, 0)

BIN
source/qb64.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.7 KiB