src/Utils/MiscUI/ExtTextOutFL.h

   1 // TortoiseGit - a Windows shell extension for easy version control
   2
   3 // Copyright (C) 2008 - TortoiseSVN
   4
   5 // This program is free software; you can redistribute it and/or
   6 // modify it under the terms of the GNU General Public License
   7 // as published by the Free Software Foundation; either version 2
   8 // of the License, or (at your option) any later version.
   9
  10 // This program is distributed in the hope that it will be useful,
  11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 // GNU General Public License for more details.
  14
  15 // You should have received a copy of the GNU General Public License
  16 // along with this program; if not, write to the Free Software Foundation,
  17 // 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18 //
  19 #pragma once
  20 #include <mlang.h>
  21
  22
  23 // these functions are taken from an article of the 'old new thing' blog:
  24 // http://blogs.msdn.com/oldnewthing/archive/2004/07/16/185261.aspx
  25
  26
  27 HRESULT TextOutFL(HDC hdc, int x, int y, LPCWSTR psz, int cch)
  28 {
  29         HRESULT hr;
  30         IMLangFontLink2 *pfl;
  31         if (SUCCEEDED(hr = CoCreateInstance(CLSID_CMultiLanguage, NULL,
  32                 CLSCTX_ALL, IID_IMLangFontLink2, (void**)&pfl)))
  33         {
  34                         HFONT hfOrig = (HFONT)GetCurrentObject(hdc, OBJ_FONT);
  35                         POINT ptOrig;
  36                         DWORD dwAlignOrig = GetTextAlign(hdc);
  37                         if (!(dwAlignOrig & TA_UPDATECP))
  38                         {
  39                                 SetTextAlign(hdc, dwAlignOrig | TA_UPDATECP);
  40                         }
  41                         MoveToEx(hdc, x, y, &ptOrig);
  42                         DWORD dwFontCodePages = 0;
  43                         hr = pfl->GetFontCodePages(hdc, hfOrig, &dwFontCodePages);
  44                         if (SUCCEEDED(hr))
  45                         {
  46                                 while (cch > 0)
  47                                 {
  48                                         DWORD dwActualCodePages;
  49                                         long cchActual;
  50                                         hr = pfl->GetStrCodePages(psz, cch, dwFontCodePages, &dwActualCodePages, &cchActual);
  51                                         if (FAILED(hr))
  52                                         {
  53                                                 break;
  54                                         }
  55
  56                                         if (dwActualCodePages & dwFontCodePages)
  57                                         {
  58                                                 TextOut(hdc, 0, 0, psz, cchActual);
  59                                         }
  60                                         else
  61                                         {
  62                                                 HFONT hfLinked;
  63                                                 if (FAILED(hr = pfl->MapFont(hdc, dwActualCodePages, 0, &hfLinked)))
  64                                                 {
  65                                                         break;
  66                                                 }
  67                                                 SelectObject(hdc, (HGDIOBJ)(HFONT)hfLinked);
  68                                                 TextOut(hdc, 0, 0, psz, cchActual);
  69                                                 SelectObject(hdc, (HGDIOBJ)(HFONT)hfOrig);
  70                                                 pfl->ReleaseFont(hfLinked);
  71                                         }
  72                                         psz += cchActual;
  73                                         cch -= cchActual;
  74                                 }
  75                                 if (FAILED(hr))
  76                                 {
  77                                         //  We started outputting characters so we have to finish.
  78                                         //  Do the rest without font linking since we have no choice.
  79                                         TextOut(hdc, 0, 0, psz, cch);
  80                                         hr = S_FALSE;
  81                                 }
  82                         }
  83
  84                         pfl->Release();
  85
  86                         if (!(dwAlignOrig & TA_UPDATECP))
  87                         {
  88                                 SetTextAlign(hdc, dwAlignOrig);
  89                                 MoveToEx(hdc, ptOrig.x, ptOrig.y, NULL);
  90                         }
  91         }
  92
  93         return hr;
  94 }
  95
  96 void TextOutTryFL(HDC hdc, int x, int y, LPCWSTR psz, int cch)
  97 {
  98         if (FAILED(TextOutFL(hdc, x, y, psz, cch)))
  99         {
 100                 TextOut(hdc, x, y, psz, cch);
 101         }
 102 }
 103