ADD: *.cur support to Viewer

This commit is contained in:
Alexander Koblov 2011-04-05 18:08:36 +00:00
commit a3ddac0712
2 changed files with 5 additions and 5 deletions

View file

@ -1704,10 +1704,10 @@ function TfrmViewer.CheckGraphics(const sFileName:String):Boolean;
var
sExt: String;
begin
sExt:= Lowercase(ExtractFileExt(sFileName));
sExt:= LowerCase(ExtractFileExt(sFileName));
Result:=(sExt='.bmp') or (sExt='.xpm') or (sExt='.png') or
(sExt='.jpg') or (sExt='.jpeg') or (sExt='.ico') or (sExt='.icns') or
(sExt='.ddw') or (sExt='.tga') or (sExt='.gif');
(sExt='.ddw') or (sExt='.tga') or (sExt='.cur') or (sExt='.gif');
end;
// Adjust Image size (width and height) to sboxImage size
@ -2105,4 +2105,4 @@ begin
end;
end.

View file

@ -51,7 +51,7 @@ begin
sExt:= LowerCase(sFileExt);
Result:= (sExt = 'bmp') or (sExt = 'xpm') or (sExt = 'png') or
(sExt = 'jpg') or (sExt = 'jpeg') or (sExt = 'ico') or (sExt = 'icns') or
(sExt = 'ddw') or (sExt = 'tga') or (sExt = 'gif');
(sExt = 'ddw') or (sExt = 'tga') or (sExt = 'cur') or (sExt = 'gif');
end;
function TThumbnailManager.GetPreviewFileExt(const sFileExt: UTF8String): UTF8String;
@ -293,4 +293,4 @@ begin
end;
end.