hedgewars/SDLh.pas
changeset 202 8603c0420461
parent 201 c9610ad20fef
child 206 32fa6282efe2
--- a/hedgewars/SDLh.pas	Mon Oct 16 21:06:32 2006 +0000
+++ b/hedgewars/SDLh.pas	Thu Oct 19 18:57:58 2006 +0000
@@ -110,7 +110,7 @@
                   r: Byte;
                   g: Byte;
                   b: Byte;
-                  a: Byte;
+                  unused: Byte;
                   end;
 
      PSDL_RWops = ^TSDL_RWops;
@@ -226,7 +226,9 @@
       {$IFDEF UNIX}
       SDL_TTFLibName = 'libSDL_ttf.so';
       {$ENDIF}
-
+      TTF_STYLE_NORMAL = 0;
+      TTF_STYLE_BOLD   = 1;
+      TTF_STYLE_ITALIC = 2;
 
 type PTTF_Font = ^TTTF_font;
      TTTF_Font = record
@@ -240,6 +242,7 @@
 function TTF_RenderUTF8_Solid(font: PTTF_Font; const text: PChar; fg: TSDL_Color): PSDL_Surface; cdecl; external SDL_TTFLibName;
 function TTF_RenderUTF8_Blended(font: PTTF_Font; const text: PChar; fg: TSDL_Color): PSDL_Surface; cdecl; external SDL_TTFLibName;
 function TTF_OpenFont(const filename: PChar; size: integer): PTTF_Font; cdecl; external SDL_TTFLibName;
+procedure TTF_SetFontStyle(font: PTTF_Font; style: integer); cdecl; external SDL_TTFLibName;
 
 (*  SDL_mixer *)