FIX: filename in Hint in FileView (eg. iCloud Drive)

This commit is contained in:
rich2014 2026-01-25 08:09:03 +08:00
commit ddb9a6c2b0

View file

@ -1282,7 +1282,7 @@ begin
AFile := FFiles[FHintFileIndex];
if AFile.FSFile.Name = '..' then Exit;
HintInfo^.HintStr:= AFile.FSFile.Name;
HintInfo^.HintStr:= FileSource.GetFileName( AFile.FSFile );
sHint:= GetFileInfoToolTip(FileSource, AFile.FSFile);
if (sHint <> EmptyStr) then
HintInfo^.HintStr:= HintInfo^.HintStr + LineEnding + sHint;