Eolite 2.7: option to use big fonts

git-svn-id: svn://kolibrios.org@5532 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
2015-03-19 13:49:26 +00:00
parent 1d34f562e7
commit ef2e4e1bef
6 changed files with 75 additions and 46 deletions

View File

@@ -29,7 +29,7 @@ char *ext[]={
void Put_icon(dword extension, xx, yy, fairing_color, icon_n)
{
int i;
int i, font_half_width;
if (extension) for (i=0; ext[i]!=0; i+=2;)
{
@@ -43,7 +43,8 @@ void Put_icon(dword extension, xx, yy, fairing_color, icon_n)
ficons_pal[0] = fairing_color;
PutPaletteImage(icon_n*16*15+#ficons,16,15,xx,yy,8,#ficons_pal);
if (fairing_color!=0xFFFfff) IconFairing(icon_n, xx, yy, fairing_color);
if (icon_n<>17) && (strlen(extension)<9) WriteText(-strlen(extension)*3+Form.cwidth-120,yy+4,0x80,0,extension);
if (use_big_fonts) font_half_width=4; else font_half_width=3;
if (icon_n<>17) && (strlen(extension)<9) WriteText(-strlen(extension)*font_half_width+Form.cwidth-120,yy+4,font_type,0,extension);
}