mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-01 12:40:36 +00:00
Fixes navigation (file dialog)
This commit is contained in:
parent
62878630b5
commit
3523208b3c
|
@ -9205,13 +9205,10 @@ FUNCTION idefiledialog$(programname$, mode AS _BYTE)
|
||||||
|
|
||||||
IF focus = 3 THEN
|
IF focus = 3 THEN
|
||||||
IF (K$ = CHR$(13) OR info = 1) AND o(3).sel >= 1 THEN
|
IF (K$ = CHR$(13) OR info = 1) AND o(3).sel >= 1 THEN
|
||||||
path$ = idezchangepath(path$, idetxt(o(3).stx))
|
newpath$ = idetxt(o(3).stx)
|
||||||
idetxt(o(2).txt) = idezfilelist$(path$, AllFiles, "")
|
IF newpath$ = "" THEN newpath$ = ".."
|
||||||
idetxt(o(3).txt) = idezpathlist$(path$)
|
f$ = newpath$
|
||||||
|
GOTO changepath
|
||||||
o(2).sel = -1
|
|
||||||
o(3).sel = -1
|
|
||||||
GOTO ideopenloop
|
|
||||||
END IF
|
END IF
|
||||||
END IF
|
END IF
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue