QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-20 04:24:48 +00:00
Code Issues Releases Wiki Activity

Merge pull request #477 from a740g/main

Browse source 
Open GUI file dialog when Ctrl+S is pressed
This commit is contained in:
Samuel Gomes 2024-04-06 17:37:33 +05:30 committed by GitHub
commit 61096dde17
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
source/ide/ide_methods.bas
View file

@ -3463,8 +3463,9 @@ FUNCTION ide2 (ignore)
IF KCONTROL AND UCASE$(K$) = "S" THEN 'File -> #Save
IF ideprogname = "" THEN
ProposedTitle$ = FindProposedTitle$
IF ProposedTitle$ = "" THEN
a$ = idefiledialog$("untitled" + tempfolderindexstr$ + ".bas", 2)
IF ProposedTitle$ = "" THEN ProposedTitle$ = "untitled" + tempfolderindexstr$
IF UseGuiDialogs THEN
a$ = Savefile$(ProposedTitle$ + ".bas")
ELSE
a$ = idefiledialog$(ProposedTitle$ + ".bas", 2)
END IF