equal
deleted
inserted
replaced
98 begin |
98 begin |
99 color:= colors[str[1]]; |
99 color:= colors[str[1]]; |
100 delete(str, 1, 1) |
100 delete(str, 1, 1) |
101 end; |
101 end; |
102 |
102 |
103 font:= CheckCJKFont(str, fnt16); |
103 font:= CheckCJKFont(Str2PChar(str), fnt16); |
104 w:= 0; h:= 0; // avoid compiler hints |
104 w:= 0; h:= 0; // avoid compiler hints |
105 TTF_SizeUTF8(Fontz[font].Handle, Str2PChar(str), @w, @h); |
105 TTF_SizeUTF8(Fontz[font].Handle, Str2PChar(str), @w, @h); |
106 |
106 |
107 resSurface:= SDL_CreateRGBSurface(0, toPowerOf2(w), toPowerOf2(h), 32, RMask, GMask, BMask, AMask); |
107 resSurface:= SDL_CreateRGBSurface(0, toPowerOf2(w), toPowerOf2(h), 32, RMask, GMask, BMask, AMask); |
108 |
108 |