X-Git-Url: https://deadsoftware.ru/gitweb?p=d2df-editor.git;a=blobdiff_plain;f=src%2Feditor%2Ff_addresource_texture.pas;h=d1210cd5b38a793ae3ecc53e803bd8c39db462aa;hp=7319645ffb72f1498a60a801089c0f8b25c3a1fe;hb=6869d799c63b2909e4e0c3b2cd0b486903518ae2;hpb=2dcab5faef50c93ec6891362b947288f34362081 diff --git a/src/editor/f_addresource_texture.pas b/src/editor/f_addresource_texture.pas index 7319645..d1210cd 100644 --- a/src/editor/f_addresource_texture.pas +++ b/src/editor/f_addresource_texture.pas @@ -7,8 +7,7 @@ interface uses LCLIntf, LCLType, LMessages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, f_addresource, - StdCtrls, ExtCtrls, utils, Imaging, ImagingTypes, ImagingUtility, - e_log; + StdCtrls, ExtCtrls, utils, Imaging, ImagingTypes, ImagingUtility; type TAddTextureForm = class (TAddResourceForm) @@ -268,10 +267,7 @@ begin InitImage(img); if not LoadImageFromMemory(Data, DataSize, img) then - begin - e_WriteLog('Invalid image format?', MSG_WARNING); Exit; - end; Width := img.width; Height := img.height; @@ -303,7 +299,7 @@ begin // ii^ := clr.a; Inc(ii); end; end; - + FreeImage(img); Result := BitMap; end;