UPD: update unique Icon of file after updated in TFileView.UpdateFile() on macOS

This commit is contained in:
rich2014 2025-11-16 00:41:02 +08:00
commit b9d9ec7cd4

View file

@ -1312,6 +1312,11 @@ begin
end;
end;
ADisplayFile.TextColor := clNone;
{$IFDEF DARWIN}
// on macOS, Icon of file maybe changed after updated.
// setting IconID to -1 forces the Icon of the file to be refreshed.
ADisplayFile.IconID := -1;
{$ENDIF}
ADisplayFile.IconOverlayID := -1;
ADisplayFile.DisplayStrings.Clear;
ADisplayFile.Busy := ADisplayFile.Busy - [bsProp];