mirror of
https://github.com/QB64Official/qb64.git
synced 2024-07-07 19:10:25 +00:00
Adds one-time message at 1st compilation (re: 'Save exe to source...')
This commit is contained in:
parent
286bb1d570
commit
e969a7c529
|
@ -14,7 +14,7 @@ DIM SHARED SaveExeWithSource AS _BYTE, EnableQuickNav AS _BYTE
|
||||||
DIM SHARED IDEShowErrorsImmediately AS _BYTE
|
DIM SHARED IDEShowErrorsImmediately AS _BYTE
|
||||||
DIM SHARED ShowLineNumbersSeparator AS _BYTE, ShowLineNumbersUseBG AS _BYTE
|
DIM SHARED ShowLineNumbersSeparator AS _BYTE, ShowLineNumbersUseBG AS _BYTE
|
||||||
DIM SHARED IgnoreWarnings AS _BYTE, qb64versionprinted AS _BYTE
|
DIM SHARED IgnoreWarnings AS _BYTE, qb64versionprinted AS _BYTE
|
||||||
DIM SHARED DisableSyntaxHighlighter AS _BYTE
|
DIM SHARED DisableSyntaxHighlighter AS _BYTE, ExeToSourceFolderFirstTimeMsg AS _BYTE
|
||||||
|
|
||||||
IF LoadedIDESettings = 0 THEN
|
IF LoadedIDESettings = 0 THEN
|
||||||
'We only want to load the file once when QB64 first starts
|
'We only want to load the file once when QB64 first starts
|
||||||
|
@ -177,6 +177,19 @@ IF LoadedIDESettings = 0 THEN
|
||||||
PasteCursorAtEnd = -1
|
PasteCursorAtEnd = -1
|
||||||
END IF
|
END IF
|
||||||
|
|
||||||
|
result = ReadConfigSetting("ExeToSourceFolderFirstTimeMsg", value$)
|
||||||
|
IF result THEN
|
||||||
|
IF value$ = "TRUE" OR VAL(value$) = -1 THEN
|
||||||
|
ExeToSourceFolderFirstTimeMsg = -1
|
||||||
|
ELSE
|
||||||
|
ExeToSourceFolderFirstTimeMsg = 0
|
||||||
|
WriteConfigSetting "'[GENERAL SETTINGS]", "ExeToSourceFolderFirstTimeMsg", "FALSE"
|
||||||
|
END IF
|
||||||
|
ELSE
|
||||||
|
WriteConfigSetting "'[GENERAL SETTINGS]", "ExeToSourceFolderFirstTimeMsg", "FALSE"
|
||||||
|
ExeToSourceFolderFirstTimeMsg = 0
|
||||||
|
END IF
|
||||||
|
|
||||||
result = ReadConfigSetting("SaveExeWithSource", value$)
|
result = ReadConfigSetting("SaveExeWithSource", value$)
|
||||||
IF result THEN
|
IF result THEN
|
||||||
IF value$ = "TRUE" OR VAL(value$) = -1 THEN
|
IF value$ = "TRUE" OR VAL(value$) = -1 THEN
|
||||||
|
|
|
@ -1493,7 +1493,24 @@ FUNCTION ide2 (ignore)
|
||||||
idemrun:
|
idemrun:
|
||||||
iderunmode = 1 'run detached; = 0 'standard run
|
iderunmode = 1 'run detached; = 0 'standard run
|
||||||
idemrunspecial:
|
idemrunspecial:
|
||||||
|
|
||||||
IDECompilationRequested = -1
|
IDECompilationRequested = -1
|
||||||
|
|
||||||
|
IF ExeToSourceFolderFirstTimeMsg = 0 THEN
|
||||||
|
IF SaveExeWithSource THEN
|
||||||
|
idemessagebox "Run", "Your program will be compiled to the same folder where your" + CHR$(10) + _
|
||||||
|
"source code is saved. You can change that by unchecking the" + CHR$(10) + _
|
||||||
|
"option 'Output EXE to Source Folder' in the Run menu."
|
||||||
|
ELSE
|
||||||
|
idemessagebox "Run", "Your program will be compiled to your QB64 folder. You can" + CHR$(10) + _
|
||||||
|
"change that by checking the option 'Output EXE to Source" + CHR$(10) + _
|
||||||
|
"Folder' in the Run menu."
|
||||||
|
END IF
|
||||||
|
WriteConfigSetting "'[GENERAL SETTINGS]", "ExeToSourceFolderFirstTimeMsg", "TRUE"
|
||||||
|
ExeToSourceFolderFirstTimeMsg = -1
|
||||||
|
END IF
|
||||||
|
PCOPY 3, 0: SCREEN , , 3, 0: idewait4mous: idewait4alt
|
||||||
|
|
||||||
'run program
|
'run program
|
||||||
IF ready <> 0 AND idechangemade = 0 THEN
|
IF ready <> 0 AND idechangemade = 0 THEN
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue