From 34353afa23f23d9bc3470896248b8c387465a4b2 Mon Sep 17 00:00:00 2001
From: Alexey Kulakov <panda75@bk.ru>
Date: Mon, 10 Feb 2014 17:25:36 +0000
Subject: Miranda API sync with small compilation fixes

git-svn-id: http://svn.miranda-ng.org/main/trunk@8083 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/Utils.pas/wrapper.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'plugins/Utils.pas/wrapper.pas')

diff --git a/plugins/Utils.pas/wrapper.pas b/plugins/Utils.pas/wrapper.pas
index 25b23a05f0..a663f5fa9c 100644
--- a/plugins/Utils.pas/wrapper.pas
+++ b/plugins/Utils.pas/wrapper.pas
@@ -540,11 +540,13 @@ var
   hfo :HFONT;
   tm  :TTEXTMETRIC;
   size:TSIZE;
+  tmp :pWideChar;
 begin
   dc:=GetDC(wnd);
   hfo:=SelectObject(dc,SendMessage(wnd,WM_GETFONT,0,0));
   GetTextMetrics(dc,tm);
-  GetTextExtentPoint32(dc,'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz',52,size);
+  tmp:='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz';
+  GetTextExtentPoint32W(dc,tmp,52,size);
   SelectObject(dc,hfo);
   ReleaseDC(wnd,dc);
   baseUnitX:=(size.cx div 26+1) div 2;
-- 
cgit v1.2.3