105 Result.h:= h + 2;

   105 Result.h:= h + 2;

   106 DrawRoundRect(@Result, cWhiteColor, cColorNearBlack, Surface);

   106 DrawRoundRect(@Result, cWhiteColor, cColorNearBlack, Surface);

   107 clr.r:= Color shr 16;

   107 clr.r:= Color shr 16;

   108 clr.g:= (Color shr 8) and $FF;

   108 clr.g:= (Color shr 8) and $FF;

   109 clr.b:= Color and $FF;

   109 clr.b:= Color and $FF;

   111 tmpsurf:= TTF_RenderUTF8_Blended(Fontz[Font].Handle, PChar(s), clr);

   111 tmpsurf:= TTF_RenderUTF8_Blended(Fontz[Font].Handle, PChar(s), clr);

   112 Result.x:= X + 3;

   112 Result.x:= X + 3;

   113 Result.y:= Y + 1;

   113 Result.y:= Y + 1;

   114 SDL_UpperBlit(tmpsurf, nil, Surface, @Result);

   114 SDL_UpperBlit(tmpsurf, nil, Surface, @Result);

   115 SDL_FreeSurface(tmpsurf);

   115 SDL_FreeSurface(tmpsurf);

   380 r.x:= X;

   380 r.x:= X;

   381 r.y:= Y;

   381 r.y:= Y;

   382 clr.r:= $FF;

   382 clr.r:= $FF;

   383 clr.g:= $FF;

   383 clr.g:= $FF;

   384 clr.b:= $FF;

   384 clr.b:= $FF;

   386 tmpsurf:= TTF_RenderUTF8_Solid(Fontz[Font].Handle, PChar(s), clr);

   386 tmpsurf:= TTF_RenderUTF8_Solid(Fontz[Font].Handle, PChar(s), clr);

   387 SDL_UpperBlit(tmpsurf, nil, Surface, @r);

   387 SDL_UpperBlit(tmpsurf, nil, Surface, @r);

   388 SDL_FreeSurface(tmpsurf)

   388 SDL_FreeSurface(tmpsurf)

   389 end;

   389 end;

   390 

   390