UPD: fine-tune filename in TfrmFileProperties

This commit is contained in:
rich2014 2026-06-01 10:19:59 +08:00
commit 4bde5beaee

View file

@ -560,9 +560,7 @@ begin
with FFiles[iIndex] do
begin
lblFileName.Caption:= Name;
if lblFileName.Caption = emptyStr then
lblFileName.Caption:= FFileSource.GetDisplayFileName(FFiles[iIndex]);
lblFileName.Caption:= FFileSource.GetFileName(FFiles[iIndex]);
lblFile.Caption:= lblFileName.Caption;
lblFolder.Caption:= Path;