Sfoglia il codice sorgente

File Dialog: fixed bug when exiting a directory

Arthur Yefimov 4 anni fa
parent
commit
62944d165e
1 ha cambiato i file con 2 aggiunte e 1 eliminazioni
  1. 2 1
      src/Editor.Mod

+ 2 - 1
src/Editor.Mod

@@ -100,7 +100,8 @@ BEGIN L := c.colFiles.items;
     Dir.Next(r)
     Dir.Next(r)
   END;
   END;
   StrList.Sort(L, FileNamesCmp);
   StrList.Sort(L, FileNamesCmp);
-  c.colFiles.cur := 0; OV.EditSetCaption(c.edtFilename, '../');
+  OV.ColumnListSetCur(c.colFiles, 0);
+  OV.EditSetCaption(c.edtFilename, '../');
   OV.NeedRedraw(c.app)
   OV.NeedRedraw(c.app)
 END FileDialogUpdateFileList;
 END FileDialogUpdateFileList;