equal
deleted
inserted
replaced
310 for fi:= Low(THWFont) to High(THWFont) do |
310 for fi:= Low(THWFont) to High(THWFont) do |
311 with Fontz[fi] do |
311 with Fontz[fi] do |
312 begin |
312 begin |
313 s:= cPathz[ptFonts] + '/' + Name; |
313 s:= cPathz[ptFonts] + '/' + Name; |
314 WriteToConsole(msgLoading + s + ' (' + inttostr(Height) + 'pt)... '); |
314 WriteToConsole(msgLoading + s + ' (' + inttostr(Height) + 'pt)... '); |
315 Handle:= TTF_OpenFontRW(Str2PChar(s), true, Height); |
315 Handle:= TTF_OpenFontRW(rwopsOpenRead(s), true, Height); |
316 SDLTry(Handle <> nil, true); |
316 SDLTry(Handle <> nil, true); |
317 TTF_SetFontStyle(Handle, style); |
317 TTF_SetFontStyle(Handle, style); |
318 WriteLnToConsole(msgOK) |
318 WriteLnToConsole(msgOK) |
319 end; |
319 end; |
320 |
320 |