UPD: MacCLoud: hide 0 size for Connections in the File Panel

This commit is contained in:
rich2014 2025-06-24 20:47:08 +08:00
commit 1836be8ebf

View file

@ -88,6 +88,7 @@ procedure TCloudRootDriverLister.listFolderBegin;
cloudFile.name:= rsAddNewConnection;
cloudFile.creationTime:= 4.5753942770578702E+004;
cloudFile.modificationTime:= cloudFile.creationTime;
cloudFile.size:= TQWordHelper.MaxValue;
_list.Add( cloudFile );
end;
@ -103,6 +104,7 @@ procedure TCloudRootDriverLister.listFolderBegin;
cloudFile.name:= connection.name;
cloudFile.creationTime:= connection.creationTime;
cloudFile.modificationTime:= connection.modificationTime;
cloudFile.size:= TQWordHelper.MaxValue;
_list.Add( cloudFile );
end;
end;