mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: getMountPointFromPath() in TMountedFileSource

Browse source
This commit is contained in:
rich2014 2025-01-30 10:11:31 +08:00
commit bf477c59d6
1 changed files with 21 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

30
src/filesources/mounted/umountedfilesource.pas
View file

@ -48,6 +48,7 @@ type
procedure mount( const path: String; const point: String );
procedure mount( const path: String );
function getDefaultPointForPath( const path: String ): String; virtual;
function getMountPointFromPath(const realPath: String): TMountPoint;
protected
function SetCurrentWorkingDirectory(NewDir: String): Boolean; override;
function GetCurrentWorkingDirectory: String; override;
@ -137,6 +138,21 @@ begin
Result:= String.Empty;
end;
function TMountedFileSource.getMountPointFromPath(const realPath: String): TMountPoint;
var
mountPoint: TMountPoint;
path: String;
begin
Result:= nil;
path:= IncludeTrailingPathDelimiter( realPath );
for mountPoint in _mountPoints do begin
if path.Equals(mountPoint.path) then begin
Result:= mountPoint;
Exit;
end;
end;
end;
function TMountedFileSource.SetCurrentWorkingDirectory(NewDir: String): Boolean;
begin
Result:= True;
@ -185,16 +201,12 @@ end;
function TMountedFileSource.GetFileName(aFile: TFile): String;
var
mountPoint: TMountPoint;
path: String;
begin
path:= IncludeTrailingPathDelimiter( aFile.FullPath );
for mountPoint in _mountPoints do begin
if path.Equals(mountPoint.path) then begin
Result:= mountPoint.name;
Exit;
end;
end;
Result:= inherited;
mountPoint:= self.getMountPointFromPath( aFile.FullPath );
if mountPoint <> nil then
Result:= mountPoint.name
else
Result:= inherited;
end;
function TMountedFileSource.GetParentDir(sPath : String): String;