mirror of
https://github.com/QB64Official/qb64.git
synced 2024-07-05 01:50:25 +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 (K$ = CHR$(13) OR info = 1) AND o(3).sel >= 1 THEN
|
||||
path$ = idezchangepath(path$, idetxt(o(3).stx))
|
||||
idetxt(o(2).txt) = idezfilelist$(path$, AllFiles, "")
|
||||
idetxt(o(3).txt) = idezpathlist$(path$)
|
||||
|
||||
o(2).sel = -1
|
||||
o(3).sel = -1
|
||||
GOTO ideopenloop
|
||||
newpath$ = idetxt(o(3).stx)
|
||||
IF newpath$ = "" THEN newpath$ = ".."
|
||||
f$ = newpath$
|
||||
GOTO changepath
|
||||
END IF
|
||||
END IF
|
||||
|
||||
|
|
Loading…
Reference in a new issue