mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-06 19:50:22 +00:00
Avoid moving the IDE window to 0,0 in the first run (Windows).
This commit is contained in:
parent
0761c1f20f
commit
959307033e
|
@ -4,6 +4,7 @@ DIM SHARED IDEBackgroundColor AS _UNSIGNED LONG
|
||||||
DIM SHARED IDEBackgroundColor2 AS _UNSIGNED LONG, IDEBracketHighlightColor AS _UNSIGNED LONG
|
DIM SHARED IDEBackgroundColor2 AS _UNSIGNED LONG, IDEBracketHighlightColor AS _UNSIGNED LONG
|
||||||
DIM SHARED IDEKeywordColor AS _UNSIGNED LONG, IDENumbersColor AS _UNSIGNED LONG
|
DIM SHARED IDEKeywordColor AS _UNSIGNED LONG, IDENumbersColor AS _UNSIGNED LONG
|
||||||
DIM SHARED IDE_AutoPosition AS _BYTE, IDE_TopPosition AS INTEGER, IDE_LeftPosition AS INTEGER
|
DIM SHARED IDE_AutoPosition AS _BYTE, IDE_TopPosition AS INTEGER, IDE_LeftPosition AS INTEGER
|
||||||
|
DIM SHARED IDE_BypassAutoPosition AS _BYTE
|
||||||
DIM SHARED IDENormalCursorStart AS LONG, IDENormalCursorEnd AS LONG
|
DIM SHARED IDENormalCursorStart AS LONG, IDENormalCursorEnd AS LONG
|
||||||
DIM SHARED IDE_Index$
|
DIM SHARED IDE_Index$
|
||||||
DIM SHARED LoadedIDESettings AS INTEGER
|
DIM SHARED LoadedIDESettings AS INTEGER
|
||||||
|
@ -247,7 +248,7 @@ IF LoadedIDESettings = 0 THEN
|
||||||
IF result THEN
|
IF result THEN
|
||||||
IDE_TopPosition = VAL(value$)
|
IDE_TopPosition = VAL(value$)
|
||||||
ELSE
|
ELSE
|
||||||
IDE_Autopostion = 0 'If there's no position saved in the file, then we certainly don't need to try and auto-position to our last setting.
|
IDE_BypassAutoPosition = -1 'If there's no position saved in the file, then we certainly don't need to try and auto-position to our last setting.
|
||||||
IDE_TopPosition = 0
|
IDE_TopPosition = 0
|
||||||
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_TopPosition", "0"
|
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_TopPosition", "0"
|
||||||
END IF
|
END IF
|
||||||
|
@ -256,7 +257,7 @@ IF LoadedIDESettings = 0 THEN
|
||||||
IF result THEN
|
IF result THEN
|
||||||
IDE_LeftPosition = VAL(value$)
|
IDE_LeftPosition = VAL(value$)
|
||||||
ELSE
|
ELSE
|
||||||
IDE_Autopostion = 0 'If there's no position saved in the file, then we certainly don't need to try and auto-position to our last setting.
|
IDE_BypassAutoPosition = -1 'If there's no position saved in the file, then we certainly don't need to try and auto-position to our last setting.
|
||||||
IDE_LeftPosition = 0
|
IDE_LeftPosition = 0
|
||||||
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_LeftPosition", "0"
|
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_LeftPosition", "0"
|
||||||
END IF
|
END IF
|
||||||
|
@ -407,8 +408,6 @@ IF LoadedIDESettings = 0 THEN
|
||||||
WriteConfigSetting "'[IDE COLOR SETTINGS]", "QuoteColor", "_RGB32(255,255,85)"
|
WriteConfigSetting "'[IDE COLOR SETTINGS]", "QuoteColor", "_RGB32(255,255,85)"
|
||||||
WriteConfigSetting "'[IDE COLOR SETTINGS]", "TextColor", "_RGB32(255,255,255)"
|
WriteConfigSetting "'[IDE COLOR SETTINGS]", "TextColor", "_RGB32(255,255,255)"
|
||||||
IF INSTR(_OS$, "WIN") THEN
|
IF INSTR(_OS$, "WIN") THEN
|
||||||
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_TopPosition", "0"
|
|
||||||
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_LeftPosition", "0"
|
|
||||||
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_AutoPosition", "TRUE"
|
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_AutoPosition", "TRUE"
|
||||||
END IF
|
END IF
|
||||||
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_Width", "80"
|
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_Width", "80"
|
||||||
|
|
|
@ -915,7 +915,7 @@ gl_scan_header
|
||||||
'-----------------------QB64 COMPILER ONCE ONLY SETUP CODE ENDS HERE---------------------------------------
|
'-----------------------QB64 COMPILER ONCE ONLY SETUP CODE ENDS HERE---------------------------------------
|
||||||
|
|
||||||
IF NoIDEMode THEN IDE_AutoPosition = 0: GOTO noide
|
IF NoIDEMode THEN IDE_AutoPosition = 0: GOTO noide
|
||||||
IF IDE_AutoPosition THEN _SCREENMOVE IDE_LeftPosition, IDE_TopPosition
|
IF IDE_AutoPosition AND NOT IDE_BypassAutoPosition THEN _SCREENMOVE IDE_LeftPosition, IDE_TopPosition
|
||||||
idemode = 1
|
idemode = 1
|
||||||
sendc$ = "" 'no initial message
|
sendc$ = "" 'no initial message
|
||||||
IF CMDLineFile <> "" THEN sendc$ = CHR$(1) + CMDLineFile
|
IF CMDLineFile <> "" THEN sendc$ = CHR$(1) + CMDLineFile
|
||||||
|
|
Loading…
Reference in a new issue