X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;ds=sidebyside;f=src%2Fgame%2Fg_gui.pas;h=988d0909fd5afe24c1cc4501824e6855130e11df;hb=09e7681fd86c15d7553b8b8535775b703c5516aa;hp=a872643f8852be0abc923c45110279a9e8c2415e;hpb=dbcda53050faa619d592a5fb806d7ccbcc7ad4b0;p=d2df-sdl.git diff --git a/src/game/g_gui.pas b/src/game/g_gui.pas index a872643..988d090 100644 --- a/src/game/g_gui.pas +++ b/src/game/g_gui.pas @@ -539,7 +539,6 @@ uses {$ENDIF} {$IFDEF ENABLE_RENDER} r_gui, - r_textures, (* load/free image *) {$ENDIF} g_sound, SysUtils, e_res, g_game, Math, StrUtils, g_player, g_options, @@ -3003,9 +3002,6 @@ end; procedure TGUIimage.ClearImage(); begin - if FImageRes = '' then Exit; - - g_Texture_Delete(FImageRes); FImageRes := ''; end; @@ -3028,9 +3024,7 @@ end; procedure TGUIimage.SetImage(Res: string); begin - ClearImage(); - - if g_Texture_CreateWADEx(Res, Res) then FImageRes := Res; + FImageRes := Res; end; procedure TGUIimage.Update();