QB64/qb64
QB64/qb64
1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-05 17:00:26 +00:00
Code Releases Wiki Activity

Make AutoPosition setting default to true.

Browse source
This commit is contained in:
FellippeHeitor 2017-10-14 17:34:33 -03:00
parent c8a219bb70
commit cff8ae7561
3 changed files with 6 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
source/global/IDEsettings.bas
View file

@ -239,8 +239,8 @@ IF LoadedIDESettings = 0 THEN
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_AutoPosition", "FALSE"
END IF
ELSE
IDE_Autopostion = 0
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_AutoPosition", "FALSE"
IDE_AutoPosition = -1
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_AutoPosition", "TRUE"
END IF
result = ReadConfigSetting("IDE_TopPosition", value$)
@ -248,9 +248,7 @@ IF LoadedIDESettings = 0 THEN
IDE_TopPosition = VAL(value$)
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.
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_AutoPosition", "FALSE"
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_TopPosition", "0"
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_LeftPosition", "0"
END IF
result = ReadConfigSetting("IDE_LeftPosition", value$)
@ -258,8 +256,6 @@ IF LoadedIDESettings = 0 THEN
IDE_LeftPosition = VAL(value$)
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.
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_AutoPosition", "FALSE"
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_TopPosition", "0"
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_LeftPosition", "0"
END IF
@ -411,7 +407,7 @@ IF LoadedIDESettings = 0 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", "FALSE"
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_AutoPosition", "TRUE"
END IF
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_Width", "80"
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_Height", "25"

1
source/ide/ide_methods.bas
View file

@ -730,7 +730,6 @@ FUNCTION ide2 (ignore)
idecontextualmenu = 0
idedeltxt 'removes temporary strings (typically created by guibox commands) by setting an index to 0
IF IDE_AutoPosition THEN
'if _SCreenhide = 0 then 'Screenhide currently does not work in Linux, so we need a different check
IF IDE_TopPosition <> _SCREENY OR IDE_LeftPosition <> _SCREENX THEN
IF _SCREENY >= -_HEIGHT * _FONTHEIGHT AND _SCREENX >= -_WIDTH * _FONTWIDTH THEN 'Don't record the position if it's off the screen, past the point where we can drag it back into a different position.
WriteConfigSetting "'[IDE DISPLAY SETTINGS]", "IDE_TopPosition", STR$(_SCREENY)

4
source/qb64.bas
View file

@ -915,7 +915,9 @@ gl_scan_header
'-----------------------QB64 COMPILER ONCE ONLY SETUP CODE ENDS HERE---------------------------------------
IF NoIDEMode THEN IDE_AutoPosition = 0: GOTO noide
IF IDE_AutoPosition THEN _SCREENMOVE IDE_LeftPosition, IDE_TopPosition
IF IDE_AutoPosition <> 0 AND IDE_TopPosition <> 0 AND IDE_LeftPosition <> 0 THEN
_SCREENMOVE IDE_LeftPosition, IDE_TopPosition
END IF
idemode = 1
sendc$ = "" 'no initial message
IF CMDLineFile <> "" THEN sendc$ = CHR$(1) + CMDLineFile