hedgewars/uRenderUtils.pas
changeset 10142 adb804cb2638
parent 10139 9046f69dae4c
child 10494 0eb97cf4c78e
equal deleted inserted replaced
10141:3be894730bd6 10142:adb804cb2638
   316     edge, corner, tail: TSPrite;
   316     edge, corner, tail: TSPrite;
   317 begin
   317 begin
   318     if cOnlyStats then exit(nil);
   318     if cOnlyStats then exit(nil);
   319 
   319 
   320     case SpeechType of
   320     case SpeechType of
   321         1: begin;
   321         1: begin
   322             edge:= sprSpeechEdge;
   322             edge:= sprSpeechEdge;
   323             corner:= sprSpeechCorner;
   323             corner:= sprSpeechCorner;
   324             tail:= sprSpeechTail;
   324             tail:= sprSpeechTail;
   325             end;
   325             end;
   326         2: begin;
   326         2: begin
   327             edge:= sprThoughtEdge;
   327             edge:= sprThoughtEdge;
   328             corner:= sprThoughtCorner;
   328             corner:= sprThoughtCorner;
   329             tail:= sprThoughtTail;
   329             tail:= sprThoughtTail;
   330             end;
   330             end;
   331         3: begin;
   331         3: begin
   332             edge:= sprShoutEdge;
   332             edge:= sprShoutEdge;
   333             corner:= sprShoutCorner;
   333             corner:= sprShoutCorner;
   334             tail:= sprShoutTail;
   334             tail:= sprShoutTail;
   335             end;
   335             end
       
   336         else
       
   337             exit(nil)
   336         end;
   338         end;
   337     edgeHeight:= SpritesData[edge].Height;
   339     edgeHeight:= SpritesData[edge].Height;
   338     edgeWidth:= SpritesData[edge].Width;
   340     edgeWidth:= SpritesData[edge].Width;
   339     cornerWidth:= SpritesData[corner].Width;
   341     cornerWidth:= SpritesData[corner].Width;
   340     cornerHeight:= SpritesData[corner].Height;
   342     cornerHeight:= SpritesData[corner].Height;