Clist_mw & Clist_modern renamed

git-svn-id: http://svn.miranda-ng.org/main/trunk@455 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 0 insertions, 4863 deletions

diff --git a/plugins/Modernb/modern_skinengine.cpp b/plugins/Modernb/modern_skinengine.cpp
deleted file mode 100644
index 487285304e..0000000000
--- a/plugins/Modernb/modern_skinengine.cpp
+++ /dev/null
@@ -1,4863 +0,0 @@
-/*

-

-Miranda IM: the free IM client for Microsoft* Windows*

-

-Copyright 2000-2008 Miranda ICQ/IM project, 

-all portions of this codebase are copyrighted to the people 

-listed in contributors.txt.

-

-This program is free software; you can redistribute it and/or

-modify it under the terms of the GNU General Public License

-as published by the Free Software Foundation; either version 2

-of the License, or (at your option) any later version.

-

-This program is distributed in the hope that it will be useful,

-but WITHOUT ANY WARRANTY; without even the implied warranty of

-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

-GNU General Public License for more details.

-

-You should have received a copy of the GNU General Public License

-along with this program; if not, write to the Free Software

-Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

-*/

-

-//Include 

-#include "hdr/modern_commonheaders.h"

-#include <m_png.h> 

-#include "m_api/m_skin_eng.h"

-#include "hdr/modern_skinselector.h"

-#include "hdr/modern_cluiframes.h"

-

-#define _EFFECTENUM_FULL_H

-#include "hdr/modern_effectenum.h"

-#undef _EFFECTENUM_FULL_H

-

-#include "hdr/modern_skinengine.h"

-#include "hdr/modern_commonprototypes.h"

-#include <shlwapi.h>

-#include "hdr/modern_sync.h"

-//Implementation

-

-/* Global variables */

-

-SKINOBJECTSLIST g_SkinObjectList={0};

-CURRWNDIMAGEDATA * g_pCachedWindow=NULL;

-

-BOOL (WINAPI *g_proc_UpdateLayeredWindow)(HWND,HDC,POINT*,SIZE*,HDC,POINT*,COLORREF,BLENDFUNCTION*,DWORD);

-

-BOOL    g_flag_bPostWasCanceled =FALSE;

-BOOL	g_flag_bFullRepaint     =FALSE;

-BOOL    g_mutex_bLockUpdating   =FALSE;

-

-SortedList * gl_plGlyphTexts=NULL;

-SortedList * gl_plSkinFonts =NULL;

-

-/* Private module variables */

-

-static HANDLE  hSkinLoadedEvent;

-

-static GLYPHIMAGE * pLoadedImages=NULL;

-static DWORD        dwLoadedImagesCount=0;

-static DWORD        dwLoadedImagesAlocated=0;

-

-static BOOL flag_bUpdateQueued=FALSE;

-static BOOL	flag_bJustDrawNonFramedObjects=FALSE;

-static BOOL mutex_bLockUpdate=FALSE;

-

-static SortedList       * pEffectStack=NULL;

-static SKINOBJECTSLIST  * pCurrentSkin=NULL;

-static char            ** pszSettingName=NULL;

-static int                nArrayLen=0;

-static char             * iniCurrentSection=NULL;

-static char             * szFileName=NULL;

-

-static BYTE             pbGammaWeight[256]={0};

-static BYTE             pbGammaWeightAdv[256]={0};

-static BOOL             bGammaWeightFilled=FALSE;

-

-static CRITICAL_SECTION cs_SkinChanging={0};

-

-

-/* Private module procedures */

-static BOOL ske_GetMaskBit(BYTE *line, int x);

-static INT_PTR  ske_Service_AlphaTextOut(WPARAM wParam,LPARAM lParam);

-static INT_PTR ske_Service_DrawIconEx(WPARAM wParam,LPARAM lParam);

-

-static int  ske_AlphaTextOut (HDC hDC, LPCTSTR lpString, int nCount, RECT * lpRect, UINT format, DWORD ARGBcolor);

-static void ske_AddParseTextGlyphObject(char * szGlyphTextID,char * szDefineString,SKINOBJECTSLIST *Skin);

-static void ske_AddParseSkinFont(char * szFontID,char * szDefineString,SKINOBJECTSLIST *Skin);

-static int  ske_DeleteAllSettingInSection(char * SectionName);

-static int  ske_GetSkinFromDB(char * szSection, SKINOBJECTSLIST * Skin);

-static LPSKINOBJECTDESCRIPTOR ske_FindObject(const char * szName, BYTE objType,SKINOBJECTSLIST* Skin);

-static HBITMAP ske_LoadGlyphImageByDecoders(char * szFileName);

-static int  ske_LoadSkinFromResource(BOOL bOnlyObjects);

-static void ske_PreMultiplyChanells(HBITMAP hbmp,BYTE Mult);

-static int  ske_ValidateSingleFrameImage(FRAMEWND * Frame, BOOL SkipBkgBlitting);

-static INT_PTR ske_Service_UpdateFrameImage(WPARAM wParam, LPARAM lParam);

-static INT_PTR ske_Service_InvalidateFrameImage(WPARAM wParam, LPARAM lParam);

-static INT_PTR ske_Service_DrawTextWithEffect( WPARAM wParam, LPARAM lParam );

-

-//Decoders

-static HMODULE hImageDecoderModule;

-

-typedef  DWORD  (__stdcall *pfnImgNewDecoder)(void ** ppDecoder); 

-static pfnImgNewDecoder ImgNewDecoder;

-

-typedef DWORD (__stdcall *pfnImgDeleteDecoder)(void * pDecoder);

-static pfnImgDeleteDecoder ImgDeleteDecoder;

-

-typedef  DWORD  (__stdcall *pfnImgNewDIBFromFile)(LPVOID /*in*/pDecoder, LPCSTR /*in*/pFileName, LPVOID /*out*/*pImg);

-static pfnImgNewDIBFromFile ImgNewDIBFromFile;

-

-typedef DWORD (__stdcall *pfnImgDeleteDIBSection)(LPVOID /*in*/pImg);

-static pfnImgDeleteDIBSection ImgDeleteDIBSection;

-

-typedef DWORD (__stdcall *pfnImgGetHandle)(LPVOID /*in*/pImg, HBITMAP /*out*/*pBitmap, LPVOID /*out*/*ppDIBBits);

-static pfnImgGetHandle ImgGetHandle;    

-

-static MODERNEFFECT meCurrentEffect={-1,{0},0,0};

-

-

-//////////////////////////////////////////////////////////////////////////

-// Ini file parser

-//////////////////////////////////////////////////////////////////////////

-IniParser::IniParser( TCHAR * tcsFileName, BYTE flags ) : _Flags( flags )

-{

-	_DoInit();

-	if ( !tcsFileName ) return;

-

-	if ( tcsFileName[0] == _T('%') )

-	{

-		//TODO: Add parser of resource filename here

-		_LoadResourceIni( g_hInst, MAKEINTRESOURCEA(IDR_MSF_DEFAULT_SKIN), "MSF");

-		return;

-	}

-

-	_hFile = _tfopen( tcsFileName, _T("r") );

-

-	if ( _hFile != NULL )

-	{

-		_eType = IT_FILE;

-		_isValid = true;

-	}

-}

-

-IniParser::IniParser( HINSTANCE hInst, const char *  resourceName, const char * resourceType, BYTE flags ) : _Flags( flags )

-{

-	_DoInit();

-	_LoadResourceIni( hInst, resourceName, resourceType );

-}

-

-IniParser::~IniParser()

-{

-	if ( _szSection ) mir_free( _szSection ); 

-	if ( _hFile ) fclose( _hFile ); 

-	if ( _hGlobalRes ) 

-	{

-		UnlockResource( _hGlobalRes ); 

-		FreeResource(_hGlobalRes);	

-	}

-

-	_szSection = NULL;

-	_hGlobalRes = NULL;

-	_hFile = NULL;

-	_isValid = false;

-	_eType = IT_UNKNOWN;

-}

-

-HRESULT IniParser::Parse( ParserCallback_t pLineCallBackProc, LPARAM SecCheck )

-{

-	if ( _isValid && pLineCallBackProc )

-	{	

-		_pLineCallBackProc = pLineCallBackProc;

-		_SecCheck = SecCheck;

-		switch ( _eType )

-		{

-		case IT_FILE:

-			return _DoParseFile();

-		case IT_RESOURCE:

-			return _DoParseResource();

-		}

-	}

-	return E_FAIL;

-}

-

-

-HRESULT IniParser::WriteStrToDb( const char * szSection, const char * szName, const char * szValue, IniParser * This )

-{

-	if ( This->_SecCheck)

-	{

-		//TODO check security here

-		if ( wildcmp( szSection,"Skin_Description_Section",1 ) ) return S_OK;

-	}

-	if ( ( This->_Flags == IniParser::FLAG_ONLY_OBJECTS ) && !wildcmp( szSection, DEFAULTSKINSECTION,1 ) )

-		return S_OK;					 // skip not objects

-

-

-//	if ( strlen(szValue)>0 && szValue[strlen(szValue)-1]=='\n' ) 

-//		szValue[strlen(szValue)-1]='\0';  //kill linefeed at the end  

-

-	switch(szValue[0]) 

-	{

-	case 'b':

-		{

-			BYTE P;

-			P=(BYTE)atoi(szValue+1);

-			ModernWriteSettingByte(NULL,szSection,szName,P);

-		}

-		break;

-	case 'w':

-		{

-			WORD P;

-			P=(WORD)atoi(szValue+1);

-			ModernWriteSettingWord(NULL,szSection,szName,P);

-		}

-		break;

-	case 'd':

-		{

-			DWORD P;

-			P=(DWORD)atoi(szValue+1);

-			ModernWriteSettingDword(NULL,szSection,szName,P);

-		}

-		break;

-	case 's':

-		ModernWriteSettingString(NULL,szSection,szName,szValue+1);

-		break;

-	case 'f':

-		if (szFileName)

-		{

-			char fn[MAX_PATH]={0};

-			char bb[MAX_PATH*2]={0};

-			int pp, i;

-			pp=-1;

-			CallService(MS_UTILS_PATHTORELATIVE, (WPARAM)szFileName, (LPARAM)fn);

-			{

-				for (i=strlen(fn); i>=0; i--)  if (fn[i]=='.') break;

-				if (i>0) fn[i]='\0';

-			}                      

-			_snprintf(bb,SIZEOF(bb),"%s\\%s",fn,szValue+1);

-			ModernWriteSettingString(NULL,szSection,szName,bb);

-		}

-		break;

-	}

-	return S_OK;

-}

-int IniParser::GetSkinFolder( IN const TCHAR * szFileName, OUT TCHAR * pszFolderName )

-{

-	TCHAR *pszPos;   

-	TCHAR *szBuff;

-

-	szBuff = mir_tstrdup( szFileName );

-	pszPos = szBuff + _tcslen( szBuff );

-	while ( pszPos > szBuff && *pszPos!= _T('.') ) { pszPos--; }

-	*pszPos=_T('\0');

-	_tcscpy( pszFolderName, szBuff );

-

-	TCHAR custom_folder[MAX_PATH];

-	TCHAR cus[MAX_PATH];

-	TCHAR *b3;

-	_tcscpy( custom_folder, pszFolderName );

-	b3=custom_folder + _tcslen( custom_folder );

-	while ( b3 > custom_folder && *b3!= _T('\\') ) { b3--; }

-	*b3=_T('\0');

-

-	GetPrivateProfileString(_T("Skin_Description_Section"),_T("SkinFolder"),_T(""),cus,SIZEOF(custom_folder),szFileName);

-	if ( cus && _tcslen(cus)>0)

-		_sntprintf(pszFolderName,MAX_PATH,_T("%s\\%s"),custom_folder,cus);

-

-	mir_free_and_nill(szBuff);

-	CallService(MS_UTILS_PATHTORELATIVET, (WPARAM)pszFolderName, (LPARAM)pszFolderName);

-

-	return 0;

-}

-void IniParser::_DoInit()

-{

-	_isValid	 = false;

-	_eType		 = IT_UNKNOWN; 

-	_szSection	 = NULL;

-	_hFile		 = NULL;

-	_hGlobalRes  = NULL;

-	_dwSizeOfRes = 0;

-	_pPosition   = NULL;

-	_pLineCallBackProc = NULL;

-	_SecCheck		 = 0;

-

-}

-

-void IniParser::_LoadResourceIni( HINSTANCE hInst,  const char *  resourceName, const char * resourceType )

-{

-

-	if ( _eType != IT_UNKNOWN ) return;

-

-	HRSRC hRSrc = FindResourceA( hInst, resourceName, resourceType );

-	if ( !hRSrc ) return;

-

-	_hGlobalRes=LoadResource( hInst, hRSrc );

-	if ( !_hGlobalRes ) return;

-

-	_dwSizeOfRes = SizeofResource( hInst, hRSrc );

-	_pPosition =(char*) LockResource( _hGlobalRes );

-

-	_isValid = true;

-	_eType	 = IT_RESOURCE;

-

-}

-

-

-

-HRESULT IniParser::_DoParseFile()

-{

-	char szLine[MAX_LINE_LEN];

-	_nLine = 0;

-	while ( fgets( szLine, SIZEOF(szLine), _hFile ) != NULL )

-	{	

-		size_t len = 0;

-		char * pLine = (char*)_RemoveTailings( szLine, len );

-		if ( len > 0 )

-		{

-			pLine[len]='\0';

-			if ( !_DoParseLine( pLine ) )	return E_FAIL;

-		}

-		else

-			_nLine++;

-	};

-

-	return S_OK;

-}

-

-HRESULT IniParser::_DoParseResource()

-{

-	_nLine = 0;

-	char szLine[MAX_LINE_LEN];

-	char * pos = ( char* ) _pPosition;

-

-	while ( pos < _pPosition + _dwSizeOfRes )

-	{

-		int i=0;

-		while ( pos < _pPosition + _dwSizeOfRes && *pos != '\n' && *pos!= '\0' && i < MAX_LINE_LEN - 1 )

-		{

-			if ( (*pos) != '\r' ) 

-				szLine[ i++ ] = *pos;

-			pos++;

-		}

-		szLine[ i ]='\0';

-		pos++;

-		

-		size_t len = 0;

-		char * pLine = (char*) _RemoveTailings( szLine, len );

-		if ( len > 0 )

-		{

-			pLine[len]='\0';

-			if ( !_DoParseLine( pLine ) )	return E_FAIL;

-		}

-		else

-			_nLine++;

-	}

-	return S_OK;

-}

-

-const char * IniParser::_RemoveTailings( const char * szLine, size_t& len )

-{

-	const char * pStart = szLine;

-	while( *pStart == ' ' || *pStart=='\t' ) pStart++; //skip spaces at begin

-	const char * pEnd = pStart + strlen( pStart );

-	while( pEnd > pStart && ( *pEnd == ' ' || *pEnd == '\t' || *pEnd == '\n' || *pEnd == '\r' ) ) pEnd--;

-

-	len = pEnd - pStart;

-	return pStart;

-}

-

-BOOL IniParser::_DoParseLine( char * szLine )

-{

-	_nLine++;

-	DWORD len = strlen( szLine );

-

-	if ( len == 0 )	return TRUE;

-

-	switch( szLine[0] )

-	{

-	case ';':

-		return TRUE; // start of comment is found

-	case '[':

-		{

-			//New section start here

-			if ( _szSection ) mir_free( _szSection );

-			_szSection = NULL;

-

-			char *tbuf = szLine + 1;	// skip [

-	

-			char *ebuf= tbuf;

-

-			while ( *ebuf != ']' && *ebuf !='\0' ) ebuf++;

-			if ( *ebuf == '\0' ) 

-				return FALSE; // no close bracket

-	

-			DWORD sectionLen = ebuf - tbuf;

-			_szSection = (char*) mir_alloc( sectionLen + 1 );

-			strncpy( _szSection, tbuf, sectionLen );

-			_szSection[sectionLen]='\0';

-		}

-		return TRUE;

-

-	default:

-		if ( !_szSection ) 

-			return TRUE;  //param found out of section

-

-		char *keyName=szLine;

-		char *keyValue=szLine;

-

-		DWORD eqPlace=0;

-		DWORD len2=strlen(keyName);

-

-		while ( eqPlace < len2 && keyName[ eqPlace ] != '=' ) 

-			eqPlace++; //find '='

-

-		if (eqPlace==0 || eqPlace==len2) 

-			return TRUE; //= not found or no key name //say false

-

-		keyName[eqPlace] = '\0';

-

-		keyValue = keyName + eqPlace + 1;

-

-		//remove tail spaces in Name

-		{

-			DWORD len3=strlen(keyName);

-			int j=len3-1;

-			while (j>0 && (keyName[j]==' ' || keyName[j]=='\t')) j--;

-			if (j>=0) keyName[j+1]='\0';

-		}		

-		//remove start spaces in Value

-		{

-			DWORD len3=strlen(keyValue);

-			DWORD j=0;

-			while (j<len3 && (keyValue[j]==' ' || keyValue[j]=='\t')) j++;

-			if (j<len3) keyValue+=j;

-		}

-		//remove tail spaces in Value

-		{

-			DWORD len3=strlen(keyValue);

-			int j=len3-1;

-			while (j>0 && (keyValue[j]==' ' || keyValue[j]=='\t' || keyValue[j]=='\n')) j--;

-			if (j>=0) keyValue[j+1]='\0';

-		}

-		_pLineCallBackProc( _szSection, keyName, keyValue, this );

-	}

-	return TRUE;

-}

-//////////////////////////////////////////////////////////////////////////

-// End of IniParser

-//////////////////////////////////////////////////////////////////////////

-

-HRESULT SkinEngineLoadModule()

-{

-	ModernSkinButtonLoadModule();

-	InitializeCriticalSection(&cs_SkinChanging);

-	MainModernMaskList=(LISTMODERNMASK*)mir_calloc(sizeof(LISTMODERNMASK));

-	//init variables

-	g_SkinObjectList.dwObjLPAlocated=0;

-	g_SkinObjectList.dwObjLPReserved=0;

-	g_SkinObjectList.pObjects=NULL;

-	// Initialize GDI+

-	InitGdiPlus();

-	AniAva_InitModule();

-	//load decoder

-	hImageDecoderModule=NULL;

-	if (g_CluiData.fGDIPlusFail)

-	{

-		hImageDecoderModule = LoadLibrary(TEXT("ImgDecoder.dll"));

-		if (hImageDecoderModule==NULL) 

-		{

-			char tDllPath[ MAX_PATH ];

-			GetModuleFileNameA( g_hInst, tDllPath, sizeof( tDllPath ));

-			{

-				char* p = strrchr( tDllPath, '\\' );

-				if ( p != NULL )

-					strcpy( p+1, "ImgDecoder.dll" );

-				else

-				{

-					strcpy( tDllPath, "ImgDecoder.dll" );

-				}

-			}

-

-			hImageDecoderModule = LoadLibraryA(tDllPath);

-		}

-		if (hImageDecoderModule!=NULL) 

-		{

-			ImgNewDecoder=(pfnImgNewDecoder )GetProcAddress( hImageDecoderModule, "ImgNewDecoder");

-			ImgDeleteDecoder=(pfnImgDeleteDecoder )GetProcAddress( hImageDecoderModule, "ImgDeleteDecoder");

-			ImgNewDIBFromFile=(pfnImgNewDIBFromFile)GetProcAddress( hImageDecoderModule, "ImgNewDIBFromFile");

-			ImgDeleteDIBSection=(pfnImgDeleteDIBSection)GetProcAddress( hImageDecoderModule, "ImgDeleteDIBSection");

-			ImgGetHandle=(pfnImgGetHandle)GetProcAddress( hImageDecoderModule, "ImgGetHandle");

-		}

-	}

-	//create services

-	CreateServiceFunction(MS_SKIN_DRAWGLYPH,ske_Service_DrawGlyph);

-	CreateServiceFunction(MS_SKINENG_UPTATEFRAMEIMAGE,ske_Service_UpdateFrameImage);

-	CreateServiceFunction(MS_SKINENG_INVALIDATEFRAMEIMAGE,ske_Service_InvalidateFrameImage);

-	CreateServiceFunction(MS_SKINENG_ALPHATEXTOUT,ske_Service_AlphaTextOut);    

-	CreateServiceFunction(MS_SKINENG_DRAWICONEXFIX,ske_Service_DrawIconEx);

-

-    CreateServiceFunction(MS_DRAW_TEXT_WITH_EFFECT,ske_Service_DrawTextWithEffect);

-

-	//create event handle

-	hSkinLoadedEvent=ModernHookEvent(ME_SKIN_SERVICESCREATED,CLUI_OnSkinLoad);

-	NotifyEventHooks(g_CluiData.hEventSkinServicesCreated,0,0);

-	return S_OK;

-}

-

-int SkinEngineUnloadModule()

-{

-	//unload services

-	ModernUnhookEvent(hSkinLoadedEvent);

-	ModernSkinButtonUnloadModule(0,0);

-	ske_UnloadSkin(&g_SkinObjectList);

-	if (g_SkinObjectList.pObjects) 

-		mir_free_and_nill(g_SkinObjectList.pObjects);

-	if (g_SkinObjectList.pMaskList) 

-		mir_free_and_nill(g_SkinObjectList.pMaskList);

-	if (MainModernMaskList)

-		mir_free_and_nill(MainModernMaskList);

-	if (pEffectStack)

-	{

-		int i;

-		for (i=0; i<pEffectStack->realCount; i++)

-			if (pEffectStack->items[i])

-			{

-				EFFECTSSTACKITEM * effect=(EFFECTSSTACKITEM*)(pEffectStack->items[i]);

-				mir_free_and_nill(effect);

-			}

-			li.List_Destroy(pEffectStack);

-			mir_free_and_nill(pEffectStack);

-	}

-	if (g_pCachedWindow)

-	{

-		SelectObject(g_pCachedWindow->hBackDC,g_pCachedWindow->hBackOld);

-		SelectObject(g_pCachedWindow->hImageDC,g_pCachedWindow->hImageOld);

-		DeleteObject(g_pCachedWindow->hBackDIB);

-		DeleteObject(g_pCachedWindow->hImageDIB);

-		mod_DeleteDC(g_pCachedWindow->hBackDC);

-		mod_DeleteDC(g_pCachedWindow->hImageDC);

-		ReleaseDC(NULL,g_pCachedWindow->hScreenDC);

-		mir_free_and_nill(g_pCachedWindow);

-		g_pCachedWindow=NULL;

-	}

-	DeleteCriticalSection(&cs_SkinChanging);

-	GdiFlush();

-	DestroyServiceFunction((HANDLE)MS_SKIN_REGISTEROBJECT);

-	DestroyServiceFunction((HANDLE)MS_SKIN_DRAWGLYPH);

-	DestroyHookableEvent(g_CluiData.hEventSkinServicesCreated);

-	if (hImageDecoderModule) FreeLibrary(hImageDecoderModule);

-	AniAva_UnloadModule();

-	ShutdownGdiPlus();

-	//free variables

-	return 1;

-}

-

-

-

-BOOL ske_AlphaBlend(HDC hdcDest,int nXOriginDest,int nYOriginDest,int nWidthDest,int nHeightDest,HDC hdcSrc,int nXOriginSrc,int nYOriginSrc,int nWidthSrc,int nHeightSrc,BLENDFUNCTION blendFunction)

-{

-	if (g_CluiData.fDisableSkinEngine && !(!g_CluiData.fGDIPlusFail && blendFunction.BlendFlags&128))

-	{

-		if (nWidthDest!=nWidthSrc || nHeightDest!=nHeightSrc) 

-			return StretchBlt(hdcDest,nXOriginDest,nYOriginDest,nWidthDest,nHeightDest,hdcSrc,nXOriginSrc,nYOriginSrc,nWidthSrc,nHeightSrc, SRCCOPY);

-		else

-			return BitBlt(hdcDest,nXOriginDest,nYOriginDest,nWidthDest,nHeightDest,hdcSrc,nXOriginSrc,nYOriginSrc, SRCCOPY);

-	}

-

-	if (!g_CluiData.fGDIPlusFail && blendFunction.BlendFlags&128 ) //Use gdi+ engine

-	{

-		return GDIPlus_AlphaBlend( hdcDest,nXOriginDest,nYOriginDest,nWidthDest,nHeightDest,

-			hdcSrc,nXOriginSrc,nYOriginSrc,nWidthSrc,nHeightSrc,

-			&blendFunction);

-	}

-	blendFunction.BlendFlags&=~128;

-	return AlphaBlend(hdcDest,nXOriginDest,nYOriginDest,nWidthDest,nHeightDest,hdcSrc,nXOriginSrc,nYOriginSrc,nWidthSrc,nHeightSrc,blendFunction);

-}

-

-

-static int ske_LockSkin()

-{

-	EnterCriticalSection(&cs_SkinChanging);

-	return 0;

-}

-static int ske_UnlockSkin()

-{

-	LeaveCriticalSection(&cs_SkinChanging);

-	return 0;

-}

-

-typedef struct _tagDCBuffer

-{

-	HDC hdcOwnedBy;

-	int nUsageID;

-	int width;

-	int height;

-	void* pImage;

-	HDC hDC;

-	HBITMAP oldBitmap;

-	HBITMAP hBitmap;

-	DWORD dwDestroyAfterTime;

-}DCBUFFER;

-CRITICAL_SECTION BufferListCS={0};

-

-SortedList * BufferList=NULL;

-enum

-{

-	BUFFER_DRAWICON=0,

-	BUFFER_DRAWIMAGE

-};

-

-int SortBufferList(void* it1, void * it2)

-{

-	DCBUFFER * buf1=(DCBUFFER *)it1;

-	DCBUFFER * buf2=(DCBUFFER *)it2;

-	if (buf1->hdcOwnedBy!=buf2->hdcOwnedBy) return (int)(buf1->hdcOwnedBy < buf2->hdcOwnedBy);

-	else if (buf1->nUsageID!=buf2->nUsageID) return (int) (buf1->nUsageID < buf2->nUsageID);

-	else return (int) (buf1->hDC < buf2->hDC);

-}

-

-HDC ske_RequestBufferDC(HDC hdcOwner, int dcID, int width, int height, BOOL fClear)

-{

-	DCBUFFER buf;

-	DCBUFFER * pBuf;

-	if (BufferList==NULL)

-	{

-		BufferList=li.List_Create(0,2);

-		BufferList->sortFunc=SortBufferList;

-		InitializeCriticalSection(&BufferListCS);

-	}

-	EnterCriticalSection(&BufferListCS);

-	//Try to find DC in buffer list	

-	buf.hdcOwnedBy=hdcOwner;

-	buf.nUsageID=dcID;

-	buf.hDC=NULL;

-	pBuf=(DCBUFFER*)li.List_Find(BufferList,(void*)&buf);

-	if (!pBuf)

-	{

-		//if not found - allocate it

-		pBuf=(DCBUFFER *)mir_alloc(sizeof(DCBUFFER));

-		*pBuf=buf;

-		pBuf->width=width;

-		pBuf->height=height;

-		pBuf->hBitmap=ske_CreateDIB32Point(width,height,&(pBuf->pImage));

-		pBuf->hDC=CreateCompatibleDC(hdcOwner);

-		pBuf->oldBitmap=(HBITMAP)SelectObject(pBuf->hDC,pBuf->hBitmap);

-		pBuf->dwDestroyAfterTime=0;

-		li.List_InsertPtr(BufferList,pBuf);		

-	}

-	else 

-	{

-		if (pBuf->width!=width || pBuf->height!=height)

-		{

-			//resize

-			SelectObject(pBuf->hDC,pBuf->oldBitmap);

-			DeleteObject(pBuf->hBitmap);

-			pBuf->width=width;

-			pBuf->height=height;

-			pBuf->hBitmap=ske_CreateDIB32Point(width,height,&(pBuf->pImage));

-			pBuf->oldBitmap=(HBITMAP)SelectObject(pBuf->hDC,pBuf->hBitmap);

-		}  else	if (fClear)

-			memset(pBuf->pImage,0,width*height*sizeof(DWORD));

-	}

-	pBuf->dwDestroyAfterTime=0;

-	LeaveCriticalSection(&BufferListCS);

-	return pBuf->hDC;

-}

-

-int ske_ReleaseBufferDC(HDC hDC, int keepTime)

-{

-	DWORD dwCurrentTime=GetTickCount();

-	DCBUFFER * pBuf=NULL;

-	//Try to find DC in buffer list - set flag to be release after time;

-	int i=0;

-	EnterCriticalSection(&BufferListCS);

-	for (i=0; i<BufferList->realCount; i++)

-	{

-		pBuf=(DCBUFFER *)BufferList->items[i];

-		if (pBuf)

-		{

-			if (hDC!=NULL && pBuf->hDC==hDC)

-			{

-				pBuf->dwDestroyAfterTime=dwCurrentTime+keepTime;

-				break;

-			}

-			else  

-			{

-				if ((pBuf->dwDestroyAfterTime && pBuf->dwDestroyAfterTime < dwCurrentTime) || keepTime==-1)

-				{

-					SelectObject(pBuf->hDC,pBuf->oldBitmap);

-					DeleteObject(pBuf->hBitmap);

-					DeleteDC(pBuf->hDC);

-					mir_free(pBuf);

-					li.List_Remove(BufferList,i);

-					i--;

-				}

-			}

-		}

-	}

-	LeaveCriticalSection(&BufferListCS);

-	return 0;

-}

-

-BOOL ske_SetRgnOpaque(HDC memdc,HRGN hrgn, BOOL force)

-{

-	RGNDATA * rdata;

-	DWORD rgnsz;

-	DWORD d;

-	RECT * rect;

-	if (g_CluiData.fDisableSkinEngine && !force) return TRUE;

-	rgnsz=GetRegionData(hrgn,0,NULL);

-	rdata=(RGNDATA *) mir_alloc(rgnsz);

-	GetRegionData(hrgn,rgnsz,rdata);

-	rect=(RECT *)rdata->Buffer;

-	for (d=0; d<rdata->rdh.nCount; d++)

-	{

-		ske_SetRectOpaque(memdc,&rect[d], force);

-	}

-	mir_free_and_nill(rdata);

-	return TRUE;

-}

-

-

-BOOL ske_SetRectOpaque(HDC memdc,RECT *fr, BOOL force)

-{

-	int f=0;

-	BYTE * bits;

-	BITMAP bmp;

-	HBITMAP hbmp;

-

-	if ( g_CluiData.fDisableSkinEngine && !force ) 

-		return TRUE;

-

-	hbmp=(HBITMAP)GetCurrentObject( memdc,OBJ_BITMAP );  

-	GetObject( hbmp, sizeof(bmp), &bmp );

-

-	if ( bmp.bmPlanes != 1 )

-		return FALSE;

-	

-	if (!bmp.bmBits)

-	{

-		f=1;

-		bits=(BYTE*)malloc(bmp.bmWidthBytes*bmp.bmHeight);

-		GetBitmapBits(hbmp,bmp.bmWidthBytes*bmp.bmHeight,bits);

-	}

-	else

-		bits=(BYTE*)bmp.bmBits;

-

-	int sx =( fr->left > 0 ) ? fr->left : 0;

-	int sy =( fr->top > 0 ) ? fr->top : 0;

-	int ex =( fr->right < bmp.bmWidth ) ? fr->right : bmp.bmWidth;

-	int ey =( fr->bottom<bmp.bmHeight) ? fr->bottom : bmp.bmHeight;

-

-	int width=ex-sx;

-	

-	BYTE* pLine = ((BYTE*)bits) + (bmp.bmHeight-sy-1)*bmp.bmWidthBytes + (sx << 2) + 3;

-	for ( int y = 0; y < (ey - sy); y++ )

-	{	

-		BYTE * pColumn = pLine;

-		for ( int x = 0; x < width; x++ )

-		{	

-			*pColumn = 255; 

-			pColumn += 4;

-		}

-		pLine -= bmp.bmWidthBytes;

-	}

-	if (f)

-	{

-		SetBitmapBits(hbmp,bmp.bmWidthBytes*bmp.bmHeight,bits);    

-		free(bits);

-	}

-	// DeleteObject(hbmp);

-	return 1;

-}

-

-static BOOL ske_SkinFillRectByGlyph(HDC hDest, HDC hSource, RECT * rFill, RECT * rGlyph, RECT * rClip, BYTE mode, BYTE drawMode, int depth)

-{

-	int destw=0, desth=0;

-	int xstart=0, xmax=0;

-	int ystart=0, ymax=0;

-	BLENDFUNCTION bfa={AC_SRC_OVER, 0, 255, AC_SRC_ALPHA }; 

-	BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, AC_SRC_ALPHA }; 

-

-	//initializations

-	if (mode==FM_STRETCH)

-	{

-		HDC mem2dc;

-		HBITMAP mem2bmp, oldbmp;

-		RECT wr;

-		IntersectRect(&wr,rClip,rFill);

-		if ((wr.bottom-wr.top)*(wr.right-wr.left)==0) return 0;       

-		if (drawMode!=2)

-		{

-			mem2dc=CreateCompatibleDC(hDest);

-			mem2bmp=ske_CreateDIB32(wr.right-wr.left,wr.bottom-wr.top);

-			oldbmp=(HBITMAP)SelectObject(mem2dc,mem2bmp);

-

-		}

-

-		if (drawMode==0 || drawMode==2)

-		{

-			if (drawMode==0)

-			{

-				ske_AlphaBlend(mem2dc,rFill->left-wr.left,rFill->top-wr.top,rFill->right-rFill->left,rFill->bottom-rFill->top,

-					hSource,rGlyph->left,rGlyph->top,rGlyph->right-rGlyph->left,rGlyph->bottom-rGlyph->top,bf);

-				ske_AlphaBlend(hDest,wr.left,wr.top,wr.right-wr.left, wr.bottom -wr.top,mem2dc,0,0,wr.right-wr.left, wr.bottom -wr.top,bf);

-			}

-			else 

-			{

-				ske_AlphaBlend(hDest,rFill->left,rFill->top,rFill->right-rFill->left,rFill->bottom-rFill->top,

-					hSource,rGlyph->left,rGlyph->top,rGlyph->right-rGlyph->left,rGlyph->bottom-rGlyph->top,bf);

-

-			}

-		}

-		else

-		{

-			//            BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, 0 };

-			ske_AlphaBlend(mem2dc,rFill->left-wr.left,rFill->top-wr.top,rFill->right-rFill->left,rFill->bottom-rFill->top,

-				hSource,rGlyph->left,rGlyph->top,rGlyph->right-rGlyph->left,rGlyph->bottom-rGlyph->top,bf); 

-			ske_AlphaBlend(hDest,wr.left,wr.top,wr.right-wr.left, wr.bottom -wr.top,mem2dc,0,0,wr.right-wr.left, wr.bottom -wr.top,bf);

-		}

-		if (drawMode!=2)

-		{

-			SelectObject(mem2dc,oldbmp);

-			DeleteObject(mem2bmp);

-			mod_DeleteDC(mem2dc);

-		}

-		return 1;

-	}

-	else if (mode==FM_TILE_VERT && (rGlyph->bottom-rGlyph->top>0)&& (rGlyph->right-rGlyph->left>0))

-	{

-		HDC mem2dc;

-		HBITMAP mem2bmp,oldbmp;

-		RECT wr;

-		IntersectRect(&wr,rClip,rFill);

-		if ((wr.bottom-wr.top)*(wr.right-wr.left)==0) return 0;

-		mem2dc=CreateCompatibleDC(hDest);

-		//SetStretchBltMode(mem2dc, HALFTONE);

-		mem2bmp=ske_CreateDIB32(wr.right-wr.left, rGlyph->bottom-rGlyph->top);

-		oldbmp=(HBITMAP)SelectObject(mem2dc,mem2bmp);

-		if (!oldbmp) 

-			return 0;

-

-		/// draw here

-		{

-			int  y=0, sy=0, maxy=0;

-			int w=rFill->right-rFill->left;

-			int h=rGlyph->bottom-rGlyph->top;

-			if (h>0 && (wr.bottom-wr.top)*(wr.right-wr.left)!=0)

-			{

-				w=wr.right-wr.left;

-				{

-					//                   BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, 0 };

-					ske_AlphaBlend(mem2dc,-(wr.left-rFill->left),0,rFill->right-rFill->left,h,hSource,rGlyph->left,rGlyph->top,rGlyph->right-rGlyph->left,h,bf);

-					//StretchBlt(mem2dc,-(wr.left-rFill->left),0,rFill->right-rFill->left,h,hSource,rGlyph->left,rGlyph->top,rGlyph->right-rGlyph->left,h,SRCCOPY);

-				}

-				if (drawMode==0 || drawMode==2)

-				{

-					if (drawMode==0 )

-					{

-

-						int dy;

-						dy=(wr.top-rFill->top)%h;

-						if (dy>=0)

-						{

-							int ht;

-							y=wr.top;

-							ht=(y+h-dy<=wr.bottom)?(h-dy):(wr.bottom-wr.top);

-							BitBlt(hDest,wr.left,y,w,ht,mem2dc,0,dy,SRCCOPY);

-						}

-

-						y=wr.top+h-dy;

-						while (y<wr.bottom-h){

-							BitBlt(hDest,wr.left,y,w,h,mem2dc,0,0,SRCCOPY);

-							y+=h;

-						}

-						if (y<=wr.bottom)

-							BitBlt(hDest,wr.left,y,w,wr.bottom-y, mem2dc,0,0,SRCCOPY);                                            

-

-					}

-					else 

-					{  

-						y=wr.top;

-						while (y<wr.bottom-h)

-						{

-							//                             BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, 0 };

-							ske_AlphaBlend(hDest,wr.left,y,w,h, mem2dc,0,0,w,h,bf);                    

-							y+=h;

-						}

-						if (y<=wr.bottom)

-						{

-							//                           BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, 0 };

-							ske_AlphaBlend(hDest,wr.left,y,w,wr.bottom-y, mem2dc,0,0,w,wr.bottom-y,bf);                                            

-						}

-					}

-

-				}

-				else

-				{

-					int dy;

-

-					BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, AC_SRC_ALPHA };

-

-					dy=(wr.top-rFill->top)%h;

-

-					if (dy>=0)

-					{

-						int ht;

-						y=wr.top;

-						ht=(y+h-dy<=wr.bottom)?(h-dy):(wr.bottom-wr.top);

-						ske_AlphaBlend(hDest,wr.left,y,w,ht,mem2dc,0,dy,w,ht,bf);

-					}

-

-					y=wr.top+h-dy;

-					while (y<wr.bottom-h)

-					{

-						ske_AlphaBlend(hDest,wr.left,y,w,h,mem2dc,0,0,w,h,bf);

-						y+=h;

-					}

-					if (y<=wr.bottom)

-						ske_AlphaBlend(hDest,wr.left,y,w,wr.bottom-y, mem2dc,0,0,w,wr.bottom-y,bf);

-				}

-			}

-		}

-		SelectObject(mem2dc,oldbmp);

-		DeleteObject(mem2bmp);

-		mod_DeleteDC(mem2dc);

-	}

-	else if (mode==FM_TILE_HORZ && (rGlyph->right-rGlyph->left>0)&& (rGlyph->bottom-rGlyph->top>0)&&(rFill->bottom-rFill->top)>0 && (rFill->right-rFill->left)>0)

-	{

-		HDC mem2dc;

-		RECT wr;

-		HBITMAP mem2bmp,oldbmp;

-		int w=rGlyph->right-rGlyph->left;

-		int h=rFill->bottom-rFill->top;

-		IntersectRect(&wr,rClip,rFill);

-		if ((wr.bottom-wr.top)*(wr.right-wr.left)==0) return 0;

-		h=wr.bottom-wr.top;

-		mem2dc=CreateCompatibleDC(hDest);

-

-		mem2bmp=ske_CreateDIB32(w,h);

-		oldbmp=(HBITMAP)SelectObject(mem2dc,mem2bmp);

-

-		if (!oldbmp)

-			return 0;

-		/// draw here

-		{

-			int  x=0, sy=0, maxy=0;

-			{

-				//SetStretchBltMode(mem2dc, HALFTONE);

-				//StretchBlt(mem2dc,0,0,w,h,hSource,rGlyph->left+(wr.left-rFill->left),rGlyph->top,w,h,SRCCOPY);

-

-				//                    BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, 0 };

-				ske_AlphaBlend(mem2dc,0,-(wr.top-rFill->top),w,rFill->bottom-rFill->top,hSource,rGlyph->left,rGlyph->top,w,rGlyph->bottom-rGlyph->top,bf);

-				if (drawMode==0 || drawMode==2)

-				{

-					if (drawMode==0)

-					{

-

-						int dx;

-						dx=(wr.left-rFill->left)%w;

-						if (dx>=0)

-						{   

-							int wt;

-							x=wr.left;

-							wt=(x+w-dx<=wr.right)?(w-dx):(wr.right-wr.left);                                                   

-							BitBlt(hDest,x,wr.top,wt,h,mem2dc,dx,0,SRCCOPY);

-						}

-						x=wr.left+w-dx;                        

-						while (x<wr.right-w){

-							BitBlt(hDest,x,wr.top,w,h,mem2dc,0,0,SRCCOPY);

-							x+=w;

-						}

-						if (x<=wr.right)

-						BitBlt(hDest,x,wr.top,wr.right-x,h, mem2dc,0,0,SRCCOPY);  

-					}

-					else 

-					{

-						int dx;

-						dx=(wr.left-rFill->left)%w;

-						x=wr.left-dx;

-						while (x<wr.right-w){

-							ske_AlphaBlend(hDest,x,wr.top,w,h,mem2dc,0,0,w,h,bf);

-							x+=w;

-						}

-						if (x<=wr.right)

-							ske_AlphaBlend(hDest,x,wr.top,wr.right-x,h, mem2dc,0,0,wr.right-x,h,bf);

-					}

-

-				}

-				else

-				{

-					BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, AC_SRC_ALPHA };

-					int dx;

-					dx=(wr.left-rFill->left)%w;

-					if (dx>=0)

-					{

-						int wt;

-						x=wr.left;

-						wt=(x+w-dx<=wr.right)?(w-dx):(wr.right-wr.left); 

-						ske_AlphaBlend(hDest,x,wr.top,wt,h,mem2dc,dx,0,wt,h,bf);

-					}

-					x=wr.left+w-dx;

-					while (x<wr.right-w){

-						ske_AlphaBlend(hDest,x,wr.top,w,h,mem2dc,0,0,w,h,bf);

-						x+=w;

-					}

-					if (x<=wr.right)

-						ske_AlphaBlend(hDest,x,wr.top,wr.right-x,h, mem2dc,0,0,wr.right-x,h,bf);  

-

-				}

-			}

-		}

-		SelectObject(mem2dc,oldbmp);

-		DeleteObject(mem2bmp);

-		mod_DeleteDC(mem2dc);

-	}

-	else if (mode==FM_TILE_BOTH && (rGlyph->right-rGlyph->left>0) && (rGlyph->bottom-rGlyph->top>0))

-	{

-		HDC mem2dc;

-		int w=rGlyph->right-rGlyph->left;

-		int  x=0, sy=0, maxy=0;

-		int h=rFill->bottom-rFill->top;

-		HBITMAP mem2bmp,oldbmp;

-		RECT wr;

-		IntersectRect(&wr,rClip,rFill);

-		if ((wr.bottom-wr.top)*(wr.right-wr.left)==0) return 0;

-		mem2dc=CreateCompatibleDC(hDest);

-		mem2bmp=ske_CreateDIB32(w,wr.bottom-wr.top);

-		h=wr.bottom-wr.top;

-		oldbmp=(HBITMAP)SelectObject(mem2dc,mem2bmp);

-#ifdef _DEBUG

-		if (!oldbmp) 

-			(NULL,"Tile bitmap not selected","ERROR", MB_OK);

-#endif

-		/// draw here

-		{

-

-			//fill temp bitmap

-			{

-				int y;

-				int dy;

-				dy=(wr.top-rFill->top)%(rGlyph->bottom-rGlyph->top);

-				y=-dy;

-				while (y<wr.bottom-wr.top)

-				{

-

-					ske_AlphaBlend(mem2dc,0,y,w,rGlyph->bottom-rGlyph->top, hSource,rGlyph->left,rGlyph->top,w,rGlyph->bottom-rGlyph->top,bf);                    

-					y+=rGlyph->bottom-rGlyph->top;

-				}

-

-				//--    

-				//end temp bitmap

-				if (drawMode==0 || drawMode==2)

-				{

-					if (drawMode==0)

-					{

-

-						int dx;

-						dx=(wr.left-rFill->left)%w;

-						if (dx>=0)

-						{   

-							int wt;

-							x=wr.left;

-							wt=(x+w-dx<=wr.right)?(w-dx):(wr.right-wr.left);                                                   

-							BitBlt(hDest,x,wr.top,wt,h,mem2dc,dx,0,SRCCOPY);

-						}

-						x=wr.left+w-dx;                        

-						while (x<wr.right-w){

-							BitBlt(hDest,x,wr.top,w,h,mem2dc,0,0,SRCCOPY);

-							x+=w;

-						}

-						if (x<=wr.right)

-						BitBlt(hDest,x,wr.top,wr.right-x,h, mem2dc,0,0,SRCCOPY);  

-					}

-					else 

-					{

-						int dx;

-						dx=(wr.left-rFill->left)%w;

-						x=wr.left-dx;

-						while (x<wr.right-w){

-							ske_AlphaBlend(hDest,x,wr.top,w,h,mem2dc,0,0,w,h,bf);

-							x+=w;

-						}

-						if (x<=wr.right)

-							ske_AlphaBlend(hDest,x,wr.top,wr.right-x,h, mem2dc,0,0,wr.right-x,h,bf);

-					}

-

-				}

-				else

-				{

-					BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, AC_SRC_ALPHA };

-

-					int dx;

-					dx=(wr.left-rFill->left)%w;

-					if (dx>=0)

-					{

-						int wt;

-						x=wr.left;

-						wt=(x+w-dx<=wr.right)?(w-dx):(wr.right-wr.left); 

-						ske_AlphaBlend(hDest,x,wr.top,wt,h,mem2dc,dx,0,wt,h,bf);

-					}

-					x=wr.left+w-dx;

-					while (x<wr.right-w){

-						ske_AlphaBlend(hDest,x,wr.top,w,h,mem2dc,0,0,w,h,bf);

-						x+=w;

-					}

-					if (x<=wr.right)

-						ske_AlphaBlend(hDest,x,wr.top,wr.right-x,h, mem2dc,0,0,wr.right-x,h,bf);  

-

-				}

-			}

-

-		}

-		SelectObject(mem2dc,oldbmp);

-		DeleteObject(mem2bmp);

-		mod_DeleteDC(mem2dc);

-	}

-	return 1;

-

-}

-

-HBITMAP ske_CreateDIB32(int cx, int cy)

-{

-	return ske_CreateDIB32Point(cx,cy,NULL);

-}

-

-HBITMAP ske_CreateDIB32Point(int cx, int cy, void ** bits)

-{

-	BITMAPINFO RGB32BitsBITMAPINFO; 

-	UINT * ptPixels;

-	HBITMAP DirectBitmap;

-

-	if ( cx < 0 || cy < 0 ) {

-#ifdef _DEBUG

-		DebugBreak();

-#endif

-		return NULL;

-	}

-

-	ZeroMemory(&RGB32BitsBITMAPINFO,sizeof(BITMAPINFO));

-	RGB32BitsBITMAPINFO.bmiHeader.biSize=sizeof(BITMAPINFOHEADER);

-	RGB32BitsBITMAPINFO.bmiHeader.biWidth=cx;//bm.bmWidth;

-	RGB32BitsBITMAPINFO.bmiHeader.biHeight=cy;//bm.bmHeight;

-	RGB32BitsBITMAPINFO.bmiHeader.biPlanes=1;

-	RGB32BitsBITMAPINFO.bmiHeader.biBitCount=32;

-	// pointer used for direct Bitmap pixels access

-

-

-	DirectBitmap = CreateDIBSection(NULL, 

-		(BITMAPINFO *)&RGB32BitsBITMAPINFO, 

-		DIB_RGB_COLORS,

-		(void **)&ptPixels, 

-		NULL, 0);

-	if ((DirectBitmap == NULL || ptPixels == NULL) && cx!= 0 && cy!=0) 

-	{

-#ifdef _DEBUG

-		MessageBoxA(NULL,"Object not allocated. Check GDI object count","ERROR",MB_OK|MB_ICONERROR); 

-		DebugBreak();

-#endif

-		;

-	}

-	else	memset(ptPixels,0,cx*cy*4);

-	if (bits!=NULL) *bits=ptPixels;  

-	return DirectBitmap;

-}

-

-HRGN ske_CreateOpaqueRgn(BYTE Level, bool Opaque)

-{

-	if (!g_pCachedWindow)

-		return NULL;

-

-	RGBQUAD * buf = (RGBQUAD *) g_pCachedWindow->hImageDIBByte;

-

-	int x,y;

-	unsigned int cRect = 64;

-	PRGNDATA pRgnData = (PRGNDATA)malloc(sizeof(RGNDATAHEADER) + (cRect)*sizeof(RECT));

-	memset(pRgnData, 0, sizeof(RGNDATAHEADER));

-	pRgnData->rdh.dwSize = sizeof(RGNDATAHEADER);

-	pRgnData->rdh.iType = RDH_RECTANGLES;

-

-	for (y = 0; y < g_pCachedWindow->Height; ++y)

-	{

-		bool inside = false;

-		bool lastin = false;

-		unsigned int entry = 0;

-

-		for (x = 0; x < g_pCachedWindow->Width; ++x)

-		{

-			inside = Opaque ? (buf->rgbReserved > Level) : (buf->rgbReserved < Level);

-			++buf;

-

-			if (inside != lastin)

-			{

-				if (inside)

-				{

-					lastin = true;

-					entry = x;

-				} else {

-					if (pRgnData->rdh.nCount == cRect)

-					{

-						cRect = cRect + 64;

-						pRgnData = (PRGNDATA)realloc(pRgnData, sizeof(RGNDATAHEADER) + (cRect)*sizeof(RECT));

-					}

-					SetRect(((LPRECT)pRgnData->Buffer) + pRgnData->rdh.nCount, entry, g_pCachedWindow->Height - y, x, g_pCachedWindow->Height - y + 1);

-

-					pRgnData->rdh.nCount++;

-					lastin = false;

-				}

-			}

-		}

-

-		if (lastin)

-		{

-			if (pRgnData->rdh.nCount == cRect)

-			{

-				cRect = cRect + 64;

-				pRgnData = (PRGNDATA)realloc(pRgnData, sizeof(RGNDATAHEADER) + (cRect)*sizeof(RECT));

-			}

-			SetRect(((LPRECT)pRgnData->Buffer) + pRgnData->rdh.nCount, entry, g_pCachedWindow->Height - y, x, g_pCachedWindow->Height - y + 1);

-

-			pRgnData->rdh.nCount++;

-		}

-	}

-	HRGN hRgn = ExtCreateRegion(NULL, sizeof(RGNDATAHEADER) + pRgnData->rdh.nCount*sizeof(RECT), (LPRGNDATA)pRgnData);

-	free(pRgnData);

-

-	return hRgn;

-}

-

-static int ske_DrawSkinObject(SKINDRAWREQUEST * preq, GLYPHOBJECT * pobj)

-{

-	HDC memdc=NULL, glyphdc=NULL;

-	int k=0;

-	//BITMAP bmp={0};

-	HBITMAP membmp=0,oldbmp=0,oldglyph=0;

-	BYTE Is32Bit=0;

-	RECT PRect;

-	POINT mode2offset={0};

-	int depth=0; 

-	int mode=0; //0-FastDraw, 1-DirectAlphaDraw, 2-BufferedAlphaDraw

-

-	if (!(preq && pobj)) return -1;

-	if ((!pobj->hGlyph || pobj->hGlyph==(HBITMAP)-1) && ((pobj->Style&7) ==ST_IMAGE ||(pobj->Style&7) ==ST_FRAGMENT|| (pobj->Style&7) ==ST_SOLARIZE)) return 0;

-	// Determine painting mode   

-	depth=GetDeviceCaps(preq->hDC,BITSPIXEL);

-	depth=depth<16?16:depth;

-	Is32Bit=pobj->bmBitsPixel==32;

-	if ((!Is32Bit && pobj->dwAlpha==255)&& pobj->Style!=ST_BRUSH) mode=0;

-	else if (pobj->dwAlpha==255 && pobj->Style!=ST_BRUSH) mode=1;

-	else mode=2;

-	// End painting mode

-

-	//force mode

-

-	if(preq->rcClipRect.bottom-preq->rcClipRect.top*preq->rcClipRect.right-preq->rcClipRect.left==0)

-		preq->rcClipRect=preq->rcDestRect;

-	IntersectRect(&PRect,&preq->rcDestRect,&preq->rcClipRect);

-	if (IsRectEmpty(&PRect))

-	{

-		return 0;

-	}

-	if (mode==2)

-	{   

-		memdc=CreateCompatibleDC(preq->hDC);

-		membmp=ske_CreateDIB32(PRect.right-PRect.left,PRect.bottom-PRect.top);

-		oldbmp=(HBITMAP)SelectObject(memdc,membmp);

-		if (oldbmp==NULL) 

-		{

-			if (mode==2)

-			{

-				SelectObject(memdc,oldbmp);

-				mod_DeleteDC(memdc);

-				DeleteObject(membmp);

-			}

-			return 0;

-		}

-	} 

-

-	if (mode!=2) memdc=preq->hDC;

-	{

-		if (pobj->hGlyph && pobj->hGlyph!=(HBITMAP)-1)

-		{

-			glyphdc=CreateCompatibleDC(preq->hDC);

-			if (!oldglyph)

-				oldglyph=(HBITMAP)SelectObject(glyphdc,pobj->hGlyph);

-			else 

-				SelectObject(glyphdc,pobj->hGlyph);

-		}

-		// Drawing

-		{    

-			RECT rFill, rGlyph, rClip;

-			if ((pobj->Style&7) ==ST_BRUSH)

-			{

-				HBRUSH br=CreateSolidBrush(pobj->dwColor);

-				RECT fr;

-				if (mode==2)

-				{

-					SetRect(&fr,0,0,PRect.right-PRect.left,PRect.bottom-PRect.top);

-					FillRect(memdc,&fr,br);

-					ske_SetRectOpaque(memdc,&fr);

-					// FillRectAlpha(memdc,&fr,pobj->dwColor|0xFF000000);

-				}

-				else

-				{

-					fr=PRect;

-					// SetRect(&fr,0,0,PRect.right-PRect.left,PRect.bottom-PRect.top);

-					FillRect(preq->hDC,&fr,br);

-				}

-				DeleteObject(br);

-				k=-1;

-			}

-			else

-			{

-				if (mode==2)  

-				{

-					mode2offset.x=PRect.left;

-					mode2offset.y=PRect.top;

-					OffsetRect(&PRect,-mode2offset.x,-mode2offset.y);

-				}

-				rClip=(preq->rcClipRect);

-

-				{

-					int lft=0;

-					int top=0;

-					int rgh=pobj->bmWidth;

-					int btm=pobj->bmHeight;

-					if ((pobj->Style&7) ==ST_FRAGMENT)

-					{

-						lft=pobj->clipArea.x;

-						top=pobj->clipArea.y;

-						rgh=min(rgh,lft+pobj->szclipArea.cx);

-						btm=min(btm,top+pobj->szclipArea.cy);

-					}

-

-					// Draw center...

-					if (1)

-					{

-						rFill.top=preq->rcDestRect.top+pobj->dwTop;

-						rFill.bottom=preq->rcDestRect.bottom-pobj->dwBottom; 

-						rFill.left=preq->rcDestRect.left+pobj->dwLeft;

-						rFill.right=preq->rcDestRect.right-pobj->dwRight;

-

-						if (mode==2)

-							OffsetRect(&rFill,-mode2offset.x,-mode2offset.y);

-

-						rGlyph.top=top+pobj->dwTop;

-						rGlyph.left=lft+pobj->dwLeft;

-						rGlyph.right=rgh-pobj->dwRight;

-						rGlyph.bottom=btm-pobj->dwBottom;

-

-						k+=ske_SkinFillRectByGlyph(memdc,glyphdc,&rFill,&rGlyph,&PRect,pobj->FitMode,mode,depth);

-					}

-

-					// Draw top side...

-					if(1)

-					{

-						rFill.top=preq->rcDestRect.top;

-						rFill.bottom=preq->rcDestRect.top+pobj->dwTop; 

-						rFill.left=preq->rcDestRect.left+pobj->dwLeft;

-						rFill.right=preq->rcDestRect.right-pobj->dwRight;

-

-						if (mode==2)

-							OffsetRect(&rFill,-mode2offset.x,-mode2offset.y);

-

-						rGlyph.top=top+0;

-						rGlyph.left=lft+pobj->dwLeft;

-						rGlyph.right=rgh-pobj->dwRight;

-						rGlyph.bottom=top+pobj->dwTop;

-

-						k+=ske_SkinFillRectByGlyph(memdc,glyphdc,&rFill,&rGlyph,&PRect,pobj->FitMode&FM_TILE_HORZ,mode,depth);

-					}

-					// Draw bottom side...

-					if(1)

-					{

-						rFill.top=preq->rcDestRect.bottom-pobj->dwBottom;

-						rFill.bottom=preq->rcDestRect.bottom; 

-						rFill.left=preq->rcDestRect.left+pobj->dwLeft;

-						rFill.right=preq->rcDestRect.right-pobj->dwRight;

-

-						if (mode==2)

-							OffsetRect(&rFill,-mode2offset.x,-mode2offset.y);

-

-

-						rGlyph.top=btm-pobj->dwBottom;

-						rGlyph.left=lft+pobj->dwLeft;

-						rGlyph.right=rgh-pobj->dwRight;

-						rGlyph.bottom=btm;

-

-						k+=ske_SkinFillRectByGlyph(memdc,glyphdc,&rFill,&rGlyph,&PRect,pobj->FitMode&FM_TILE_HORZ,mode,depth);

-					}

-					// Draw left side...

-					if(1)

-					{

-						rFill.top=preq->rcDestRect.top+pobj->dwTop;

-						rFill.bottom=preq->rcDestRect.bottom-pobj->dwBottom; 

-						rFill.left=preq->rcDestRect.left;

-						rFill.right=preq->rcDestRect.left+pobj->dwLeft;

-

-						if (mode==2)

-							OffsetRect(&rFill,-mode2offset.x,-mode2offset.y);

-

-

-						rGlyph.top=top+pobj->dwTop;

-						rGlyph.left=lft;

-						rGlyph.right=lft+pobj->dwLeft;

-						rGlyph.bottom=btm-pobj->dwBottom;

-

-						k+=ske_SkinFillRectByGlyph(memdc,glyphdc,&rFill,&rGlyph,&PRect,pobj->FitMode&FM_TILE_VERT,mode,depth);

-					}

-

-					// Draw right side...

-					if(1)

-					{

-						rFill.top=preq->rcDestRect.top+pobj->dwTop;

-						rFill.bottom=preq->rcDestRect.bottom-pobj->dwBottom; 

-						rFill.left=preq->rcDestRect.right-pobj->dwRight;

-						rFill.right=preq->rcDestRect.right;

-

-						if (mode==2)

-							OffsetRect(&rFill,-mode2offset.x,-mode2offset.y);

-

-

-						rGlyph.top=top+pobj->dwTop;

-						rGlyph.left=rgh-pobj->dwRight;

-						rGlyph.right=rgh;

-						rGlyph.bottom=btm-pobj->dwBottom;

-

-						k+=ske_SkinFillRectByGlyph(memdc,glyphdc,&rFill,&rGlyph,&PRect,pobj->FitMode&FM_TILE_VERT,mode,depth);

-					}

-

-

-					// Draw Top-Left corner...

-					if(1)

-					{

-						rFill.top=preq->rcDestRect.top;

-						rFill.bottom=preq->rcDestRect.top+pobj->dwTop; 

-						rFill.left=preq->rcDestRect.left;

-						rFill.right=preq->rcDestRect.left+pobj->dwLeft;

-

-						if (mode==2)

-							OffsetRect(&rFill,-mode2offset.x,-mode2offset.y);

-

-

-						rGlyph.top=top;

-						rGlyph.left=lft;

-						rGlyph.right=lft+pobj->dwLeft;

-						rGlyph.bottom=top+pobj->dwTop;

-

-						k+=ske_SkinFillRectByGlyph(memdc,glyphdc,&rFill,&rGlyph,&PRect,0,mode,depth);

-					}

-					// Draw Top-Right corner...

-					if(1)

-					{

-						rFill.top=preq->rcDestRect.top;

-						rFill.bottom=preq->rcDestRect.top+pobj->dwTop; 

-						rFill.left=preq->rcDestRect.right-pobj->dwRight;

-						rFill.right=preq->rcDestRect.right;

-

-						if (mode==2)

-							OffsetRect(&rFill,-mode2offset.x,-mode2offset.y);

-

-

-						rGlyph.top=top;

-						rGlyph.left=rgh-pobj->dwRight;

-						rGlyph.right=rgh;

-						rGlyph.bottom=top+pobj->dwTop;

-

-						k+=ske_SkinFillRectByGlyph(memdc,glyphdc,&rFill,&rGlyph,&PRect,0,mode,depth);

-					}

-

-					// Draw Bottom-Left corner...

-					if(1)

-					{

-						rFill.top=preq->rcDestRect.bottom-pobj->dwBottom;

-						rFill.bottom=preq->rcDestRect.bottom; 

-						rFill.left=preq->rcDestRect.left;

-						rFill.right=preq->rcDestRect.left+pobj->dwLeft;

-

-

-						if (mode==2)

-							OffsetRect(&rFill,-mode2offset.x,-mode2offset.y);

-

-

-						rGlyph.left=lft;

-						rGlyph.right=lft+pobj->dwLeft; 

-						rGlyph.top=btm-pobj->dwBottom;

-						rGlyph.bottom=btm;

-

-						k+=ske_SkinFillRectByGlyph(memdc,glyphdc,&rFill,&rGlyph,&PRect,0,mode,depth);

-					}

-					// Draw Bottom-Right corner...

-					if(1)

-					{

-						rFill.top=preq->rcDestRect.bottom-pobj->dwBottom;

-						rFill.bottom=preq->rcDestRect.bottom;

-						rFill.left=preq->rcDestRect.right-pobj->dwRight;

-						rFill.right=preq->rcDestRect.right;

-

-

-						if (mode==2)

-							OffsetRect(&rFill,-mode2offset.x,-mode2offset.y);

-

-						rGlyph.left=rgh-pobj->dwRight;

-						rGlyph.right=rgh;

-						rGlyph.top=btm-pobj->dwBottom;

-						rGlyph.bottom=btm;

-

-						k+=ske_SkinFillRectByGlyph(memdc,glyphdc,&rFill,&rGlyph,&PRect,0,mode,depth);

-					}

-				}

-

-			}

-

-			if ((k>0 || k==-1) && mode==2)

-			{            

-				{

-					BLENDFUNCTION bf={AC_SRC_OVER, 0, /*(bm.bmBitsPixel==32)?255:*/pobj->dwAlpha, (pobj->bmBitsPixel==32 && pobj->Style!=ST_BRUSH)?AC_SRC_ALPHA:0};

-					if (mode==2)

-						OffsetRect(&PRect,mode2offset.x,mode2offset.y);

-					ske_AlphaBlend( preq->hDC,PRect.left,PRect.top,PRect.right-PRect.left,PRect.bottom-PRect.top, 

-						memdc,0,0,PRect.right-PRect.left,PRect.bottom-PRect.top,bf);

-				}                 

-			}

-		}

-		//free GDI resources

-		//--++--

-

-		//free GDI resources

-		{

-

-			if (oldglyph) SelectObject(glyphdc,oldglyph);

-			if (glyphdc) mod_DeleteDC(glyphdc);

-		}    

-		if (mode==2)

-		{

-			SelectObject(memdc,oldbmp);

-			mod_DeleteDC(memdc);

-			DeleteObject(membmp);

-		}

-

-	}  

-	if (pobj->plTextList && pobj->plTextList->realCount>0)

-	{

-		int i;

-		HFONT hOldFont;

-		for (i=0; i<pobj->plTextList->realCount; i++)

-		{

-			GLYPHTEXT * gt=(GLYPHTEXT *)pobj->plTextList->items[i];

-			if (!gt->hFont)

-			{

-				if (gl_plSkinFonts && gl_plSkinFonts->realCount>0)

-				{

-					int j=0;

-					for (j=0; j<gl_plSkinFonts->realCount; j++)

-					{

-						SKINFONT * sf;

-						sf=(SKINFONT*)gl_plSkinFonts->items[j];

-						if (sf->szFontID && !strcmp(sf->szFontID,gt->szFontID))

-						{

-							gt->hFont=sf->hFont;

-							break;

-						}

-					}

-				}

-				if (!gt->hFont) gt->hFont=(HFONT)-1;

-			}

-			if (gt->hFont!=(HFONT)-1)

-			{

-				RECT rc={0};

-				hOldFont=(HFONT)SelectObject(preq->hDC,gt->hFont);

-

-

-

-				if (gt->RelativeFlags&2) rc.left=preq->rcDestRect.right+gt->iLeft;

-				else if (gt->RelativeFlags&1) rc.left=((preq->rcDestRect.right-preq->rcDestRect.left)>>1)+gt->iLeft;

-				else rc.left=preq->rcDestRect.left+gt->iLeft;

-

-				if (gt->RelativeFlags&8) rc.top=preq->rcDestRect.bottom+gt->iTop;

-				else if (gt->RelativeFlags&4) rc.top=((preq->rcDestRect.bottom-preq->rcDestRect.top)>>1)+gt->iTop;

-				else rc.top=preq->rcDestRect.top+gt->iTop;

-

-				if (gt->RelativeFlags&32) rc.right=preq->rcDestRect.right+gt->iRight;

-				else if (gt->RelativeFlags&16) rc.right=((preq->rcDestRect.right-preq->rcDestRect.left)>>1)+gt->iRight;

-				else rc.right=preq->rcDestRect.left+gt->iRight;

-

-				if (gt->RelativeFlags&128) rc.bottom=preq->rcDestRect.bottom+gt->iBottom;

-				else if (gt->RelativeFlags&64) rc.bottom=((preq->rcDestRect.bottom-preq->rcDestRect.top)>>1)+gt->iBottom;

-				else rc.bottom=preq->rcDestRect.top+gt->iBottom;

-

-				ske_AlphaTextOut(preq->hDC, gt->stText, -1, &rc,gt->dwFlags, gt->dwColor);

-				SelectObject(preq->hDC,hOldFont);

-			}

-		}

-	}

-

-	return 0;

-}

-

-

-

-int ske_AddDescriptorToSkinObjectList (LPSKINOBJECTDESCRIPTOR lpDescr, SKINOBJECTSLIST* Skin)

-{

-	SKINOBJECTSLIST *sk;

-	if (Skin) sk=Skin; else sk=&g_SkinObjectList;

-	if (!sk) return 0;

-	if (mir_bool_strcmpi(lpDescr->szObjectID,"_HEADER_")) return 0;

-	{//check if new object allready presents.

-		DWORD i=0;

-		for (i=0; i<sk->dwObjLPAlocated;i++)

-			if (!mir_strcmp(sk->pObjects[i].szObjectID,lpDescr->szObjectID)) return 0;

-	}

-	if (sk->dwObjLPAlocated+1>sk->dwObjLPReserved)

-	{ // Realocated list to add space for new object

-

-		sk->pObjects=(SKINOBJECTDESCRIPTOR*)mir_realloc(sk->pObjects,sizeof(SKINOBJECTDESCRIPTOR)*(sk->dwObjLPReserved+1)/*alloc step*/);

-		sk->dwObjLPReserved++; 

-	}

-	{ //filling new objects field

-		sk->pObjects[sk->dwObjLPAlocated].bType=lpDescr->bType;

-		sk->pObjects[sk->dwObjLPAlocated].Data=NULL;

-		sk->pObjects[sk->dwObjLPAlocated].szObjectID=mir_strdup(lpDescr->szObjectID);

-		//  sk->Objects[sk->dwObjLPAlocated].szObjectName=mir_strdup(lpDescr->szObjectName);

-		if (lpDescr->Data!=NULL)

-		{   //Copy defaults values

-			switch (lpDescr->bType) 

-			{

-			case OT_GLYPHOBJECT:

-				{   

-					GLYPHOBJECT * obdat;

-					GLYPHOBJECT * gl=(GLYPHOBJECT*)lpDescr->Data;

-					sk->pObjects[sk->dwObjLPAlocated].Data=mir_alloc(sizeof(GLYPHOBJECT));

-					obdat=(GLYPHOBJECT*)sk->pObjects[sk->dwObjLPAlocated].Data;

-					memmove(obdat,gl,sizeof(GLYPHOBJECT));

-					if (gl->szFileName!=NULL)                    

-					{

-						obdat->szFileName=mir_strdup(gl->szFileName);

-						mir_free_and_nill(gl->szFileName);

-					}

-					else

-						obdat->szFileName=NULL;

-					obdat->hGlyph=NULL;

-					break;

-				}

-			}

-

-		}

-	}

-	sk->dwObjLPAlocated++;

-	return 1;

-}

-

-static LPSKINOBJECTDESCRIPTOR ske_FindObject(const char * szName, BYTE objType, SKINOBJECTSLIST* Skin)

-{

-	// DWORD i;

-	SKINOBJECTSLIST* sk;

-	sk=(Skin==NULL)?(&g_SkinObjectList):Skin;

-	return skin_FindObjectByRequest((char *)szName,sk->pMaskList);

-}

-

-static LPSKINOBJECTDESCRIPTOR ske_FindObjectByMask(MODERNMASK * pModernMask, BYTE objType, SKINOBJECTSLIST* Skin)

-{

-	// DWORD i;

-	SKINOBJECTSLIST* sk;

-	sk=(Skin==NULL)?(&g_SkinObjectList):Skin;

-	if (!sk->pMaskList) return NULL;

-	return skin_FindObjectByMask(pModernMask,sk->pMaskList);

-}

-

-LPSKINOBJECTDESCRIPTOR ske_FindObjectByName(const char * szName, BYTE objType, SKINOBJECTSLIST* Skin)

-{

-	DWORD i;

-	SKINOBJECTSLIST* sk;

-	sk=(Skin==NULL)?(&g_SkinObjectList):Skin;

-	for (i=0; i<sk->dwObjLPAlocated; i++)

-	{

-		if (sk->pObjects[i].bType==objType || objType==OT_ANY)

-		{

-			if (!mir_strcmp(sk->pObjects[i].szObjectID,szName))

-				return &(sk->pObjects[i]);

-		}

-	}

-	return NULL;

-}

-

-//////////////////////////////////////////////////////////////////////////

-// Paint glyph

-// wParam - LPSKINDRAWREQUEST

-// lParam - possible direct pointer to modern mask

-//////////////////////////////////////////////////////////////////////////

-

-INT_PTR ske_Service_DrawGlyph(WPARAM wParam,LPARAM lParam)

-{

-	LPSKINDRAWREQUEST preq;

-	LPSKINOBJECTDESCRIPTOR pgl;

-	LPGLYPHOBJECT gl;

-	if (!wParam) return -1;

-	ske_LockSkin();

-	__try

-	{

-		preq=(LPSKINDRAWREQUEST)wParam;   

-		if (lParam)

-			pgl=ske_FindObjectByMask((MODERNMASK*)lParam, OT_GLYPHOBJECT,NULL);

-		else

-			pgl=ske_FindObject(preq->szObjectID, OT_GLYPHOBJECT,NULL);

-		if (pgl==NULL) return -1;

-		if (pgl->Data==NULL) return -1;

-		gl= (LPGLYPHOBJECT)pgl->Data;

-		if ((gl->Style&7) ==ST_SKIP) return ST_SKIP;

-		if (gl->hGlyph==NULL && gl->hGlyph!=(HBITMAP)-1 &&

-			(  (gl->Style&7)==ST_IMAGE 

-			||(gl->Style&7)==ST_FRAGMENT 

-			||(gl->Style&7)==ST_SOLARIZE ) )

-			if (gl->szFileName) 

-			{

-				gl->hGlyph=ske_LoadGlyphImage(gl->szFileName);

-				if (gl->hGlyph)

-				{

-					BITMAP bmp={0};

-					GetObject(gl->hGlyph,sizeof(BITMAP),&bmp);

-					gl->bmBitsPixel=(BYTE)bmp.bmBitsPixel;

-					gl->bmHeight=bmp.bmHeight;

-					gl->bmWidth=bmp.bmWidth;

-				}

-				else

-					gl->hGlyph=(HBITMAP)-1; //invalid

-			}

-			return ske_DrawSkinObject(preq,gl);

-	}

-	__finally

-	{

-		ske_UnlockSkin();

-	}   

-	return -1;

-}

-

-

-void ske_PreMultiplyChanells(HBITMAP hbmp,BYTE Mult)

-{

-	BITMAP bmp;     

-	BOOL flag=FALSE;

-	BYTE * pBitmapBits;

-	DWORD Len;

-	int bh,bw,y,x;

-

-	GetObject(hbmp, sizeof(BITMAP), (LPSTR)&bmp);

-	bh=bmp.bmHeight;

-	bw=bmp.bmWidth;

-	Len=bh*bw*4;

-	flag=(bmp.bmBits==NULL);

-	if (flag)

-	{

-		pBitmapBits=(LPBYTE)malloc(Len);

-		GetBitmapBits(hbmp,Len,pBitmapBits);

-	}

-	else 

-		pBitmapBits=(BYTE*)bmp.bmBits;

-	for (y=0; y<bh; ++y)

-	{

-		BYTE *pPixel= pBitmapBits + bw * 4 * y;

-

-		for (x=0; x<bw ; ++x)

-		{

-			if (Mult)

-			{

-				pPixel[0]= pPixel[0]*pPixel[3]/255;

-				pPixel[1]= pPixel[1]*pPixel[3]/255;

-				pPixel[2]= pPixel[2]*pPixel[3]/255;

-			}

-			else

-			{

-				pPixel[3]=255;

-			}

-			pPixel+= 4;

-		}

-	}

-	if (flag)

-	{

-		Len=SetBitmapBits(hbmp,Len,pBitmapBits);

-		free (pBitmapBits);

-	}

-	return;

-}

-

-int ske_GetFullFilename(char * buf, char *file, char * skinfolder,BOOL madeAbsolute)

-{

-	char b2[MAX_PATH]={0};

-	char *SkinPlace= ModernGetStringA(NULL,SKIN,"SkinFolder");

-	if (!SkinPlace) SkinPlace=mir_strdup("\\Skin\\default");

-	if (file[0]!='\\' && file[1]!=':') 

-		_snprintf(b2, MAX_PATH,"%s\\%s",(skinfolder==NULL)?SkinPlace:((INT_PTR)skinfolder!=-1)?skinfolder:"",file);

-	else

-		_snprintf(b2, MAX_PATH,"%s",file);

-	if (madeAbsolute) 

-		if (b2[0]=='\\' && b2[1]!='\\')

-			CallService(MS_UTILS_PATHTOABSOLUTE, (WPARAM)(b2+1), (LPARAM)buf);

-		else

-			CallService(MS_UTILS_PATHTOABSOLUTE, (WPARAM)(b2), (LPARAM)buf);

-	else

-		memcpy(buf,b2,MAX_PATH);

-

-	if(SkinPlace) mir_free_and_nill(SkinPlace);

-	return 0;

-}

-

-

-static HBITMAP ske_skinLoadGlyphImage(char * szFileName)

-{

-	if (!g_CluiData.fGDIPlusFail && !wildcmpi(szFileName,"*.tga"))

-		return GDIPlus_LoadGlyphImage(szFileName);

-	else 

-		return ske_LoadGlyphImageByDecoders(szFileName);

-}

-

-/* 

-This function is required to load TGA to dib buffer myself 

-Major part of routines is from http://tfcduke.developpez.com/tutoriel/format/tga/fichiers/tga.c

-*/

-

-static BOOL ske_ReadTGAImageData(void * From, DWORD fromSize, BYTE * destBuf, DWORD bufSize, BOOL RLE)

-{

-	BYTE * pos=destBuf;

-	BYTE * from=fromSize?(BYTE*)From:NULL;

-	FILE * fp=!fromSize?(FILE*)From:NULL;

-	DWORD destCount=0;

-	DWORD fromCount=0;

-	if (!RLE)

-	{

-		while (((from&&fromCount<fromSize) || (fp&& fromCount<bufSize))

-			&&(destCount<bufSize))

-		{

-			BYTE r=from?from[fromCount++]:(BYTE)fgetc(fp);

-			BYTE g=from?from[fromCount++]:(BYTE)fgetc(fp);

-			BYTE b=from?from[fromCount++]:(BYTE)fgetc(fp);

-			BYTE a=from?from[fromCount++]:(BYTE)fgetc(fp);

-			pos[destCount++]=r;

-			pos[destCount++]=g;

-			pos[destCount++]=b;

-			pos[destCount++]=a;

-

-			if (destCount>bufSize) break;

-			if (from) 	if (fromCount<fromSize) break;

-		}

-	}

-	else

-	{

-		BYTE rgba[4];

-		BYTE packet_header;

-		BYTE *ptr=pos;

-		BYTE size;

-		int i;

-		while (ptr < pos + bufSize)

-		{

-			/* read first byte */

-			packet_header = from?from[fromCount]:(BYTE)fgetc(fp);

-			if (from) from++;

-			size = 1 + (packet_header & 0x7f);

-			if (packet_header & 0x80)

-			{

-				/* run-length packet */

-				if (from) 

-				{

-					*((DWORD*)rgba)=*((DWORD*)(from+fromCount));

-					fromCount+=4;

-				}

-				else fread (rgba, sizeof (BYTE), 4, fp);

-				for (i = 0; i < size; ++i, ptr += 4)

-				{

-					ptr[2] = rgba[2];

-					ptr[1] = rgba[1];

-					ptr[0] = rgba[0];

-					ptr[3] = rgba[3];

-				}

-			}

-			else

-			{	/* not run-length packet */

-				for (i = 0; i < size; ++i, ptr += 4)

-				{

-					ptr[0] = from? from[fromCount++]:(BYTE)fgetc (fp);

-					ptr[1] = from? from[fromCount++]:(BYTE)fgetc (fp);

-					ptr[2] = from? from[fromCount++]:(BYTE)fgetc (fp);

-					ptr[3] = from? from[fromCount++]:(BYTE)fgetc (fp);

-				}

-			}

-		}

-	}

-	return TRUE;

-}

-

-static HBITMAP ske_LoadGlyphImage_TGA(char * szFilename)

-{

-	BYTE *colormap = NULL;

-	int cx=0,cy=0;

-	BOOL err=FALSE;

-	tga_header_t header;

-	if (!szFilename) return NULL;

-	if (!wildcmpi(szFilename,"*\\*%.tga")) 

-	{

-		//Loading TGA image from file

-		FILE *fp;

-		fp = fopen (szFilename, "rb");

-		if (!fp)

-		{

-			TRACEVAR("error: couldn't open \"%s\"!\n", szFilename);

-			return NULL;

-		}

-		/* read header */

-		fread (&header, sizeof (tga_header_t), 1, fp);

-		if (  (header.pixel_depth!=32)

-			||((header.image_type!=10)&&(header.image_type!=2))

-			)

-		{

-			fclose(fp);

-			return NULL;

-		}

-

-		/*memory allocation */

-		colormap=(BYTE*)malloc(header.width*header.height*4);	

-		cx=header.width;

-		cy=header.height;

-		fseek (fp, header.id_lenght, SEEK_CUR);

-		fseek (fp, header.cm_length, SEEK_CUR);

-		err=!ske_ReadTGAImageData((void*)fp, 0, colormap, header.width*header.height*4,header.image_type==10);

-		fclose(fp);

-	}

-

-

-	else 

-	{

-		/* reading from resources IDR_TGA_DEFAULT_SKIN */

-		DWORD size=0;

-		BYTE * mem;

-		HGLOBAL hRes;

-		HRSRC hRSrc=FindResourceA(g_hInst,MAKEINTRESOURCEA(IDR_TGA_DEFAULT_SKIN),"TGA");

-		if (!hRSrc) return NULL;

-		hRes=LoadResource(g_hInst,hRSrc);

-		if (!hRes) return NULL;

-		size=SizeofResource(g_hInst,hRSrc);

-		mem=(BYTE*) LockResource(hRes);

-		if (size>sizeof(header))

-		{

-			tga_header_t * header=(tga_header_t *)mem;

-			if (header->pixel_depth==32&& (header->image_type==2 ||header->image_type==10))

-			{

-				colormap=(BYTE*)malloc(header->width*header->height*4);	

-				cx=header->width;

-				cy=header->height;

-				ske_ReadTGAImageData((void*)(mem+sizeof(tga_header_t)+header->id_lenght+header->cm_length), size-(sizeof(tga_header_t)+header->id_lenght+header->cm_length), colormap, cx*cy*4,header->image_type==10);

-			}

-		}

-		FreeResource(hRes);

-	}

-	if (colormap)  //create dib section

-	{

-		BYTE * pt;

-		HBITMAP hbmp=ske_CreateDIB32Point(cx,cy,(void**)&pt);

-		if (hbmp) memcpy(pt,colormap,cx*cy*4);

-		free(colormap);

-		return hbmp;

-	}

-	return NULL;

-}

-

-

-//this function is required to load PNG to dib buffer myself

-HBITMAP ske_LoadGlyphImage_Png2Dib(char * szFilename)

-{

-

-	{

-		HANDLE hFile, hMap = NULL;

-		BYTE* ppMap = NULL;

-		long  cbFileSize = 0;

-		BITMAPINFOHEADER* pDib;

-		BYTE* pDibBits;

-

-		if ( !ServiceExists( MS_PNG2DIB )) {

-			MessageBox( NULL, TranslateT( "You need an image services plugin to process PNG images." ), TranslateT( "Error" ), MB_OK );

-			return (HBITMAP)NULL;

-		}

-

-		if (( hFile = CreateFileA( szFilename, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, NULL )) != INVALID_HANDLE_VALUE )

-			if (( hMap = CreateFileMapping( hFile, NULL, PAGE_READONLY, 0, 0, NULL )) != NULL )

-				if (( ppMap = ( BYTE* )MapViewOfFile( hMap, FILE_MAP_READ, 0, 0, 0 )) != NULL )

-					cbFileSize = GetFileSize( hFile, NULL );

-

-		if ( cbFileSize != 0 ) {

-			PNG2DIB param;

-			param.pSource = ppMap;

-			param.cbSourceSize = cbFileSize;

-			param.pResult = &pDib;

-			if ( CallService( MS_PNG2DIB, 0, ( LPARAM )&param ))

-				pDibBits = ( BYTE* )( pDib+1 );

-			else

-				cbFileSize = 0;

-		}

-

-		if ( ppMap != NULL )	UnmapViewOfFile( ppMap );

-		if ( hMap  != NULL )	CloseHandle( hMap );

-		if ( hFile != NULL ) CloseHandle( hFile );

-

-		if ( cbFileSize == 0 )

-			return (HBITMAP)NULL;

-

-		{

-			BITMAPINFO* bi=( BITMAPINFO* )pDib;

-			BYTE *pt=(BYTE*)bi;

-			pt+=bi->bmiHeader.biSize;

-			if (bi->bmiHeader.biBitCount!=32)

-			{

-				HDC sDC = GetDC( NULL );

-				HBITMAP hBitmap = CreateDIBitmap( sDC, pDib, CBM_INIT, pDibBits, bi, DIB_PAL_COLORS );

-				SelectObject( sDC, hBitmap );

-				DeleteDC( sDC );

-				GlobalFree( pDib );

-				return hBitmap;

-			}

-			else

-			{

-				BYTE * ptPixels=pt;

-				HBITMAP hBitmap=CreateDIBSection(NULL,bi, DIB_RGB_COLORS, (void **)&ptPixels,  NULL, 0);         

-				memcpy(ptPixels,pt,bi->bmiHeader.biSizeImage);

-				GlobalFree( pDib );

-				return hBitmap;

-			}	

-		}

-	}	

-}

-

-static HBITMAP ske_LoadGlyphImageByDecoders(char * szFileName)

-{

-	// Loading image from file by imgdecoder...    

-	HBITMAP hBitmap=NULL;

-	char ext[5];

-	BYTE f=0;

-	LPBYTE pBitmapBits;

-	LPVOID pImg= NULL;

-	LPVOID m_pImgDecoder;

-

-	BITMAP bmpInfo;

-	{

-		int l;

-		l=mir_strlen(szFileName);

-		memmove(ext,szFileName +(l-4),5);   

-	}

-	if (!strchr(szFileName,'%') && !PathFileExistsA(szFileName)) return NULL;

-	if (mir_bool_strcmpi(ext,".tga"))

-	{

-		hBitmap=ske_LoadGlyphImage_TGA(szFileName);

-		f=1;

-	}

-	else if (ServiceExists("Image/Png2Dib") && mir_bool_strcmpi(ext,".png"))

-	{

-		hBitmap=ske_LoadGlyphImage_Png2Dib(szFileName);

-		GetObject(hBitmap, sizeof(BITMAP), &bmpInfo);

-		f=(bmpInfo.bmBits!=NULL);

-		// hBitmap=(HBITMAP)CallService(MS_UTILS_LOADBITMAP,0,(LPARAM)szFileName);

-		// f=1;

-

-	}

-	else if (hImageDecoderModule==NULL || !mir_bool_strcmpi(ext,".png"))

-		hBitmap=(HBITMAP)CallService(MS_UTILS_LOADBITMAP,0,(LPARAM)szFileName);

-	else

-	{

-		f=1;

-		ImgNewDecoder(&m_pImgDecoder);

-		if (!ImgNewDIBFromFile(m_pImgDecoder, szFileName, &pImg))	

-		{

-			ImgGetHandle(pImg, &hBitmap, (LPVOID *)&pBitmapBits);

-			ImgDeleteDecoder(m_pImgDecoder);

-		}

-	}

-	if (hBitmap)

-	{

-

-		GetObject(hBitmap, sizeof(BITMAP), &bmpInfo);

-		if (bmpInfo.bmBitsPixel == 32)	

-			ske_PreMultiplyChanells(hBitmap,f);

-		else

-		{

-			HDC dc24,dc32;

-			HBITMAP hBitmap32,obmp24,obmp32;

-			dc32=CreateCompatibleDC(NULL);

-			dc24=CreateCompatibleDC(NULL);

-			hBitmap32=ske_CreateDIB32(bmpInfo.bmWidth,bmpInfo.bmHeight);

-			obmp24=(HBITMAP)SelectObject(dc24,hBitmap);

-			obmp32=(HBITMAP)SelectObject(dc32,hBitmap32);

-			BitBlt(dc32,0,0,bmpInfo.bmWidth,bmpInfo.bmHeight,dc24,0,0,SRCCOPY);

-			SelectObject(dc24,obmp24);

-			SelectObject(dc32,obmp32);

-			mod_DeleteDC(dc24);

-			mod_DeleteDC(dc32);

-			DeleteObject(hBitmap);

-			hBitmap=hBitmap32;

-			ske_PreMultiplyChanells(hBitmap,0);

-		}

-

-	}

-	return hBitmap; 

-}

-

-HBITMAP ske_LoadGlyphImage(char * szFileName)

-{

-	// try to find image in loaded

-	DWORD i;

-	HBITMAP hbmp;

-	char szFile [MAX_PATH]={0};	

-	ske_GetFullFilename(szFile,szFileName,g_SkinObjectList.szSkinPlace,TRUE);

-	ske_LockSkin();

-	if (pLoadedImages)

-	{

-		for (i=0; i<dwLoadedImagesCount; i++)

-		{

-			if (mir_bool_strcmpi(pLoadedImages[i].szFileName,szFile))

-			{

-				pLoadedImages[i].dwLoadedTimes++;

-				ske_UnlockSkin();

-				return pLoadedImages[i].hGlyph;

-			}

-		}

-	}

-	// load new image

-	hbmp=ske_skinLoadGlyphImage(szFile);

-	if (hbmp==NULL) 

-	{

-		ske_UnlockSkin();

-		return NULL;

-	}

-	// add to loaded list

-	if (dwLoadedImagesCount+1>dwLoadedImagesAlocated)

-	{

-		pLoadedImages=(GLYPHIMAGE*)mir_realloc(pLoadedImages,sizeof(GLYPHIMAGE)*(dwLoadedImagesCount+1));

-		if (pLoadedImages) dwLoadedImagesAlocated++;

-		else 

-		{

-			ske_UnlockSkin();

-			return NULL;

-		}

-	}

-	pLoadedImages[dwLoadedImagesCount].dwLoadedTimes=1;

-	pLoadedImages[dwLoadedImagesCount].hGlyph=hbmp;

-	pLoadedImages[dwLoadedImagesCount].szFileName=mir_strdup(szFile);

-	dwLoadedImagesCount++;

-	ske_UnlockSkin();

-	return hbmp;

-}

-int ske_UnloadGlyphImage(HBITMAP hbmp)

-{

-	DWORD i;

-	for (i=0; i<dwLoadedImagesCount; i++)

-	{

-		if (hbmp==pLoadedImages[i].hGlyph)

-		{

-			pLoadedImages[i].dwLoadedTimes--;

-			if (pLoadedImages[i].dwLoadedTimes==0)

-			{

-				LPGLYPHIMAGE gl=&(pLoadedImages[i]);

-				if (gl->szFileName) mir_free_and_nill(gl->szFileName);

-				memmove(&(pLoadedImages[i]),&(pLoadedImages[i+1]),sizeof(GLYPHIMAGE)*(dwLoadedImagesCount-i-1));

-				dwLoadedImagesCount--;

-				DeleteObject(hbmp);

-				if (pLoadedImages && dwLoadedImagesCount==0) 

-				{

-					dwLoadedImagesAlocated=0;

-					mir_free_and_nill(pLoadedImages);

-				}

-			}

-			return 0;

-		}

-

-	}

-	DeleteObject(hbmp);

-	return 0;

-}

-

-int ske_UnloadSkin(SKINOBJECTSLIST * Skin)

-{   

-

-	DWORD i;

-	ske_LockSkin();

-	ClearMaskList(Skin->pMaskList);

-	{//clear font list

-		int i;

-		if (gl_plSkinFonts && gl_plSkinFonts->realCount>0)

-		{

-			for (i=0; i<gl_plSkinFonts->realCount; i++)

-			{

-				SKINFONT * sf=(SKINFONT *)gl_plSkinFonts->items[i];

-				if (sf)

-				{

-					if (sf->szFontID) mir_free_and_nill(sf->szFontID);

-					DeleteObject(sf->hFont);

-					mir_free_and_nill(sf);

-				}

-			}

-			li.List_Destroy(gl_plSkinFonts);

-			mir_free_and_nill(gl_plSkinFonts);

-		}

-	}

-

-	if (Skin->szSkinPlace) mir_free_and_nill(Skin->szSkinPlace);

-	if (Skin->pTextList) li.List_Destroy(Skin->pTextList);

-	mir_free_and_nill(Skin->pTextList);

-	ModernSkinButtonDeleteAll();

-	if (Skin->dwObjLPAlocated==0) { ske_UnlockSkin(); return 0;}

-	for (i=0; i<Skin->dwObjLPAlocated; i++)

-	{

-		switch(Skin->pObjects[i].bType)

-		{

-		case OT_GLYPHOBJECT:

-			{

-				GLYPHOBJECT * dt;

-				dt=(GLYPHOBJECT*)Skin->pObjects[i].Data;

-				if (dt->hGlyph && dt->hGlyph!=(HBITMAP)-1) 

-					ske_UnloadGlyphImage(dt->hGlyph);

-				dt->hGlyph=NULL;

-				if (dt->szFileName) mir_free_and_nill(dt->szFileName);

-				{// delete texts

-					int i;

-					if (dt->plTextList && dt->plTextList->realCount>0)

-					{

-						for (i=0; i<dt->plTextList->realCount; i++)

-						{

-							GLYPHTEXT * gt=(GLYPHTEXT *)dt->plTextList->items[i];

-							if (gt)

-							{

-								if (gt->stText)       mir_free_and_nill(gt->stText);

-								if (gt->stValueText)  mir_free_and_nill(gt->stValueText);

-								if (gt->szFontID)     mir_free_and_nill(gt->szFontID);

-								if (gt->szGlyphTextID)mir_free_and_nill(gt->szGlyphTextID);

-								mir_free_and_nill(gt);

-							}

-						}

-						li.List_Destroy(dt->plTextList);

-						mir_free_and_nill(dt->plTextList);

-					}

-				}

-				mir_free_and_nill(dt);

-			}

-			break;

-		} 

-		if (Skin->pObjects[i].szObjectID) mir_free_and_nill(Skin->pObjects[i].szObjectID); 

-

-	}

-	mir_free_and_nill(Skin->pObjects);

-	Skin->pTextList=NULL;

-	Skin->dwObjLPAlocated=0;

-	Skin->dwObjLPReserved=0;

-	ske_UnlockSkin();

-	return 0;

-}

-

-static void RegisterMaskByParce(const char * szSetting, char * szValue, SKINOBJECTSLIST * pSkin)

-{

-	int i;

-	DWORD ID=atoi(szSetting+1);

-	for (i=0; i<mir_strlen(szValue); i++)  if (szValue[i]==':') break;

-	if (i<mir_strlen(szValue))

-	{

-		char * Obj, *Mask;

-		int res;

-		Mask=szValue+i+1;

-		Obj=(char*)mir_alloc(i+1);

-		strncpy(Obj,szValue,i);

-		Obj[i]='\0';

-		res=AddStrModernMaskToList(ID,Mask,Obj,pSkin->pMaskList,pSkin);

-		mir_free_and_nill(Obj);

-	}

-}

-

-static int ske_ProcessLoadindString(const char * szSetting, char *szValue)

-{	

-	if (!pCurrentSkin) return 0;

-	if (szSetting[0]=='$')

-		RegisterObjectByParce((char *)szSetting, szValue);

-	else if (szSetting[0]=='#')

-		RegisterButtonByParce((char *)szSetting,szValue);

-	else if (szSetting[0]=='@')

-		RegisterMaskByParce((char *)szSetting,  szValue, pCurrentSkin); ///

-	else if (szSetting[0]=='t')

-		ske_AddParseTextGlyphObject((char*)szSetting,szValue,pCurrentSkin);

-	else if (szSetting[0]=='f')

-		ske_AddParseSkinFont((char*)szSetting,szValue,pCurrentSkin);

-	else return 0;

-	return 1;

-}

-static int ske_enumdb_SkinObjectsProc (const char *szSetting,LPARAM lParam)

-{   

-	char *value;

-	value= ModernGetStringA(NULL,SKIN,szSetting);

-	ske_ProcessLoadindString(szSetting,value);

-	mir_free_and_nill(value);

-

-	return 0;

-}

-

-static int ske_SortTextGlyphObjectFunc(void * first, void * second)

-{

-	return strcmp(((GLYPHTEXT*)(((int*)first)[0]))->szGlyphTextID,((GLYPHTEXT*)(((int*)second)[0]))->szGlyphTextID);

-}

-

-static void ske_LinkSkinObjects(SKINOBJECTSLIST * pObjectList)

-{

-	DWORD i;

-	// LINK Mask with objects

-	for (i=0; i<pObjectList->pMaskList->dwMaskCnt; i++)

-	{

-		MODERNMASK *mm=&(pObjectList->pMaskList->pl_Masks[i]);

-		void * pObject=(void*) ske_FindObjectByName(mm->szObjectName, OT_ANY, (SKINOBJECTSLIST*) pObjectList);

-		mir_free_and_nill(mm->szObjectName);

-		mm->bObjectFound=TRUE;

-		mm->pObject=pObject;

-	}	

-

-	if (pObjectList->pTextList)

-	{

-		int i;

-		// LINK Text with objects

-		for (i=0; i<pObjectList->pTextList->realCount; i++)

-		{

-			GLYPHTEXT * glText;

-			GLYPHOBJECT *globj=NULL;

-			SKINOBJECTDESCRIPTOR * lpobj;

-			glText=(GLYPHTEXT *)pObjectList->pTextList->items[i];

-			lpobj=ske_FindObjectByName(glText->szObjectName,OT_GLYPHOBJECT, pObjectList);

-			mir_free_and_nill(glText->szObjectName);

-			if (lpobj)

-				globj=(GLYPHOBJECT*)lpobj->Data;

-			if (globj)

-			{

-				if (!globj->plTextList)

-				{

-					globj->plTextList=li.List_Create(0,1);

-					globj->plTextList->sortFunc=ske_SortTextGlyphObjectFunc;

-				}

-				li.List_Insert(globj->plTextList,(void*)glText,globj->plTextList->realCount);     

-				qsort(globj->plTextList->items,globj->plTextList->realCount,sizeof(void*),(int(*)(const void*, const void*))globj->plTextList->sortFunc);

-				pObjectList->pTextList->items[i]=NULL;

-			}

-			else

-			{

-				GLYPHTEXT * gt=glText;

-				if (gt)

-				{

-					if (gt->stText)       mir_free_and_nill(gt->stText);

-					if (gt->stValueText)  mir_free_and_nill(gt->stValueText);

-					if (gt->szFontID)     mir_free_and_nill(gt->szFontID);

-					if (gt->szGlyphTextID)mir_free_and_nill(gt->szGlyphTextID);

-					mir_free_and_nill(gt);

-				}

-			}

-		}

-		li.List_Destroy(pObjectList->pTextList);

-		mir_free_and_nill(pObjectList->pTextList);

-	}

-}

-// Getting skin objects and masks from DB

-static int ske_GetSkinFromDB(char * szSection, SKINOBJECTSLIST * Skin)

-{

-	if (Skin==NULL) return 0;

-	ske_UnloadSkin(Skin);

-	g_CluiData.fDisableSkinEngine=ModernGetSettingByte(NULL,"ModernData","DisableEngine", SETTING_DISABLESKIN_DEFAULT);

-	//window borders

-	if (g_CluiData.fDisableSkinEngine) {

-		g_CluiData.LeftClientMargin=0;

-		g_CluiData.RightClientMargin=0; 

-		g_CluiData.TopClientMargin=0;

-		g_CluiData.BottomClientMargin=0;

-	} else {

-		//window borders

-		g_CluiData.LeftClientMargin=(int)ModernGetSettingByte(NULL,"CLUI","LeftClientMargin",SETTING_LEFTCLIENTMARIGN_DEFAULT);

-		g_CluiData.RightClientMargin=(int)ModernGetSettingByte(NULL,"CLUI","RightClientMargin",SETTING_RIGHTCLIENTMARIGN_DEFAULT); 

-		g_CluiData.TopClientMargin=(int)ModernGetSettingByte(NULL,"CLUI","TopClientMargin",SETTING_TOPCLIENTMARIGN_DEFAULT);

-		g_CluiData.BottomClientMargin=(int)ModernGetSettingByte(NULL,"CLUI","BottomClientMargin",SETTING_BOTTOMCLIENTMARIGN_DEFAULT);

-	}

-

-	if (g_CluiData.fDisableSkinEngine) return 0;

-

-	Skin->pMaskList=(LISTMODERNMASK*)mir_alloc(sizeof(LISTMODERNMASK));

-	memset(Skin->pMaskList,0,sizeof(LISTMODERNMASK));

-	Skin->szSkinPlace= ModernGetStringA(NULL,SKIN,"SkinFolder");

-	if (!Skin->szSkinPlace || (strchr(Skin->szSkinPlace, '%') && !ModernGetSettingByte(NULL,SKIN,"Modified",0)) ) 

-	{

-		BOOL bOnlyObjects=FALSE;

-		if (Skin->szSkinPlace && strchr(Skin->szSkinPlace, '%'))

-			bOnlyObjects=TRUE;

-		mir_free(Skin->szSkinPlace);

-		Skin->szSkinPlace=mir_strdup("%Default%");

-		ske_LoadSkinFromResource( bOnlyObjects );

-	}

-	//Load objects

-	{

-		DBCONTACTENUMSETTINGS dbces;

-		pCurrentSkin=Skin;

-		dbces.pfnEnumProc=ske_enumdb_SkinObjectsProc;

-		dbces.szModule=SKIN;

-		dbces.ofsSettings=0;

-		CallService(MS_DB_CONTACT_ENUMSETTINGS,0,(LPARAM)&dbces);

-

-		SortMaskList(pCurrentSkin->pMaskList);

-		ske_LinkSkinObjects(pCurrentSkin);

-	}

-	//Load Masks

-	return 0;

-}

-

-//surrogate to be called from outside

-void ske_LoadSkinFromDB(void) 

-{ 

-	ske_GetSkinFromDB(SKIN,&g_SkinObjectList); 

-	g_CluiData.dwKeyColor=ModernGetSettingDword(NULL,"ModernSettings","KeyColor",(DWORD)SETTING_KEYCOLOR_DEFAULT);

-}

-

-

-

-//

-

-

-/*

-static BOOL ske_ParseLineOfIniFile(char * Line, BOOL bOnlyObjects)

-{

-	DWORD i=0;

-	DWORD len=strlen(Line);

-	while (i<len && (Line[i]==' ' || Line[i]=='\t')) i++; //skip spaces&tabs

-	if (i>=len) return FALSE; //only spaces (or tabs)

-	if (len>0 && Line[len-1]==10) Line[len-1]='\0';

-	switch(Line[i])

-	{

-	case ';':

-		return FALSE; // start of comment is found

-	case '[':

-		//New section start here

-		if (iniCurrentSection) mir_free_and_nill(iniCurrentSection);

-		{

-			char *tbuf=Line+i+1;		

-			DWORD len2=strlen(tbuf);

-			DWORD k=len2;

-			while (k>0 && tbuf[k]!=']') k--; //searching close bracket

-			tbuf[k]='\0';   //closing string

-			if (k==0) return FALSE;

-			iniCurrentSection=mir_strdup(tbuf);

-		}

-		return TRUE;

-	default:

-		if (!iniCurrentSection) return FALSE;  //param found out of section

-		{

-			char *keyName=Line+i;

-			char *keyValue=Line+i;

-

-			DWORD eqPlace=0;

-			DWORD len2=strlen(keyName);

-			while (eqPlace<len2 && keyName[eqPlace]!='=') eqPlace++; //find '='

-			if (eqPlace==0 || eqPlace==len2) return FALSE; //= not found or no key name

-			keyName[eqPlace]='\0';

-			keyValue=keyName+eqPlace+1;

-			//remove tail spaces in Name

-			{

-				DWORD len3=strlen(keyName);

-				int j=len3-1;

-				while (j>0 && (keyName[j]==' ' || keyName[j]=='\t')) j--;

-				if (j>=0) keyName[j+1]='\0';

-			}		

-			//remove start spaces in Value

-			{

-				DWORD len3=strlen(keyValue);

-				DWORD j=0;

-				while (j<len3 && (keyValue[j]==' ' || keyValue[j]=='\t')) j++;

-				if (j<len3) keyValue+=j;

-			}

-			//remove tail spaces in Value

-			{

-				DWORD len3=strlen(keyValue);

-				int j=len3-1;

-				while (j>0 && (keyValue[j]==' ' || keyValue[j]=='\t')) j--;

-				if (j>=0) keyValue[j+1]='\0';

-			}

-			ske_WriteParamToDatabase(iniCurrentSection,keyName,keyValue,TRUE);

-		}

-	}

-	return FALSE;

-}

-*/

-//Load data from ini file

-

-

-

-//int ske_OldLoadSkinFromIniFile(char * szFileName)

-//{

-//	char bsn[MAXSN_BUFF_SIZE];

-//	char * Buff;

-//

-//	int i=0;

-//	int f=0;

-//	int ReadingSection=0;

-//	char AllowedSection[260];

-//	int AllowedAll=0;

-//	char t2[MAX_PATH];

-//	char t3[MAX_PATH];

-//

-//	DWORD retu=GetPrivateProfileSectionNamesA(bsn,MAXSN_BUFF_SIZE,szFileName);

-//	ske_DeleteAllSettingInSection("ModernSkin");

-//	ske_GetSkinFolder(szFileName,t2);

-//	ModernWriteSettingString(NULL,SKIN,"SkinFolder",t2);

-//	CallService(MS_UTILS_PATHTORELATIVE, (WPARAM)szFileName, (LPARAM)t3);

-//	ModernWriteSettingString(NULL,SKIN,"SkinFile",t3);

-//	Buff=bsn;

-//	AllowedSection[0]=0;

-//	do         

-//	{

-//		f=mir_strlen(Buff);

-//		if (f>0 && !mir_bool_strcmpi(Buff,"Skin_Description_Section"))

-//		{

-//			char b3[MAX_BUFF_SIZE];

-//			DWORD ret=0;

-//			ret=GetPrivateProfileSectionA(Buff,b3,MAX_BUFF_SIZE,szFileName);

-//			if (ret>MAX_BUFF_SIZE-3) continue;

-//			if (ret==0) continue;

-//			{

-//				DWORD p=0;

-//				char *s1;

-//				char *s2;

-//				char *s3;

-//				{

-//					DWORD t;

-//					BOOL LOCK=FALSE;

-//					for (t=0; t<ret-1;t++)

-//					{

-//						if (b3[t]=='\0') LOCK=FALSE;

-//						if (b3[t]=='=' && !LOCK) 

-//						{

-//							b3[t]='\0';

-//							LOCK=TRUE;

-//						}

-//					}

-//				}

-//				do

-//				{

-//					s1=b3+p;

-//

-//					s2=s1+mir_strlen(s1)+1;

-//					switch (s2[0])

-//					{

-//					case 'b':

-//						{

-//							BYTE P;

-//							//                            char ba[255];

-//							s3=s2+1;

-//							P=(BYTE)atoi(s3);

-//							ModernWriteSettingByte(NULL,Buff,s1,P);

-//						}

-//						break;

-//					case 'w':

-//						{

-//							WORD P;

-//							//                           char ba[255];

-//							s3=s2+1;

-//							P=(WORD)atoi(s3);

-//							ModernWriteSettingWord(NULL,Buff,s1,P);

-//						}break;

-//					case 'd':

-//						{

-//							DWORD P;

-//

-//							s3=s2+1;

-//							P=(DWORD)atoi(s3);

-//							ModernWriteSettingDword(NULL,Buff,s1,P);

-//						}break;

-//					case 's':

-//						{

-//							//                          char ba[255];

-//							char bb[255];

-//							s3=s2+1;

-//							strncpy(bb,s3,sizeof(bb));

-//							ModernWriteSettingString(NULL,Buff,s1,s3);

-//						}break;

-//					case 'f': //file

-//						{

-//							//                         char ba[255];

-//							char bb[255];

-//

-//							s3=s2+1;

-//							{

-//								char fn[MAX_PATH];

-//								int pp, i;

-//								pp=-1;

-//								CallService(MS_UTILS_PATHTORELATIVE, (WPARAM)szFileName, (LPARAM)fn);

-//								{

-//									for (i=0; i<mir_strlen(fn); i++)  if (fn[i]=='.') pp=i;

-//									if (pp!=-1)

-//									{

-//										fn[pp]='\0';

-//									}

-//								}                      

-//								sprintf(bb,"%s\\%s",fn,s3);

-//								ModernWriteSettingString(NULL,Buff,s1,bb);

-//							}

-//						}break;

-//					}

-//					p=p+mir_strlen(s1)+mir_strlen(s2)+2;

-//				} while (p<ret);

-//

-//			}

-//		}

-//		Buff+=mir_strlen(Buff)+1;

-//	}while (((DWORD)Buff-(DWORD)bsn)<retu);

-//	return 0;

-//}

-//

-

-

-

-static int ske_LoadSkinFromResource(BOOL bOnlyObjects)

-{

-

-	IniParser parser(g_hInst, MAKEINTRESOURCEA(IDR_MSF_DEFAULT_SKIN), "MSF", bOnlyObjects ? IniParser::FLAG_ONLY_OBJECTS : IniParser::FLAG_WITH_SETTINGS );

-	if ( !parser.CheckOK() ) return 0;

-

-	ske_DeleteAllSettingInSection("ModernSkin");

-	ModernWriteSettingString(NULL,SKIN,"SkinFolder","%Default%");

-	ModernWriteSettingString(NULL,SKIN,"SkinFile","%Default%");

-	parser.Parse( IniParser::WriteStrToDb, 0 );	

-	return 0;

-}

-

-//Load data from ini file

-int ske_LoadSkinFromIniFile(TCHAR * szFileName, BOOL bOnlyObjects)

-{

-	TCHAR skinFolder[MAX_PATH]={0};

-	TCHAR skinFile[MAX_PATH]={0};

-	if (_tcschr(szFileName,_T('%'))) 

-		return ske_LoadSkinFromResource( bOnlyObjects );

-

-	IniParser parser( szFileName, bOnlyObjects ? IniParser::FLAG_ONLY_OBJECTS : IniParser::FLAG_WITH_SETTINGS  );

-	if ( !parser.CheckOK() ) return 0;

-

-	ske_DeleteAllSettingInSection("ModernSkin");

-	IniParser::GetSkinFolder(szFileName,skinFolder);

-	CallService(MS_UTILS_PATHTORELATIVET, (WPARAM)szFileName, (LPARAM)skinFile);

-

-	ModernWriteSettingTString(NULL,SKIN,"SkinFolder", skinFolder);

-	ModernWriteSettingTString(NULL,SKIN,"SkinFile", skinFile);

-

-	parser.Parse( IniParser::WriteStrToDb, 1 );

-

-	return 0;

-}

-

-

-static int ske_enumdb_SkinSectionDeletionProc (const char *szSetting,LPARAM lParam)

-{

-

-	if (szSetting==NULL){return(0);};

-	nArrayLen++;

-	pszSettingName=(char **)realloc(pszSettingName,nArrayLen*sizeof(char *));

-	pszSettingName[nArrayLen-1]=_strdup(szSetting);

-	return(0);

-};

-static int ske_DeleteAllSettingInSection(char * SectionName)

-{

-	DBCONTACTENUMSETTINGS dbces;

-	nArrayLen=0;

-	pszSettingName=NULL;

-	dbces.pfnEnumProc=ske_enumdb_SkinSectionDeletionProc;

-	dbces.szModule=SectionName;

-	dbces.ofsSettings=0;

-

-	CallService(MS_DB_CONTACT_ENUMSETTINGS,0,(LPARAM)&dbces);

-

-	//delete all settings

-	if (nArrayLen==0){return(0);};

-	{

-		int i;

-		for (i=0;i<nArrayLen;i++)

-		{

-			ModernDeleteSetting(0,SectionName,pszSettingName[i]);

-			free(pszSettingName[i]);

-		};

-		free(pszSettingName);

-		pszSettingName=NULL;

-		nArrayLen=0;    

-	};

-	return(0);

-};

-

-

-BOOL ske_TextOutA(HDC hdc, int x, int y, char * lpString, int nCount)

-{

-	TCHAR *buf=(TCHAR *)mir_alloc((2+nCount)*sizeof(TCHAR));

-	BOOL res;

-	MultiByteToWideChar(CallService( MS_LANGPACK_GETCODEPAGE, 0, 0 ), 0, lpString, -1, buf, (2+nCount)*sizeof(TCHAR)); 

-	res=ske_TextOut(hdc,x,y,buf,nCount);

-	mir_free_and_nill(buf);

-	return res;

-}

-

-BOOL ske_TextOut(HDC hdc, int x, int y, LPCTSTR lpString, int nCount)

-{

-	int ta;

-	SIZE sz;

-	RECT rc={0};

-	if (!g_CluiData.fGDIPlusFail &&0) ///text via gdi+

-	{

-		TextOutWithGDIp(hdc,x,y,lpString,nCount);

-		return 0;

-	}

-	else

-

-	{

-		// return TextOut(hdc, x,y,lpString,nCount);

-		GetTextExtentPoint32(hdc,lpString,nCount,&sz);

-		ta=GetTextAlign(hdc);

-		SetRect(&rc,x,y,x+sz.cx,y+sz.cy);

-		ske_DrawText(hdc,lpString,nCount,&rc,DT_NOCLIP|DT_SINGLELINE|DT_LEFT);

-	}

-	return 1;

-}

-

-static INT_PTR ske_Service_AlphaTextOut(WPARAM wParam,LPARAM lParam)

-{

-	if (!wParam) return 0;

-	{

-		AlphaTextOutParams ap=*(AlphaTextOutParams*)wParam;

-		return ske_AlphaTextOut(ap.hDC,ap.lpString,ap.nCount,ap.lpRect,ap.format,ap.ARGBcolor);

-	}

-}

-

-static __inline void ske_SetMatrix( sbyte * matrix,

-										  sbyte a, sbyte b, sbyte c, 

-										  sbyte d, sbyte e, sbyte f, 

-										  sbyte g, sbyte h, sbyte i)

-{

-	matrix[0]=a;	matrix[1]=b;	matrix[2]=c;

-	matrix[3]=d;	matrix[4]=e;	matrix[5]=f;

-	matrix[6]=g;	matrix[7]=h;	matrix[8]=i;

-}

-

-static void ske_SetTextEffect(BYTE EffectID, DWORD FirstColor, DWORD SecondColor)

-{

-	if (EffectID>MAXPREDEFINEDEFFECTS) return; 

-	if (EffectID==-1) meCurrentEffect.EffectID=-1;

-	else

-	{

-		meCurrentEffect.EffectID=EffectID;

-		meCurrentEffect.EffectMatrix=ModernEffectsEnum[EffectID];

-		meCurrentEffect.EffectColor1=FirstColor;

-		meCurrentEffect.EffectColor2=SecondColor;

-	}

-}

-

-BOOL ske_ResetTextEffect(HDC hdc)

-{

-	int i;

-	if (!pEffectStack || !pEffectStack->realCount) return TRUE;

-	for (i=0; i<pEffectStack->realCount; i++)

-		if (pEffectStack->items[i] && ((EFFECTSSTACKITEM*)(pEffectStack->items[i]))->hdc==hdc)

-		{

-			EFFECTSSTACKITEM * effect=(EFFECTSSTACKITEM*)(pEffectStack->items[i]);

-			mir_free_and_nill(effect);

-			li.List_Remove(pEffectStack,i);

-			return TRUE;

-		}

-		return FALSE;

-};

-

-BOOL ske_SelectTextEffect(HDC hdc, BYTE EffectID, DWORD FirstColor, DWORD SecondColor)

-{

-	if (EffectID>MAXPREDEFINEDEFFECTS) return 0; 

-	if (EffectID==-1) return ske_ResetTextEffect(hdc);

-	if (!pEffectStack)

-	{

-		pEffectStack=li.List_Create(0,1);

-	}

-	{

-		int i;

-		for (i=0; i<pEffectStack->realCount; i++)

-			if (pEffectStack->items[i] && ((EFFECTSSTACKITEM*)(pEffectStack->items[i]))->hdc==hdc)

-			{

-				EFFECTSSTACKITEM * effect=(EFFECTSSTACKITEM*)(pEffectStack->items[i]);

-				effect->EffectID=EffectID;		    

-				effect->FirstColor=FirstColor;

-				effect->SecondColor=SecondColor;

-				return TRUE;

-			}

-	}

-	{

-		EFFECTSSTACKITEM * effect=(EFFECTSSTACKITEM *) mir_alloc(sizeof(EFFECTSSTACKITEM));

-		effect->hdc=hdc;

-		effect->EffectID=EffectID;

-		effect->FirstColor=FirstColor;

-		effect->SecondColor=SecondColor;

-		li.List_Insert(pEffectStack, effect, 0);

-		return TRUE;

-	}	  

-	return FALSE;

-}

-

-static BOOL ske_GetTextEffect(HDC hdc, MODERNEFFECT * modernEffect)

-{

-	int i=0;

-	if (!pEffectStack || !pEffectStack->realCount) return FALSE;

-	if (!modernEffect) return FALSE;

-	for (i=0; i<pEffectStack->realCount; i++)

-		if (pEffectStack->items[i] && ((EFFECTSSTACKITEM*)(pEffectStack->items[i]))->hdc==hdc)

-		{

-			EFFECTSSTACKITEM * effect=(EFFECTSSTACKITEM*)(pEffectStack->items[i]);

-			modernEffect->EffectID=effect->EffectID;		    

-			modernEffect->EffectColor1=effect->FirstColor;

-			modernEffect->EffectColor2=effect->SecondColor;

-			modernEffect->EffectMatrix=ModernEffectsEnum[effect->EffectID];

-			return TRUE;

-		}

-		return FALSE;

-}

-

-static BOOL ske_DrawTextEffect(BYTE* destPt,BYTE* maskPt, DWORD width, DWORD height, MODERNEFFECT *effect)

-{

-	sbyte *buf;

-	sbyte *outbuf;

-	sbyte *bufline, *buflineTop, *buflineMid;

-	int sign=0;

-	BYTE *maskline,*destline;

-	BYTE al,rl,gl,bl,ad,rd,gd,bd;

-	int k=0;

-	DWORD x,y;

-	sbyte *matrix;

-	BYTE mcTopStart;

-	BYTE mcBottomEnd;

-	BYTE mcLeftStart;

-	BYTE mcRightEnd;

-	BYTE effectCount;

-	int minX=width;

-	int maxX=0;

-	int minY=height;

-	int maxY=0;

-	if (effect->EffectID==0xFF) return FALSE;

-	if (!width || ! height) return FALSE;

-	if (!destPt) return FALSE;

-	buf=(sbyte*)malloc(width*height*sizeof(BYTE));

-	{

-		matrix=effect->EffectMatrix.matrix;

-		mcTopStart=2-effect->EffectMatrix.topEffect;

-		mcBottomEnd=3+effect->EffectMatrix.bottomEffect;

-		mcLeftStart=2-effect->EffectMatrix.leftEffect;

-		mcRightEnd=3+effect->EffectMatrix.rightEffect;

-		effectCount=effect->EffectMatrix.cycleCount;

-	}

-	al=255-((BYTE)(effect->EffectColor1>>24));

-	rl=GetRValue(effect->EffectColor1);

-	gl=GetGValue(effect->EffectColor1);

-	bl=GetBValue(effect->EffectColor1);

-	rd=GetRValue(effect->EffectColor2);

-	gd=GetGValue(effect->EffectColor2);

-	bd=GetBValue(effect->EffectColor2);

-	ad=255-((BYTE)(effect->EffectColor2>>24));

-	rd=GetRValue(effect->EffectColor2);

-	gd=GetGValue(effect->EffectColor2);

-	bd=GetBValue(effect->EffectColor2);

-

-	//Fill buffer by mid values of image

-	for (y=0; y<height; y++)

-	{

-		bufline=buf+y*width;

-		maskline=maskPt+((y*width)<<2);

-		for (x=0; x<width; x++)

-		{

-			BYTE a=(sbyte)(DWORD)((maskline[0]+maskline[2]+maskline[1]+maskline[1])>>4);

-			*bufline=a;

-			if (a!=0)

-			{

-				minX=min((int)x,minX);

-				minY=min((int)y,minY);

-				maxX=max((int)x,maxX);

-				maxY=max((int)y,maxY);

-			}

-			bufline++;

-			maskline+=4;

-		}

-	}

-	//Here perform effect on buffer and place results to outbuf

-	for (k=0; k<(effectCount&0x7F); k++)

-	{

-		minX = max( 0,           minX + mcLeftStart - 2 );

-		minY = max( 0,           minY + mcTopStart  - 2 );

-		maxX = min( (int)width,  maxX + mcRightEnd  - 1 );

-		maxY = min( (int)height, maxY + mcBottomEnd - 1 );

-

-		outbuf=(sbyte*)malloc(width*height*sizeof(sbyte));

-		memset(outbuf,0,width*height*sizeof(sbyte));

-		for (y=(DWORD)minY; y<(DWORD)maxY; y++)

-		{

-			int val;

-			bufline=outbuf+y*width+minX;

-			buflineMid=buf+y*width+minX; 

-			for (x=(DWORD)minX; x<(DWORD)maxX; x++)

-			{			

-				int matrixHor,matrixVer;

-				val=0;			

-				for (matrixVer=mcTopStart; matrixVer<mcBottomEnd; matrixVer++)

-				{

-					int buflineStep = width*(matrixVer-2);

-					int as=y+matrixVer-2;

-					sbyte * buflineTopS=NULL;

-					if (as>=0 && (DWORD)as<height) buflineTopS=buflineMid+buflineStep;

-

-					for (matrixHor=mcLeftStart; matrixHor<mcRightEnd;matrixHor++)

-					{						

-						int a=as;

-						buflineTop = buflineTopS;

-						a=x+matrixHor-2;

-						if (buflineTop && a>=0 && (DWORD)a<width) buflineTop+=matrixHor-2;

-						else buflineTop=NULL;

-						if (buflineTop) 

-							val+=((*buflineTop)*matrix[matrixVer*5+matrixHor]); 					

-					}

-				}

-				val=(val+1)>>5;

-				*bufline=(sbyte)((val>127)?127:(val<-125)?-125:val);

-				bufline++;

-				buflineMid++;

-			}

-		}

-		free(buf);

-		buf=outbuf;

-	}

-	{

-		BYTE r1,b1,g1,a1;

-		b1=bl; r1=rl; g1=gl; a1=al; sign=1;

-		//perform out to dest

-		for (y=0; y<height; y++)

-		{		

-			bufline=buf+y*width;

-			destline=destPt+((y*width)<<2);

-			for (x=0; x<width; x++)

-			{

-				sbyte val=*bufline;

-				BYTE absVal=((val<0)?-val:val);

-

-				if (val!=0)

-				{	

-					if (val>0 && sign<0)

-					{ b1=bl; r1=rl; g1=gl; a1=al; sign=1;}

-					else if (val<0 && sign>0)

-					{ b1=bd; r1=rd; g1=gd; a1=ad; sign=-1;}

-

-					absVal=absVal*a1/255;				

-

-					destline[0]=((destline[0]*(128-absVal))+absVal*b1)>>7;

-					destline[1]=((destline[1]*(128-absVal))+absVal*g1)>>7;

-					destline[2]=((destline[2]*(128-absVal))+absVal*r1)>>7;

-					destline[3]+=((255-destline[3])*(a1*absVal))/32640;				

-				}

-				bufline++;

-				destline+=4;

-			}

-		}

-		free(buf);

-	}

-	return FALSE;

-}

-

-static int ske_AlphaTextOut (HDC hDC, LPCTSTR lpString, int nCount, RECT * lpRect, UINT format, DWORD ARGBcolor)

-{

-	if ( !( lpString && lpRect ) )

-	{

-		DebugBreak();

-		return 0;

-	}

-

-	// Step first fill fast calc correction tables:

-	static bool _tables_empty = true;

-	static BYTE gammaTbl[256];			// Gamma correction table

-	static WORD blueMulTbl[256];		// blue  coefficient multiplication table

-	static WORD greenMulTbl[256];		// green coefficient multiplication table

-	static WORD redMulTbl[256];			// red   coefficient multiplication table

-	if ( _tables_empty )

-	{

-		// fill tables

-		double gammaCfPw = 1000 / (double)ModernGetSettingRangedWord(NULL,"ModernData","AlphaTextOutGamma", 700, 1, 5000 );

-		BYTE blueCf    = ModernGetSettingByte(NULL,"ModernData","AlphaTextOutBlueCorrection", 28 );

-		BYTE redCf     = ModernGetSettingByte(NULL,"ModernData","AlphaTextOutRed Correction", 77 );

-		BYTE greenCf   = ModernGetSettingByte(NULL,"ModernData","AlphaTextOutGreen Correction", 151 );

-

-		for ( int i = 0; i < 256; i++ )

-		{

-			gammaTbl[i]= (BYTE)( 255 * pow( (double)i / 255, gammaCfPw ) );

-			blueMulTbl[i] = i * blueCf;

-			redMulTbl[i] = i * redCf;

-			greenMulTbl[i] = i * greenCf;

-		}

-	}

-

-	// Calc len of input string

-	if ( nCount == -1 ) nCount = lstrlen( lpString );

-

-	// retrieve destination bitmap bits

-	HBITMAP hDestBitmap = (HBITMAP) GetCurrentObject( hDC, OBJ_BITMAP );

-	BITMAP  bmpDest;

-	GetObject( hDestBitmap, sizeof(BITMAP), &bmpDest );

-

-	BOOL destHasNotDIB = FALSE;

-	BYTE * pDestBits = NULL;

-	if ( bmpDest.bmBits == NULL )

-	{

-		destHasNotDIB = TRUE;

-		pDestBits = (BYTE*) malloc ( bmpDest.bmHeight * bmpDest.bmWidthBytes );

-		GetBitmapBits( hDestBitmap, bmpDest.bmHeight*bmpDest.bmWidthBytes, pDestBits );

-	}

-	else 

-		pDestBits=(BYTE*)bmpDest.bmBits;

-

-	BOOL isDest16bit=( bmpDest.bmBitsPixel ) != 32;

-

-

-	// Creating offscreen buffer

-	HDC hOffscreenDC = CreateCompatibleDC( hDC );

-

-	// Font to be used to draw text

-	HFONT hFont      = (HFONT)GetCurrentObject( hDC, OBJ_FONT);

-	HFONT hOldOffscreenFont = (HFONT)SelectObject( hOffscreenDC, hFont );

-

-	// Calculating text geometric size

-	RECT workRect = *lpRect;

-	int  workRectWidth  = workRect.right - workRect.left;

-	int  workRectHeight = workRect.bottom - workRect.top;

-	

-	if ( workRectWidth <= 0 || workRectHeight <= 0 )

-		return 0;

-

-	SIZE textSize;

-	GetTextExtentPoint32( hOffscreenDC, lpString, nCount, &textSize );

-

-	LPCTSTR lpWorkString = lpString;

-	BOOL bNeedFreeWorkString = FALSE;

-

-	// if we need to cut the text with ellipsis

-	if ( ( format&DT_END_ELLIPSIS ) && textSize.cx > workRectWidth )

-	{

-		// Calc geometric width of ellipsis

-		SIZE szEllipsis;

-		GetTextExtentPoint32A(hOffscreenDC,"...",3,&szEllipsis);

-		szEllipsis.cx++;                                          // CORRECTION: some width correction

-

-		// Calc count of visible chars

-		int visibleCharCount = nCount;

-		if ( workRectWidth > szEllipsis.cx)

-		{

-			GetTextExtentExPoint( hOffscreenDC, lpString, nCount,

-			                      workRectWidth - szEllipsis.cx,

-			                      &visibleCharCount, NULL, &textSize );

-		}

-		else

-		{

-			GetTextExtentExPoint( hOffscreenDC, lpString, nCount,

-			                     0, &visibleCharCount, NULL, &textSize);

-		}

-

-		// replace end of string by elipsis

-		bNeedFreeWorkString = TRUE;

-		lpWorkString = (TCHAR*) malloc( ( visibleCharCount + 4) * sizeof(TCHAR) );

-		

-		memcpy( (void*) lpWorkString, lpString, visibleCharCount * sizeof(TCHAR) );

-		memcpy( (void*) ( lpWorkString + visibleCharCount ), _T("..."), 4 * sizeof(TCHAR)); // 3 + 1

-		

-		nCount = visibleCharCount + 3;

-	}

-

-	// Calc sizes and offsets

-

-	textSize.cx += 2;             // CORRECTION: for italic

-

-	int drx = 0;                  // x-axis offset of draw point

-

-	if ( workRectWidth > textSize.cx )

-	{

-		if ( format & ( DT_RIGHT | DT_RTLREADING ) ) 

-		{

-			drx = workRectWidth - textSize.cx;

-		}

-		else if ( format & DT_CENTER ) 

-		{

-			drx = ( workRectWidth - textSize.cx ) >> 1;

-		}

-	}

-	else

-	{

-		textSize.cx = workRectWidth;

-	}

-

-	int dry = 0;                  // y-axis offset of draw point

-

-	if ( workRectHeight > textSize.cy )

-	{

-		if ( format & DT_BOTTOM ) 

-		{

-			dry = workRectHeight - textSize.cy;

-		}

-		else if ( format & DT_VCENTER ) 

-		{

-			dry = ( workRectHeight - textSize.cy ) >> 1;

-		}

-	}

-	else

-	{

-		textSize.cy = workRectHeight;

-	}

-

-	textSize.cx += 4;    // CORRECTION: for effects ???

-	textSize.cy += 4;	 // CORRECTION: for effects ???

-

-	if ( textSize.cx > 0 && textSize.cy > 0 )     // Ok we need to paint

-	{

-		// probably here are mess ofscreen and temp buff dc

-

-		//Create bitmap image for offscreen

-		BYTE * bits     = NULL;

-		HBITMAP hbmp    = ske_CreateDIB32Point( textSize.cx, textSize.cy, (void**)&bits );

-		if ( bits != NULL ) 

-		{

-			HBITMAP holdbmp = (HBITMAP)SelectObject( hOffscreenDC, hbmp );

-

-			//Create buffer bitmap image for temp text

-			BYTE *  bufbits  = NULL;

-			HBITMAP bufbmp   = ske_CreateDIB32Point( textSize.cx, textSize.cy, (void**)&bufbits );

-			if ( bufbits != NULL )

-			{

-				HDC     bufDC     = CreateCompatibleDC( hDC );

-				HBITMAP bufoldbmp = (HBITMAP)SelectObject( bufDC, bufbmp );

-				HFONT   hOldBufFont = (HFONT)SelectObject( bufDC, hFont );

-				SetBkColor( bufDC,  RGB( 0, 0, 0 ) );

-				SetTextColor( bufDC,RGB(255,255,255) );

-				

-				// Copy from destination to temp buffer

-				BitBlt( hOffscreenDC, 0, 0, textSize.cx, textSize.cy, hDC, workRect.left + drx - 2, workRect.top + dry - 2, SRCCOPY );

-

-				//Draw text on offscreen bitmap

-				TextOut( bufDC, 2, 2, lpWorkString, nCount);

-

-				MODERNEFFECT effect;

-				if (ske_GetTextEffect( hDC, &effect ) ) 

-					ske_DrawTextEffect( bits, bufbits, textSize.cx, textSize.cy, &effect );	

-

-				//RenderText

-				RECT drawRect;

-				drawRect.left = 0; drawRect.top = 0;

-				drawRect.right = textSize.cx;

-				drawRect.bottom = textSize.cy;

-

-				DWORD x,y;

-				DWORD width=textSize.cx;

-				DWORD heigh=textSize.cy;

-

-				BYTE * pDestScanLine;

-				BYTE * pBufScanLine;

-				BYTE * pix;

-				BYTE * bufpix;

-

-				BYTE al = 255 - ((BYTE)( ARGBcolor >> 24 ));

-				BYTE r = GetRValue( ARGBcolor );

-				BYTE g = GetGValue( ARGBcolor );

-				BYTE b = GetBValue( ARGBcolor );      

-

-				for ( y = 2; y < heigh - 2; y++ )

-				{

-					int lineBytes = y * (width<<2);

-					

-					pDestScanLine = bits + lineBytes;

-					pBufScanLine  = bufbits + lineBytes;

-					

-					for ( x = 2; x < width - 2; x++)

-					{

-						pix    = pDestScanLine + ( x<<2 );

-						bufpix = pBufScanLine  + ( x<<2 );

-

-						// Monochromatic

-						BYTE bx = gammaTbl[ bufpix[0] ];

-						BYTE gx = gammaTbl[ bufpix[1] ];

-						BYTE rx = gammaTbl[ bufpix[2] ];

-

-						if ( al != 255 )

-						{

-							bx*=al/255;

-							gx*=al/255;

-							rx*=al/255;

-						}

-						BYTE ax = (BYTE)( ( (DWORD)rx*77 + (DWORD)gx * 151 + (DWORD)bx *28 + 128 ) / 256 );

-

-						if (ax)

-						{

-							//Normalize components to gray

-							BYTE axx = 255 - ( ( r + g + b ) >> 2 ) ; // Coefficient of grayance, more white font - more gray edges

-							WORD atx = ax * (255 - axx);

-							bx=( atx + bx * axx )/255;

-							gx=( atx + gx * axx )/255;

-							rx=( atx + rx * axx )/255;

-

-							short rrx, grx, brx;

-							brx=(short)((b-pix[0])*bx/255);

-							grx=(short)((g-pix[1])*gx/255);

-							rrx=(short)((r-pix[2])*rx/255);

-

-							pix[0]+=brx;

-							pix[1]+=grx;

-							pix[2]+=rrx;

-							pix[3]=(BYTE)(ax+(BYTE)(255-ax)*pix[3]/255);

-						}

-					}

-				}

-

-				//Blit to destination

-				BitBlt( hDC, workRect.left + drx - 2, workRect.top + dry - 2, textSize.cx, textSize.cy, hOffscreenDC, 0, 0, SRCCOPY );

-

-				//free resources

-				SelectObject(bufDC,bufoldbmp);

-				DeleteObject(bufbmp);

-				SelectObject(bufDC, hOldBufFont );

-				mod_DeleteDC(bufDC);

-			}

-			SelectObject(hOffscreenDC,holdbmp);

-			DeleteObject(hbmp);

-		}

-	}

-

-	// Final cleanup 

-	SelectObject( hOffscreenDC, hOldOffscreenFont );

-	DeleteDC( hOffscreenDC ); 

-	

-	if ( destHasNotDIB )

-		free( pDestBits );

-	

-	if ( bNeedFreeWorkString )

-		free( (void*)lpWorkString );

-	

-	return 0;

-}

-

-static int ske_DrawTextWithEffectWorker( HDC hdc, LPCTSTR lpString, int nCount, RECT * lpRect, UINT format, MODERNFONTEFFECT * effect )

-{     

-    if (format&DT_CALCRECT) return DrawText(hdc,lpString,nCount,lpRect,format);

-

-    if (format&DT_RTLREADING) SetTextAlign(hdc,TA_RTLREADING);

-    DWORD color=GetTextColor(hdc);

-

-    RECT r=*lpRect;	

-    OffsetRect(&r,1,1);

-    DWORD form = format;

-    if ( effect && effect->effectIndex )

-        ske_SelectTextEffect( hdc, effect->effectIndex - 1, effect->baseColour, effect->secondaryColour );

-

-    int res = ske_AlphaTextOut(hdc, lpString, nCount, lpRect, form, color );

-

-    if ( effect && effect->effectIndex )

-        ske_ResetTextEffect( hdc );

-

-    return res;

-}

-

-INT_PTR ske_Service_DrawTextWithEffect( WPARAM wParam, LPARAM lParam )

-{

-    DrawTextWithEffectParam * p = ( DrawTextWithEffectParam * ) wParam;

-    if ( p->cbSize != sizeof(DrawTextWithEffectParam) )

-        return FALSE;

-    return ske_DrawTextWithEffectWorker( p->hdc, p->lpchText, p->cchText, p->lprc, p->dwDTFormat, p->pEffect );

-}

-

-BOOL ske_DrawTextA(HDC hdc, char * lpString, int nCount, RECT * lpRect, UINT format)

-{

-	TCHAR *buf=mir_a2u(lpString);

-	BOOL res;

-	res=ske_DrawText(hdc,buf,nCount,lpRect,format);

-	mir_free(buf);

-	return res;

-}

-

-

-BOOL ske_DrawText(HDC hdc, LPCTSTR lpString, int nCount, RECT * lpRect, UINT format)

-{

-	DWORD form=0, color=0;

-	RECT r=*lpRect;	

-	OffsetRect(&r,1,1);

-	if (format&DT_RTLREADING) SetTextAlign(hdc,TA_RTLREADING);

-	if (format&DT_CALCRECT) return DrawText(hdc,lpString,nCount,lpRect,format);

-	if (format&DT_FORCENATIVERENDER || g_CluiData.fDisableSkinEngine) 

-		return DrawText(hdc,lpString,nCount,lpRect,format&~DT_FORCENATIVERENDER);

-	form=format;

-	color=GetTextColor(hdc);

-	if (!g_CluiData.fGDIPlusFail &&0) ///text via gdi+

-	{

-		TextOutWithGDIp(hdc,lpRect->left,lpRect->top,lpString,nCount);

-		return 0;

-	}

-	return ske_AlphaTextOut(hdc,lpString,nCount,lpRect,form,color);

-}

-

-HICON ske_ImageList_GetIcon(HIMAGELIST himl, int i, UINT fStyle)

-{

-	IMAGEINFO imi={0};

-	BITMAP bm={0};

-	if ( IsWinVerXPPlus()  && i!=-1 )

-	{

-		ImageList_GetImageInfo(himl,i,&imi);

-		GetObject(imi.hbmImage,sizeof(bm),&bm);

-		if (bm.bmBitsPixel==32) //stupid bug of Microsoft 

-			// Icons bitmaps are not premultiplied

-			// So Imagelist_AddIcon - premultiply alpha

-			// But incorrect - it is possible that alpha will

-			// be less than color and

-			// ImageList_GetIcon will return overflowed colors

-			// TODO: Direct draw Icon from imagelist without 

-			// extracting of icon

-		{

-			BYTE * bits=NULL;	

-			bits=(BYTE*)bm.bmBits;

-			if (!bits)

-			{

-				bits=(BYTE*)malloc(bm.bmWidthBytes*bm.bmHeight);

-				GetBitmapBits(imi.hbmImage,bm.bmWidthBytes*bm.bmHeight,bits);

-			} 

-			{

-				int iy;

-				BYTE *bcbits;

-				int wb=((imi.rcImage.right-imi.rcImage.left)*bm.bmBitsPixel>>3);

-				bcbits=bits+(bm.bmHeight-imi.rcImage.bottom)*bm.bmWidthBytes+(imi.rcImage.left*bm.bmBitsPixel>>3);

-				for (iy=0; iy<imi.rcImage.bottom-imi.rcImage.top; iy++)

-				{

-					int x;

-					// Dummy microsoft fix - alpha can be less than r,g or b

-					// Looks like color channels in icons should be non-premultiplied with alpha

-					// But AddIcon store it premultiplied (incorrectly cause can be Alpha==7F, but R,G or B==80

-					// So i check that alpha is 0x7F and set it to 0x80

-					DWORD *c=((DWORD*)bcbits);

-					for (x=0;x<imi.rcImage.right-imi.rcImage.left; x++)

-					{		  

-						DWORD val=*c;

-						BYTE a= (BYTE)((val)>>24);

-						if (a!=0)

-						{

-							BYTE r= (BYTE)((val&0xFF0000)>>16);

-							BYTE g= (BYTE)((val&0xFF00)>>8);

-							BYTE b= (BYTE)(val&0xFF);

-							if (a<r || a<g || a<b)

-							{

-								a=max(max(r,g),b);

-								val=a<<24|r<<16|g<<8|b;

-								*c=val;

-							}

-						}

-						c++;

-					}

-					bcbits+=bm.bmWidthBytes;

-				}

-			}  

-			if (!bm.bmBits) 

-			{ 

-				SetBitmapBits(imi.hbmImage,bm.bmWidthBytes*bm.bmHeight,bits);

-				free(bits);

-			}

-		}

-	}

-	return ImageList_GetIcon(himl,i,ILD_NORMAL);

-}

-

-////////////////////////////////////////////////////////////////////////////

-// This creates new dib image from Imagelist icon ready to alphablend it 

-

-HBITMAP ske_ExtractDIBFromImagelistIcon( HIMAGELIST himl,int index, int * outWidth, int * outHeight)

-{

-	return NULL;

-}

-

-BOOL ske_ImageList_DrawEx( HIMAGELIST himl,int i,HDC hdcDst,int x,int y,int dx,int dy,COLORREF rgbBk,COLORREF rgbFg,UINT fStyle)

-{    

-	//the routine to directly draw icon from image list without creating icon from there - should be some faster

-

-	if (i<0) return FALSE;

-

-	if (g_CluiData.fDisableSkinEngine)

-		return ImageList_DrawEx( himl, i, hdcDst, x, y, dx, dy, rgbBk, rgbFg, fStyle);

-

-	BYTE alpha;

-	if (fStyle&ILD_BLEND25) alpha=64;

-	else if (fStyle&ILD_BLEND50) alpha=128;

-	else alpha=255;

-

-	HICON hIcon=ske_ImageList_GetIcon(himl,i,ILD_NORMAL);        

-	if (hIcon) 

-	{

-		ske_DrawIconEx(hdcDst,x,y,hIcon,dx?dx:GetSystemMetrics(SM_CXSMICON),dy?dy:GetSystemMetrics(SM_CYSMICON),0,NULL,DI_NORMAL|(alpha<<24));

-		DestroyIcon(hIcon);

-		return TRUE;

-	}

-	return FALSE;

-}

-

-

-static INT_PTR ske_Service_DrawIconEx(WPARAM wParam,LPARAM lParam)

-{

-	DrawIconFixParam *p=(DrawIconFixParam*)wParam;

-	if (!p) return 0;

-	return ske_DrawIconEx(p->hdc,p->xLeft,p->yTop,p->hIcon,p->cxWidth,p->cyWidth,p->istepIfAniCur,p->hbrFlickerFreeDraw,p->diFlags);

-}

-

-

-BOOL ske_DrawIconEx(HDC hdcDst,int xLeft,int yTop,HICON hIcon,int cxWidth,int cyWidth, UINT istepIfAniCur, HBRUSH hbrFlickerFreeDraw, UINT diFlags)

-{

-

-	ICONINFO ici;

-	BYTE alpha=(BYTE)((diFlags&0xFF000000)>>24);

-

-

-	HDC imDC;

-	HBITMAP oldBmp, imBmp,tBmp;

-	BITMAP imbt,immaskbt;

-	BYTE * imbits;

-	BYTE * imimagbits;

-	BYTE * immaskbits;

-	DWORD cx,cy,icy;

-	BYTE *t1, *t2, *t3;

-

-	BOOL NoDIBImage=FALSE;

-	//lockimagelist

-	BYTE hasmask=FALSE;

-	BYTE no32bit=FALSE;

-	BYTE noMirrorMask=FALSE;

-	BYTE hasalpha=FALSE;

-	alpha=alpha?alpha:255;

-

-	if ( g_CluiData.fDisableSkinEngine && !(diFlags&0x80) )

-		return DrawIconEx(hdcDst,xLeft,yTop,hIcon,cxWidth,cyWidth,istepIfAniCur,hbrFlickerFreeDraw,diFlags&0xFFFF7F);

-

-	if (!GetIconInfo(hIcon,&ici))  return 0;

-

-	GetObject(ici.hbmColor,sizeof(BITMAP),&imbt);

-	if (imbt.bmWidth*imbt.bmHeight==0)

-	{

-		DeleteObject(ici.hbmColor);

-		DeleteObject(ici.hbmMask);

-		return 0;

-	}

-	GetObject(ici.hbmMask,sizeof(BITMAP),&immaskbt);

-	cy=imbt.bmHeight;

-

-	if (imbt.bmBitsPixel!=32)

-	{

-		HDC tempDC1;

-		HBITMAP otBmp;

-		no32bit=TRUE;

-		tempDC1=CreateCompatibleDC(hdcDst);

-		tBmp=ske_CreateDIB32(imbt.bmWidth,imbt.bmHeight);

-		if (tBmp) 

-		{

-			GetObject(tBmp,sizeof(BITMAP),&imbt);

-			otBmp=(HBITMAP)SelectObject(tempDC1,tBmp);

-			DrawIconEx(tempDC1,0,0,hIcon,imbt.bmWidth,imbt.bmHeight,istepIfAniCur,hbrFlickerFreeDraw,DI_IMAGE);   

-			noMirrorMask=TRUE;

-

-		}

-		SelectObject(tempDC1,otBmp);

-		mod_DeleteDC(tempDC1);

-	}

-	/*

-	if (imbt.bmBitsPixel!=32)

-	{

-	HDC tempDC1;

-	HBITMAP otBmp;

-	no32bit=TRUE;

-	tempDC1=ske_RequestBufferDC(hdcDst,BUFFER_DRAWICON,imbt.bmWidth,imbt.bmHeight);

-	if (tempDC1) 

-	{

-	DrawIconEx(tempDC1,0,0,hIcon,imbt.bmWidth,imbt.bmHeight,istepIfAniCur,hbrFlickerFreeDraw,DI_IMAGE);   

-	noMirrorMask=TRUE;

-	ske_ReleaseBufferDC(tempDC1,2000); //keep buffer for 2 seconds

-	}        

-	}

-	*/

-	if (imbt.bmBits==NULL)

-	{

-		NoDIBImage=TRUE;

-		imimagbits=(BYTE*)malloc(cy*imbt.bmWidthBytes);

-		GetBitmapBits(ici.hbmColor,cy*imbt.bmWidthBytes,(void*)imimagbits);

-	}

-	else imimagbits=(BYTE*)imbt.bmBits;

-

-

-	if (immaskbt.bmBits==NULL)

-	{

-		immaskbits=(BYTE*)malloc(cy*immaskbt.bmWidthBytes);

-		GetBitmapBits(ici.hbmMask,cy*immaskbt.bmWidthBytes,(void*)immaskbits);

-	}

-	else 

-		immaskbits=(BYTE*)immaskbt.bmBits;

-	icy=imbt.bmHeight;

-	cx=imbt.bmWidth;

-	imDC=CreateCompatibleDC(hdcDst);

-	imBmp=ske_CreateDIB32Point(cx,icy,(void**)&imbits);

-	oldBmp=(HBITMAP)SelectObject(imDC,imBmp);

-	if (imbits!=NULL && imimagbits!=NULL && immaskbits!=NULL)

-	{

-		int x; int y;

-		int bottom,right,top,h;

-		int mwb,mwb2;

-		mwb=immaskbt.bmWidthBytes;

-		mwb2=imbt.bmWidthBytes;

-		bottom=icy;

-		right=cx;   

-		top=0;

-		h=icy;

-		for (y=top;(y<bottom)&&!hasmask; y++)

-		{ 

-			t1=immaskbits+y*mwb;

-			for (x=0; (x<mwb)&&!hasmask; x++)

-				hasmask|=(*(t1+x)!=0);

-		}

-

-		for (y=top;(y<bottom)&&!hasalpha; y++)

-		{

-			t1=imimagbits+(cy-y-1)*mwb2;

-			for (x=0; (x<right)&&!hasalpha; x++)

-				hasalpha|=(*(t1+(x<<2)+3)!=0);

-		}

-

-		for (y=0; y<(int)icy; y++)

-		{

-			t1=imimagbits+(h-y-1-top)*mwb2;

-			t2=imbits+(!no32bit?y:(icy-y-1))*mwb2;

-			t3=immaskbits+(noMirrorMask?y:(h-y-1-top))*mwb;

-			for (x=0; x<right; x++)

-			{

-				DWORD * src, *dest;               

-				BYTE mask=0;

-				BYTE a = 0; 

-				src=(DWORD*)(t1+(x<<2));

-				dest=(DWORD*)(t2+(x<<2));              

-				if (hasalpha && !hasmask)  

-					a=((BYTE*)src)[3];

-				else

-				{ 

-					mask=((1<<(7-x%8))&(*(t3+(x>>3))))!=0;

-					if (mask)// && !hasalpha)		

-					{

-						if (!hasalpha) 

-						{ *dest=0; continue; }

-						else

-						{ 

-							if (((BYTE*)src)[3]>0 )

-								a = ((BYTE*)src)[3];

-							else

-							    a = 0;

-						}

-					}

-					else if (hasalpha || hasmask)

-						a=(((BYTE*)src)[3]>0?((BYTE*)src)[3]:255);

-					else if (!hasalpha && !hasmask)

-						a=255;

-					else {  *dest=0; continue; }

-				}

-				if (a>0)

-				{

-					((BYTE*)dest)[3]=a;

-					((BYTE*)dest)[0]=((BYTE*)src)[0]*a/255;

-					((BYTE*)dest)[1]=((BYTE*)src)[1]*a/255;

-					((BYTE*)dest)[2]=((BYTE*)src)[2]*a/255;

-				}

-				else 

-					*dest=0;

-			}

-		}

-	}

-	{

-		BLENDFUNCTION bf={AC_SRC_OVER, diFlags&128, alpha, AC_SRC_ALPHA };   

-		ske_AlphaBlend(hdcDst,xLeft,yTop,cxWidth, cyWidth, imDC,0,0, cx,icy,bf);

-	}

-	if (immaskbt.bmBits==NULL) free(immaskbits);

-	if (imbt.bmBits==NULL) free(imimagbits);

-	SelectObject(imDC,oldBmp);

-	DeleteObject(imBmp);

-	if(no32bit)DeleteObject(tBmp);

-	DeleteObject(ici.hbmColor);

-	DeleteObject(ici.hbmMask);

-	SelectObject(imDC,GetStockObject(DEFAULT_GUI_FONT));

-	mod_DeleteDC(imDC);

-	return 1;// DrawIconExS(hdc,xLeft,yTop,hIcon,cxWidth,cyWidth,istepIfAniCur,hbrFlickerFreeDraw,diFlags);

-}

-

-

-

-int ske_PrepeareImageButDontUpdateIt(RECT * r)

-{

-	if (g_CluiData.fLayered)

-	{

-		mutex_bLockUpdate=1;

-		ske_DrawNonFramedObjects(TRUE,r);

-		ske_ValidateFrameImageProc(r);

-		mutex_bLockUpdate=0;

-		return 0;

-	}

-	else

-	{

-		return ske_ReCreateBackImage(FALSE,r);

-	}

-	return 0;

-}

-

-int ske_RedrawCompleteWindow()

-{   

-	if (g_CluiData.fLayered)

-	{ 

-		ske_DrawNonFramedObjects(TRUE,0);

-		CallService(MS_SKINENG_INVALIDATEFRAMEIMAGE,0,0);   

-	}

-	else

-	{

-		RedrawWindow(pcli->hwndContactList,NULL,NULL,RDW_ALLCHILDREN|RDW_ERASE|RDW_INVALIDATE|RDW_FRAME);

-	}

-	return 0;

-}

-// Request to repaint frame or change/drop callback data

-// wParam = hWnd of called frame

-// lParam = pointer to sPaintRequest (or NULL to redraw all)

-// return 2 - already queued, data updated, 1-have been queued, 0 - failure

-

-static INT_PTR ske_Service_UpdateFrameImage(WPARAM wParam, LPARAM lParam)           // Immideately recall paint routines for frame and refresh image

-{

-	if ( MirandaLoading() ) return 0;

-

-	RECT wnd;

-	FRAMEWND *frm;

-	BOOL NoCancelPost=0;

-	BOOL IsAnyQueued=0;

-	if (!g_CluiData.mutexOnEdgeSizing)

-		GetWindowRect(pcli->hwndContactList,&wnd);

-	else

-		wnd=g_rcEdgeSizingRect;

-	if (!g_CluiData.fLayered)

-	{

-		RedrawWindow((HWND)wParam,NULL,NULL,RDW_UPDATENOW|RDW_ERASE|RDW_INVALIDATE|RDW_FRAME);

-		return 0;

-	}

-	if (g_pCachedWindow==NULL) ske_ValidateFrameImageProc(&wnd);

-	else if (g_pCachedWindow->Width!=wnd.right-wnd.left || g_pCachedWindow->Height!=wnd.bottom-wnd.top) ske_ValidateFrameImageProc(&wnd);

-	else if (wParam==0) ske_ValidateFrameImageProc(&wnd);

-	else // all Ok Update Single Frame

-	{

-		// TO BE LOCKED OR PROXIED

-		frm=FindFrameByItsHWND((HWND)wParam);

-		if (!frm)  ske_ValidateFrameImageProc(&wnd);

-		// Validate frame, update window image and remove it from queue

-		else 

-		{

-			if(frm->UpdateRgn)

-			{

-				DeleteObject(frm->UpdateRgn);

-				frm->UpdateRgn=0;

-			}

-			ske_ValidateSingleFrameImage(frm,0);

-			ske_UpdateWindowImage();

-			NoCancelPost=1;

-			//-- Remove frame from queue

-			if (flag_bUpdateQueued)

-			{

-				int i;

-				frm->bQueued=0;

-				for(i=0;i<g_nFramesCount;i++)

-					if(IsAnyQueued|=g_pfwFrames[i].bQueued) break;

-			}

-		}

-	}       

-	if ((!NoCancelPost || !IsAnyQueued) && flag_bUpdateQueued) // no any queued updating cancel post or need to cancel post

-	{

-		flag_bUpdateQueued=0;

-		g_flag_bPostWasCanceled=1;

-	}

-	return 1;   

-}

-static INT_PTR ske_Service_InvalidateFrameImage(WPARAM wParam, LPARAM lParam)       // Post request for updating

-{

-	if ( MirandaLoading() ) return 0; 

-	if (wParam)

-	{

-		FRAMEWND *frm=FindFrameByItsHWND((HWND)wParam);

-		sPaintRequest * pr=(sPaintRequest*)lParam;

-		if (!g_CluiData.fLayered || (frm && frm->floating)) return InvalidateRect((HWND)wParam,pr?(RECT*)&(pr->rcUpdate):NULL,FALSE);

-		if (frm) 

-		{

-			if (frm->PaintCallbackProc!=NULL)

-			{

-				frm->PaintData=(sPaintRequest *)pr;

-				frm->bQueued=1;

-				if (pr)

-				{

-					HRGN r2;

-					if (!IsRectEmpty(&pr->rcUpdate))

-					{

-						RECT rcClient;

-						RECT rcUpdate;

-						GetClientRect(frm->hWnd,&rcClient);

-						IntersectRect( &rcUpdate, &rcClient, &pr->rcUpdate );

-						if ( IsRectEmpty( &rcUpdate ) )

-							return 0;

-						r2=CreateRectRgn( rcUpdate.left, rcUpdate.top, rcUpdate.right, rcUpdate.bottom );

-					}

-					else

-					{

-						RECT r;

-						GetClientRect(frm->hWnd,&r);

-						r2=CreateRectRgn(r.left,r.top,r.right,r.bottom);

-					}

-					if (!frm->UpdateRgn)

-					{

-						frm->UpdateRgn=CreateRectRgn(0,0,1,1);

-						CombineRgn(frm->UpdateRgn,r2,0,RGN_COPY);                                            

-					}

-					else CombineRgn(frm->UpdateRgn,frm->UpdateRgn,r2,RGN_OR);

-					DeleteObject(r2);

-				}   

-

-			}

-		}      

-		else

-		{

-			Sync( QueueAllFramesUpdating, (BYTE)1 );

-		}

-	}

-	else 

-		Sync( QueueAllFramesUpdating , (BYTE)1 );

-	if (!flag_bUpdateQueued||g_flag_bPostWasCanceled)

-		if (PostMessage(pcli->hwndContactList,UM_UPDATE,0,0))

-		{            

-			flag_bUpdateQueued=1;

-			g_flag_bPostWasCanceled=0;

-		}

-		return 1;

-}

-

-

-static int ske_ValidateSingleFrameImage(FRAMEWND * Frame, BOOL SkipBkgBlitting)                              // Calling frame paint proc

-{

-	if (!g_pCachedWindow) { TRACE("ske_ValidateSingleFrameImage calling without cached\n"); return 0;}

-	if (Frame->hWnd==(HWND)-1 && !Frame->PaintCallbackProc)  { TRACE("ske_ValidateSingleFrameImage calling without FrameProc\n"); return 0;}

-	{ // if ok update image 

-		HDC hdc;

-		HBITMAP o,n;

-		RECT rcPaint,wnd;

-		RECT ru={0};

-		int w,h,x,y;

-		int w1,h1,x1,y1;

-

-		CLUI_SizingGetWindowRect(pcli->hwndContactList,&wnd);

-		rcPaint=Frame->wndSize;

-		{

-			int dx,dy,bx,by;

-			if (g_CluiData.mutexOnEdgeSizing)

-			{

-				dx=rcPaint.left-wnd.left;

-				dy=rcPaint.top-wnd.top;

-				bx=rcPaint.right-wnd.right;

-				by=rcPaint.bottom-wnd.bottom;

-				wnd=g_rcEdgeSizingRect;

-				rcPaint.left=wnd.left+dx;

-				rcPaint.top=wnd.top+dy;

-				rcPaint.right=wnd.right+bx;

-				rcPaint.bottom=wnd.bottom+by;

-			}

-		}

-		//OffsetRect(&rcPaint,-wnd.left,-wnd.top);

-		w=rcPaint.right-rcPaint.left;

-		h=rcPaint.bottom-rcPaint.top;

-		if (w<=0 || h<=0) 

-		{ 

-			TRACE("Frame size smaller than 0\n");

-			return 0;

-		}

-		x=rcPaint.left;

-		y=rcPaint.top;

-		hdc=CreateCompatibleDC(g_pCachedWindow->hImageDC);

-		n=ske_CreateDIB32(w,h);

-		o=(HBITMAP)SelectObject(hdc,n);

-		{

-			if (Frame->UpdateRgn && !SkipBkgBlitting)

-			{

-				GetRgnBox(Frame->UpdateRgn,&ru);

-				{

-					RECT rc;

-					GetClientRect(Frame->hWnd,&rc);

-					if (ru.top<0) ru.top=0;

-					if (ru.left<0) ru.left=0;

-					if (ru.right>rc.right) ru.right=rc.right;

-					if (ru.bottom>rc.bottom) ru.bottom=rc.bottom;

-				} 

-				if (!IsRectEmpty(&ru))

-				{

-					x1=ru.left;

-					y1=ru.top;

-					w1=ru.right-ru.left;

-					h1=ru.bottom-ru.top;

-				}

-				else

-				{x1=0; y1=0; w1=w; h1=h;}

-				// copy image at hdc

-				if (SkipBkgBlitting)  //image already at foreground

-				{

-					BitBlt(hdc,x1,y1,w1,h1,g_pCachedWindow->hImageDC,x+x1,y+y1,SRCCOPY);  

-				}

-				else

-				{

-					BitBlt(hdc,x1,y1,w1,h1,g_pCachedWindow->hBackDC,x+x1,y+y1,SRCCOPY);  

-				}

-				Frame->PaintCallbackProc(Frame->hWnd,hdc,&ru,Frame->UpdateRgn, Frame->dwFlags,Frame->PaintData);

-			}

-			else

-			{

-			    HRGN rgnUpdate;

-				RECT r;

-				GetClientRect(Frame->hWnd,&r);

-				rgnUpdate=CreateRectRgn(r.left,r.top,r.right,r.bottom); 

-				ru=r;

-				if (!IsRectEmpty(&ru))

-				{

-					x1=ru.left;

-					y1=ru.top;

-					w1=ru.right-ru.left;

-					h1=ru.bottom-ru.top;

-				}

-				else

-				{x1=0; y1=0; w1=w; h1=h;}

-				// copy image at hdc

-				if (SkipBkgBlitting)  //image already at foreground

-				{

-					BitBlt(hdc,x1,y1,w1,h1,g_pCachedWindow->hImageDC,x+x1,y+y1,SRCCOPY);  

-				}

-				else

-				{

-					BitBlt(hdc,x1,y1,w1,h1,g_pCachedWindow->hBackDC,x+x1,y+y1,SRCCOPY);  

-				}

-				Frame->PaintCallbackProc(Frame->hWnd,hdc,&r,rgnUpdate, Frame->dwFlags,Frame->PaintData);

-				ru=r;

-			    DeleteObject(rgnUpdate);

-			}

-			DeleteObject(Frame->UpdateRgn);

-			Frame->UpdateRgn=0;

-		}

-		if (!IsRectEmpty(&ru))

-		{

-			x1=ru.left;

-			y1=ru.top;

-			w1=ru.right-ru.left;

-			h1=ru.bottom-ru.top;

-		}

-		else

-		{x1=0; y1=0; w1=w; h1=h;}

-		/*  if (!SkipBkgBlitting)

-		{

-		BitBlt(g_pCachedWindow->hImageDC,x+x1,y+y1,w1,h1,g_pCachedWindow->hBackDC,x+x1,y+y1,SRCCOPY);

-		}

-

-		*/  

-		{

-			//BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, AC_SRC_ALPHA };

-			BitBlt(g_pCachedWindow->hImageDC,x+x1,y+y1,w1,h1,hdc,x1,y1,SRCCOPY);

-			//BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, AC_SRC_ALPHA };

-			//MyAlphaBlend(g_pCachedWindow->hImageDC,x+x1,y+y1,w1,h1,hdc,x1,y1,w1,h1,bf);  

-		}

-		

-		if ( fnGetScrollBarInfo && (GetWindowLongPtr(Frame->hWnd,GWL_STYLE) & WS_VSCROLL))

-		{

-			//Draw vertical scroll bar

-			//

-			RECT rThumb;

-			RECT rUpBtn;

-			RECT rDnBtn;

-			RECT rLine;

-			int dx,dy;

-			SCROLLBARINFO si={0};

-			si.cbSize=sizeof(SCROLLBARINFO);

-			fnGetScrollBarInfo(Frame->hWnd,OBJID_VSCROLL,&si);

-			rLine=(si.rcScrollBar);

-			rUpBtn=rLine;

-			rDnBtn=rLine;

-			rThumb=rLine;

-

-			rUpBtn.bottom=rUpBtn.top+si.dxyLineButton;

-			rDnBtn.top=rDnBtn.bottom-si.dxyLineButton;

-			rThumb.top=rLine.top+si.xyThumbTop;

-			rThumb.bottom=rLine.top+si.xyThumbBottom;

-			{

-				dx=Frame->wndSize.right-rLine.right;

-				dy=-rLine.top+Frame->wndSize.top;

-			}

-			OffsetRect(&rLine,dx,dy);

-			OffsetRect(&rUpBtn,dx,dy);

-			OffsetRect(&rDnBtn,dx,dy);

-			OffsetRect(&rThumb,dx,dy);

-			BitBlt(g_pCachedWindow->hImageDC,rLine.left,rLine.top,rLine.right-rLine.left,rLine.bottom-rLine.top,g_pCachedWindow->hBackDC,rLine.left,rLine.top,SRCCOPY);

-			{

-				char req[255];

-				_snprintf(req,sizeof(req),"Main,ID=ScrollBar,Frame=%s,Part=Back",Frame->szName);

-				SkinDrawGlyph(g_pCachedWindow->hImageDC,&rLine,&rLine,req);

-				_snprintf(req,sizeof(req),"Main,ID=ScrollBar,Frame=%s,Part=Thumb",Frame->szName);

-				SkinDrawGlyph(g_pCachedWindow->hImageDC,&rThumb,&rThumb,req);

-				_snprintf(req,sizeof(req),"Main,ID=ScrollBar,Frame=%s,Part=UpLineButton",Frame->szName);

-				SkinDrawGlyph(g_pCachedWindow->hImageDC,&rUpBtn,&rUpBtn,req);

-				_snprintf(req,sizeof(req),"Main,ID=ScrollBar,Frame=%s,Part=DownLineButton",Frame->szName);

-				SkinDrawGlyph(g_pCachedWindow->hImageDC,&rDnBtn,&rDnBtn,req);

-			}

-		}

-

-		SelectObject(hdc,o);

-		DeleteObject(n);

-		mod_DeleteDC(hdc);

-	}

-	return 1;

-}

-

-int ske_BltBackImage (HWND destHWND, HDC destDC, RECT * BltClientRect)

-{

-	POINT ptMainWnd={0};

-	POINT ptChildWnd={0};

-	RECT from={0};

-	RECT w={0};

-	if (g_CluiData.fDisableSkinEngine)

-	{

-		FillRect(destDC,BltClientRect,GetSysColorBrush(COLOR_3DFACE));

-		return 0;

-	}

-	ske_ReCreateBackImage(FALSE,NULL);

-	if (BltClientRect) w=*BltClientRect;

-	else GetClientRect(destHWND,&w);

-	ptChildWnd.x=w.left;

-	ptChildWnd.y=w.top;

-	ClientToScreen(destHWND,&ptChildWnd);

-	ClientToScreen(pcli->hwndContactList,&ptMainWnd);

-	//TODO if main not relative to client area

-	return BitBlt(destDC,w.left,w.top,(w.right-w.left),(w.bottom-w.top),g_pCachedWindow->hBackDC,(ptChildWnd.x-ptMainWnd.x),(ptChildWnd.y-ptMainWnd.y),SRCCOPY);

-

-}

-int ske_ReCreateBackImage(BOOL Erase,RECT *w)

-{

-	HBITMAP hb2;

-	RECT wnd={0};

-	BOOL IsNewCache=0;

-	if (g_CluiData.fDisableSkinEngine) return 0;

-	GetClientRect(pcli->hwndContactList,&wnd);

-	if (w) wnd=*w;

-	//-- Check cached.

-	if (g_pCachedWindow==NULL)

-	{

-		//-- Create New Cache

-		{

-			g_pCachedWindow=(CURRWNDIMAGEDATA*)mir_calloc(sizeof(CURRWNDIMAGEDATA));

-			g_pCachedWindow->hScreenDC=GetDC(NULL);

-			g_pCachedWindow->hBackDC=CreateCompatibleDC(g_pCachedWindow->hScreenDC);

-			g_pCachedWindow->hImageDC=CreateCompatibleDC(g_pCachedWindow->hScreenDC);

-			g_pCachedWindow->Width=wnd.right-wnd.left;

-			g_pCachedWindow->Height=wnd.bottom-wnd.top;

-			if (g_pCachedWindow->Width!=0 && g_pCachedWindow->Height!=0)

-			{

-				g_pCachedWindow->hImageDIB=ske_CreateDIB32Point(g_pCachedWindow->Width,g_pCachedWindow->Height,(void**)&(g_pCachedWindow->hImageDIBByte));

-				g_pCachedWindow->hBackDIB=ske_CreateDIB32Point(g_pCachedWindow->Width,g_pCachedWindow->Height,(void**)&(g_pCachedWindow->hBackDIBByte));

-				g_pCachedWindow->hImageOld=(HBITMAP)SelectObject(g_pCachedWindow->hImageDC,g_pCachedWindow->hImageDIB);

-				g_pCachedWindow->hBackOld=(HBITMAP)SelectObject(g_pCachedWindow->hBackDC,g_pCachedWindow->hBackDIB);

-			}

-		}

-		IsNewCache=1;

-	}   

-	if (g_pCachedWindow->Width!=wnd.right-wnd.left || g_pCachedWindow->Height!=wnd.bottom-wnd.top)		

-	{

-		HBITMAP hb1=NULL,hb2=NULL;

-		g_pCachedWindow->Width=wnd.right-wnd.left;

-		g_pCachedWindow->Height=wnd.bottom-wnd.top;

-		if (g_pCachedWindow->Width!=0 && g_pCachedWindow->Height!=0)

-		{

-			hb1=ske_CreateDIB32Point(g_pCachedWindow->Width,g_pCachedWindow->Height,(void**)&(g_pCachedWindow->hImageDIBByte));

-			hb2=ske_CreateDIB32Point(g_pCachedWindow->Width,g_pCachedWindow->Height,(void**)&(g_pCachedWindow->hBackDIBByte)); 

-			SelectObject(g_pCachedWindow->hImageDC,hb1);

-			SelectObject(g_pCachedWindow->hBackDC,hb2);

-		}

-		else

-		{

-			SelectObject(g_pCachedWindow->hImageDC,g_pCachedWindow->hImageOld);

-			SelectObject(g_pCachedWindow->hBackDC,g_pCachedWindow->hBackOld);

-		}

-		if (g_pCachedWindow->hImageDIB) DeleteObject(g_pCachedWindow->hImageDIB);

-		if (g_pCachedWindow->hBackDIB) DeleteObject(g_pCachedWindow->hBackDIB);

-		g_pCachedWindow->hImageDIB=hb1;

-		g_pCachedWindow->hBackDIB=hb2;

-		IsNewCache=1;

-	}

-	if ((Erase || IsNewCache )&& (g_pCachedWindow->Width!=0 && g_pCachedWindow->Height!=0))

-	{

-

-		hb2=ske_CreateDIB32(g_pCachedWindow->Width,g_pCachedWindow->Height); 

-		SelectObject(g_pCachedWindow->hBackDC,hb2);

-		DeleteObject(g_pCachedWindow->hBackDIB);

-		g_pCachedWindow->hBackDIB=hb2;

-		FillRect(g_pCachedWindow->hBackDC,&wnd,GetSysColorBrush(COLOR_BTNFACE));

-		SkinDrawGlyph(g_pCachedWindow->hBackDC,&wnd,&wnd,"Main,ID=Background,Opt=Non-Layered");

-		ske_SetRectOpaque(g_pCachedWindow->hBackDC,&wnd);

-	}

-	return 1;

-}

-int ske_DrawNonFramedObjects(BOOL Erase,RECT *r)

-{

-	RECT w,wnd;

-	if (r) w=*r;

-	else CLUI_SizingGetWindowRect(pcli->hwndContactList,&w);

-	if (!g_CluiData.fLayered) return ske_ReCreateBackImage(FALSE,0);

-	if (g_pCachedWindow==NULL)

-		return ske_ValidateFrameImageProc(&w);

-

-	wnd=w;

-	OffsetRect(&w, -w.left, -w.top);

-	if (Erase)

-	{

-		HBITMAP hb2;

-		hb2=ske_CreateDIB32(g_pCachedWindow->Width,g_pCachedWindow->Height); 

-		SelectObject(g_pCachedWindow->hBackDC,hb2);

-		DeleteObject(g_pCachedWindow->hBackDIB);

-		g_pCachedWindow->hBackDIB=hb2;

-	}

-

-	SkinDrawGlyph(g_pCachedWindow->hBackDC,&w,&w,"Main,ID=Background");

-	//--Draw frames captions

-	{

-		int i;

-		for(i=0;i<g_nFramesCount;i++)

-			if (g_pfwFrames[i].TitleBar.ShowTitleBar && g_pfwFrames[i].visible && !g_pfwFrames[i].floating)

-			{

-				RECT rc;

-				SetRect(&rc,g_pfwFrames[i].wndSize.left,g_pfwFrames[i].wndSize.top-g_nTitleBarHeight-g_CluiData.nGapBetweenTitlebar,g_pfwFrames[i].wndSize.right,g_pfwFrames[i].wndSize.top-g_CluiData.nGapBetweenTitlebar);

-				//GetWindowRect(Frames[i].TitleBar.hwnd,&rc);

-				//OffsetRect(&rc,-wnd.left,-wnd.top);

-				Sync( DrawTitleBar, g_pCachedWindow->hBackDC, &rc, g_pfwFrames[i].id );

-			}

-	}

-	g_mutex_bLockUpdating=1;

-

-	flag_bJustDrawNonFramedObjects=1;

-	return 0;

-}

-int ske_ValidateFrameImageProc(RECT * r)                                // Calling queued frame paint procs and refresh image

-{

-	RECT wnd={0};

-	BOOL IsNewCache=0;

-	BOOL IsForceAllPainting=0;

-	if (r) wnd=*r;

-	else GetWindowRect(pcli->hwndContactList,&wnd);

-	if (wnd.right-wnd.left==0 || wnd.bottom-wnd.top==0) return 0;

-	g_mutex_bLockUpdating=1;

-	//-- Check cached.

-	if (g_pCachedWindow==NULL)

-	{

-		//-- Create New Cache

-		{

-			g_pCachedWindow=(CURRWNDIMAGEDATA*)mir_calloc(sizeof(CURRWNDIMAGEDATA));

-			g_pCachedWindow->hScreenDC=GetDC(NULL);

-			g_pCachedWindow->hBackDC=CreateCompatibleDC(g_pCachedWindow->hScreenDC);

-			g_pCachedWindow->hImageDC=CreateCompatibleDC(g_pCachedWindow->hScreenDC);

-			g_pCachedWindow->Width=wnd.right-wnd.left;

-			g_pCachedWindow->Height=wnd.bottom-wnd.top;

-			g_pCachedWindow->hImageDIB=ske_CreateDIB32Point(g_pCachedWindow->Width,g_pCachedWindow->Height,(void**)&(g_pCachedWindow->hImageDIBByte));

-			g_pCachedWindow->hBackDIB=ske_CreateDIB32Point(g_pCachedWindow->Width,g_pCachedWindow->Height,(void**)&(g_pCachedWindow->hBackDIBByte));

-			g_pCachedWindow->hImageOld=(HBITMAP)SelectObject(g_pCachedWindow->hImageDC,g_pCachedWindow->hImageDIB);

-			g_pCachedWindow->hBackOld=(HBITMAP)SelectObject(g_pCachedWindow->hBackDC,g_pCachedWindow->hBackDIB);

-		}

-		IsNewCache=1;

-	}   

-	if (g_pCachedWindow->Width!=wnd.right-wnd.left || g_pCachedWindow->Height!=wnd.bottom-wnd.top)

-	{

-		HBITMAP hb1,hb2;

-		g_pCachedWindow->Width=wnd.right-wnd.left;

-		g_pCachedWindow->Height=wnd.bottom-wnd.top;

-		hb1=ske_CreateDIB32Point(g_pCachedWindow->Width,g_pCachedWindow->Height,(void**)&(g_pCachedWindow->hImageDIBByte));

-		hb2=ske_CreateDIB32Point(g_pCachedWindow->Width,g_pCachedWindow->Height,(void**)&(g_pCachedWindow->hBackDIBByte)); 

-		SelectObject(g_pCachedWindow->hImageDC,hb1);

-		SelectObject(g_pCachedWindow->hBackDC,hb2);

-		DeleteObject(g_pCachedWindow->hImageDIB);

-		DeleteObject(g_pCachedWindow->hBackDIB);

-		g_pCachedWindow->hImageDIB=hb1;

-		g_pCachedWindow->hBackDIB=hb2;

-		IsNewCache=1;

-	}

-	if (IsNewCache)

-	{

-		ske_DrawNonFramedObjects(0,&wnd);       

-		IsForceAllPainting=1;

-	}

-	if (flag_bJustDrawNonFramedObjects)

-	{

-		IsForceAllPainting=1;

-		flag_bJustDrawNonFramedObjects=0;

-	}

-	if (IsForceAllPainting) 

-	{ 

-		BitBlt(g_pCachedWindow->hImageDC,0,0,g_pCachedWindow->Width,g_pCachedWindow->Height,g_pCachedWindow->hBackDC,0,0,SRCCOPY);

-		Sync( QueueAllFramesUpdating, (BYTE)1 );

-	}

-	//-- Validating frames

-	{ 

-		int i;

-		for(i=0;i<g_nFramesCount;i++)

-			if (g_pfwFrames[i].PaintCallbackProc && g_pfwFrames[i].visible && !g_pfwFrames[i].floating )

-				if (g_pfwFrames[i].bQueued || IsForceAllPainting)

-					ske_ValidateSingleFrameImage(&g_pfwFrames[i],IsForceAllPainting);

-	}

-	g_mutex_bLockUpdating=1;

-	ModernSkinButtonRedrawAll(0);

-	g_mutex_bLockUpdating=0;

-	if (!mutex_bLockUpdate)  ske_UpdateWindowImageRect(&wnd);

-	//-- Clear queue

-	{

-		Sync( QueueAllFramesUpdating, (BYTE)0 );

-		flag_bUpdateQueued=0;

-		g_flag_bPostWasCanceled=0;

-	}

-	return 1;

-}

-

-int ske_UpdateWindowImage()

-{

-	if (MirandaExiting()) 

-		return 0;

-	if (g_CluiData.fLayered)

-	{

-		RECT r;

-		GetWindowRect(pcli->hwndContactList,&r);

-		return ske_UpdateWindowImageRect(&r);

-	}

-	else

-		ske_ReCreateBackImage(FALSE,0);

-	ske_ApplyTransluency();

-	return 0;

-}

-

-

-int ske_UpdateWindowImageRect(RECT * r)                                     // Update window with current image and 

-{

-	//if not validity -> ValidateImageProc

-	//else Update using current alpha

-	RECT wnd=*r;

-

-	if (!g_CluiData.fLayered) return ske_ReCreateBackImage(FALSE,0);

-	if (g_pCachedWindow==NULL) return ske_ValidateFrameImageProc(&wnd); 

-	if (g_pCachedWindow->Width!=wnd.right-wnd.left || g_pCachedWindow->Height!=wnd.bottom-wnd.top) return ske_ValidateFrameImageProc(&wnd);

-	if (g_flag_bFullRepaint) 

-	{

-		g_flag_bFullRepaint=0; 

-		return ske_ValidateFrameImageProc(&wnd);

-	}

-	ske_JustUpdateWindowImageRect(&wnd);

-	return 0;

-}

-

-void ske_ApplyTransluency()

-{

-	int IsTransparancy;

-	HWND hwnd=pcli->hwndContactList;

-	BOOL layered=(GetWindowLongPtr(hwnd, GWL_EXSTYLE) & WS_EX_LAYERED)?TRUE:FALSE;

-

-	IsTransparancy=g_CluiData.fSmoothAnimation || g_bTransparentFlag;

-	if (!g_bTransparentFlag && !g_CluiData.fSmoothAnimation && g_CluiData.bCurrentAlpha!=0)

-		g_CluiData.bCurrentAlpha=255;

-	if (!g_CluiData.fLayered && (/*(g_CluiData.bCurrentAlpha==255)||*/(g_proc_SetLayeredWindowAttributesNew && IsTransparancy)))

-	{

-		if (!layered) SetWindowLongPtr(hwnd, GWL_EXSTYLE, GetWindowLongPtr(hwnd, GWL_EXSTYLE) | WS_EX_LAYERED);

-		if (g_proc_SetLayeredWindowAttributesNew) g_proc_SetLayeredWindowAttributesNew(hwnd, RGB(0,0,0), (BYTE)g_CluiData.bCurrentAlpha, LWA_ALPHA);

-	}

-

-	AniAva_RedrawAllAvatars(FALSE);

-	return;

-}

-

-int ske_JustUpdateWindowImage()

-{

-	RECT r;

-	if (!g_CluiData.fLayered)

-	{

-		ske_ApplyTransluency();

-		return 0;

-	}

-	GetWindowRect(pcli->hwndContactList,&r);

-	return ske_JustUpdateWindowImageRect(&r);

-}

-int ske_JustUpdateWindowImageRect(RECT * rty)

-//Update window image

-{

-	BLENDFUNCTION bf={AC_SRC_OVER, 0,g_CluiData.bCurrentAlpha, AC_SRC_ALPHA };

-	POINT dest={0}, src={0};

-	int res;

-	RECT wnd=*rty;

-

-	RECT rect;

-	SIZE sz={0};

-

-	if (!g_CluiData.fLayered)

-	{

-		ske_ApplyTransluency();

-		return 0;

-	}

-	if (!pcli->hwndContactList) return 0;

-	rect=wnd;

-	dest.x=rect.left;

-	dest.y=rect.top;

-	sz.cx=rect.right-rect.left;

-	sz.cy=rect.bottom-rect.top;

-	if (g_proc_UpdateLayeredWindow && g_CluiData.fLayered)

-	{

-		if (!(GetWindowLongPtr(pcli->hwndContactList, GWL_EXSTYLE)&WS_EX_LAYERED))

-			SetWindowLongPtr(pcli->hwndContactList,GWL_EXSTYLE, GetWindowLongPtr(pcli->hwndContactList, GWL_EXSTYLE) |WS_EX_LAYERED);

-		Sync( SetAlpha, g_CluiData.bCurrentAlpha );

-

-		res=g_proc_UpdateLayeredWindow(pcli->hwndContactList,g_pCachedWindow->hScreenDC,&dest,&sz,g_pCachedWindow->hImageDC,&src,RGB(1,1,1),&bf,ULW_ALPHA);

-		g_CluiData.fAeroGlass = false;

-		CLUI_UpdateAeroGlass();

-	}

-	else InvalidateRect(pcli->hwndContactList,NULL,TRUE);

-	return 0;

-}

-

-int ske_DrawImageAt(HDC hdc, RECT *rc)

-{

-	BLENDFUNCTION bf={AC_SRC_OVER, 0, 255, AC_SRC_ALPHA };

-	BitBlt(g_pCachedWindow->hImageDC,rc->left,rc->top,rc->right-rc->left,rc->bottom-rc->top,g_pCachedWindow->hBackDC,rc->left,rc->top,SRCCOPY);

-	ske_AlphaBlend(g_pCachedWindow->hImageDC,rc->left,rc->top,rc->right-rc->left,rc->bottom-rc->top,hdc,0,0,rc->right-rc->left,rc->bottom-rc->top,bf);    

-	if (!g_mutex_bLockUpdating)

-		ske_UpdateWindowImage();

-	return 0;

-}

-

-HBITMAP ske_GetCurrentWindowImage()

-{ 

-	return g_pCachedWindow->hImageDIB;

-}

-

-/*

-*  Glyph text routine

-*/

-

-static DWORD ske_HexToARGB(char * Hex)

-{

-	char buf[10]={0};

-	char buf2[11]={0};

-	char * st;

-	BYTE alpha;

-	DWORD AARRGGBB=0;

-	_snprintf(buf,10,"%s\n",Hex);

-	if (buf[1]=='x' || buf[1]=='X')

-		_snprintf(buf2,11,"0x%s\n",buf+2);

-	else

-		_snprintf(buf2,11,"0x%s\n",buf);

-	buf2[10]='\0';

-	AARRGGBB=strtoul(buf2,&st,16); 

-	alpha=(BYTE)((AARRGGBB&0xFF000000)>>24);

-	alpha=255-((alpha==0)?255:alpha); 

-	AARRGGBB=(alpha<<24)+((AARRGGBB&0x00FF0000)>>16)+((AARRGGBB&0x000000FF)<<16)+(AARRGGBB&0x0000FF00);

-	return AARRGGBB;

-}

-

-static TCHAR *ske_ReAppend(TCHAR *lfirst, TCHAR * lsecond, int len)

-{ 

-	int l1=lfirst?lstrlen(lfirst):0;

-	int l2=(len?len:(lstrlen(lsecond)+1));

-	TCHAR *buf=(TCHAR *)mir_alloc((l1+l2+1)*sizeof(TCHAR));

-	if (lfirst) memmove(buf,lfirst,l1*sizeof(TCHAR));

-	memmove(buf+l1,lsecond,l2*sizeof(TCHAR));

-	if (lfirst) mir_free(lfirst);

-	if (len) buf[l1+l2]=_T('\0');

-	return buf;

-}

-

-TCHAR* ske_ReplaceVar(TCHAR *var)

-{

-	if (!var) return mir_tstrdup(_T(""));

-	if (!lstrcmpi(var,TEXT("Profile")))

-	{

-		char buf[MAX_PATH]={0};

-		CallService(MS_DB_GETPROFILENAME,(WPARAM)MAX_PATH,(LPARAM)buf);

-		{

-			int i=strlen(buf);

-			while (buf[i]!='.' && i>0) i--;

-			buf[i]='\0';

-		}

-		mir_free_and_nill(var);

-		return mir_a2u(buf);

-	} 

-

-	mir_free_and_nill(var);

-	return mir_tstrdup(_T(""));

-}

-TCHAR *ske_ParseText(TCHAR *stzText)

-{

-	int len=lstrlen(stzText);

-	TCHAR *result=NULL;

-	int stpos=0;

-	int curpos=0;  

-

-	while(curpos<len)

-	{

-		//1 find first %

-		while(curpos<len && stzText[curpos]!=(TCHAR)'%') curpos++;

-		if (curpos<len) //% found

-		{

-			if (curpos-stpos>0) 

-				result=ske_ReAppend(result,stzText+stpos,curpos-stpos);

-			stpos=curpos+1;

-			curpos++;

-			//3 find second % 

-			while(curpos<len && stzText[curpos]!=(TCHAR)'%') curpos++;

-			if (curpos<len)

-			{

-				if (curpos-stpos>0) 

-				{

-					TCHAR *var=(TCHAR *)mir_alloc((curpos-stpos+1)*sizeof(TCHAR));

-					memmove(var,stzText+stpos,(curpos-stpos)*sizeof(TCHAR));

-					var[curpos-stpos]=(TCHAR)'\0';

-					var=ske_ReplaceVar(var);

-					result=ske_ReAppend(result,var,0);

-					mir_free_and_nill(var);

-				}

-				else

-					result=ske_ReAppend(result,_T("%"),0);

-				curpos++;

-				stpos=curpos;

-			}

-			else

-			{

-				//  if (curpos-stpos>0) 

-				//    result=ske_ReAppend(result,stzText+stpos,curpos-stpos);

-				break;

-			}

-		}

-		else

-		{

-			if (curpos-stpos>0) 

-				result=ske_ReAppend(result,stzText+stpos,curpos-stpos);

-			break;

-		}   

-	}

-	return result;

-}

-/*

-*   Parse text object string, find glyph object and add text to it.

-*   szGlyphTextID and Define string is:

-*   t[szGlyphTextID]=s[HostObjectID],[Left],[Top],[Right],[Bottom],[LTRBHV],[FontID],[Color1],[reservedforColor2],[Text]

-*/

-static void OLDske_AddParseTextGlyphObject(char * szGlyphTextID,char * szDefineString,SKINOBJECTSLIST *Skin)

-{

-

-	GLYPHOBJECT *globj=NULL;

-	{     

-		char buf[255]={0};

-		GetParamN(szDefineString,buf,sizeof(buf),0,',',TRUE);

-		if (strlen(buf))

-		{

-			SKINOBJECTDESCRIPTOR * lpobj;

-			lpobj=ske_FindObjectByName(buf,OT_GLYPHOBJECT,Skin);

-			if (lpobj)

-				globj=(GLYPHOBJECT*)lpobj->Data;

-		}

-		if (globj)

-		{

-			GLYPHTEXT * glText;

-

-			if (!globj->plTextList)

-			{

-				globj->plTextList=li.List_Create(0,1);

-				globj->plTextList->sortFunc=ske_SortTextGlyphObjectFunc;

-			}

-			glText=(GLYPHTEXT*)mir_calloc(sizeof(GLYPHTEXT));

-			glText->szGlyphTextID=mir_strdup(szGlyphTextID);

-			glText->szObjectName=mir_strdup(buf);

-			glText->iLeft=atoi(GetParamN(szDefineString,buf,sizeof(buf),1,',',TRUE));

-			glText->iTop=atoi(GetParamN(szDefineString,buf,sizeof(buf),2,',',TRUE));

-			glText->iRight=atoi(GetParamN(szDefineString,buf,sizeof(buf),3,',',TRUE));

-			glText->iBottom=atoi(GetParamN(szDefineString,buf,sizeof(buf),4,',',TRUE));

-			{

-				memset(buf,0,6);

-				GetParamN(szDefineString,buf,sizeof(buf),5,',',TRUE);

-				buf[0]&=95; buf[1]&=95; buf[2]&=95; buf[3]&=95; buf[4]&=95; buf[5]&=95;   //to uppercase: &01011111 (0-95)

-				glText->RelativeFlags=

-					(buf[0]=='C'?1:((buf[0]=='R')?2:0))       //[BC][RC][BC][RC] --- Left relative

-					|(buf[1]=='C'?4:((buf[1]=='B')?8:0))       //  |   |   |--------- Top relative   

-					|(buf[2]=='C'?16:((buf[2]=='R')?32:0))     //  |   |--------------Right relative 

-					|(buf[3]=='C'?64:((buf[3]=='B')?128:0));   //  |------------------Bottom relative          

-				glText->dwFlags=(buf[4]=='C'?DT_CENTER:((buf[4]=='R')?DT_RIGHT:DT_LEFT))

-					|(buf[5]=='C'?DT_VCENTER:((buf[5]=='B')?DT_BOTTOM:DT_TOP));

-			}

-			glText->szFontID=mir_strdup(GetParamN(szDefineString,buf,sizeof(buf),6,',',TRUE));

-

-			glText->dwColor=ske_HexToARGB(GetParamN(szDefineString,buf,sizeof(buf),7,',',TRUE));

-			glText->dwShadow=ske_HexToARGB(GetParamN(szDefineString,buf,sizeof(buf),8,',',TRUE));

-			glText->stValueText=mir_a2u(GetParamN(szDefineString,buf,sizeof(buf),9,',',TRUE));

-			glText->stText=ske_ParseText(glText->stValueText);

-			li.List_Insert(globj->plTextList,(void*)glText,globj->plTextList->realCount);     

-			qsort(globj->plTextList->items,globj->plTextList->realCount,sizeof(void*),(int(*)(const void*, const void*))globj->plTextList->sortFunc);

-		}

-	}

-}

-

-

-static void ske_AddParseTextGlyphObject(char * szGlyphTextID,char * szDefineString,SKINOBJECTSLIST *Skin)

-{

-	char buf[255]={0};

-	GetParamN(szDefineString,buf,sizeof(buf),0,',',TRUE);

-	if (strlen(buf))

-	{

-		GLYPHTEXT * glText;

-		glText=(GLYPHTEXT*)mir_calloc(sizeof(GLYPHTEXT));

-		glText->szGlyphTextID=mir_strdup(szGlyphTextID);

-		glText->szObjectName=mir_strdup(buf);

-		glText->iLeft=atoi(GetParamN(szDefineString,buf,sizeof(buf),1,',',TRUE));

-		glText->iTop=atoi(GetParamN(szDefineString,buf,sizeof(buf),2,',',TRUE));

-		glText->iRight=atoi(GetParamN(szDefineString,buf,sizeof(buf),3,',',TRUE));

-		glText->iBottom=atoi(GetParamN(szDefineString,buf,sizeof(buf),4,',',TRUE));

-		{

-			memset(buf,0,6);

-			GetParamN(szDefineString,buf,sizeof(buf),5,',',TRUE);

-			buf[0]&=95; buf[1]&=95; buf[2]&=95; buf[3]&=95; buf[4]&=95; buf[5]&=95;   //to uppercase: &01011111 (0-95)

-			glText->RelativeFlags=

-				(buf[0]=='C'?1:((buf[0]=='R')?2:0))       //[BC][RC][BC][RC] --- Left relative

-				|(buf[1]=='C'?4:((buf[1]=='B')?8:0))       //  |   |   |--------- Top relative   

-				|(buf[2]=='C'?16:((buf[2]=='R')?32:0))     //  |   |--------------Right relative 

-				|(buf[3]=='C'?64:((buf[3]=='B')?128:0));   //  |------------------Bottom relative          

-			glText->dwFlags=(buf[4]=='C'?DT_CENTER:((buf[4]=='R')?DT_RIGHT:DT_LEFT))

-				|(buf[5]=='C'?DT_VCENTER:((buf[5]=='B')?DT_BOTTOM:DT_TOP));

-		}

-		glText->szFontID=mir_strdup(GetParamN(szDefineString,buf,sizeof(buf),6,',',TRUE));

-

-		glText->dwColor=ske_HexToARGB(GetParamN(szDefineString,buf,sizeof(buf),7,',',TRUE));

-		glText->dwShadow=ske_HexToARGB(GetParamN(szDefineString,buf,sizeof(buf),8,',',TRUE));

-		glText->stValueText=mir_a2u(GetParamN(szDefineString,buf,sizeof(buf),9,',',TRUE));

-		glText->stText=ske_ParseText(glText->stValueText);

-		

-		if (!Skin->pTextList)

-			Skin->pTextList=li.List_Create(0,1);

-		li.List_InsertPtr(Skin->pTextList,glText);

-	}

-}

-

-

-/*

-*   Parse font definition string.

-*   szGlyphTextID and Define string is:

-*   f[szFontID]=s[FontTypefaceName],[size],[BIU]

-*/

-static void ske_AddParseSkinFont(char * szFontID,char * szDefineString,SKINOBJECTSLIST *Skin)

-{

-	//SortedList * gl_plSkinFonts=NULL;

-	SKINFONT * sf =NULL;

-	sf=(SKINFONT*)mir_calloc(sizeof(SKINFONT));

-	if (sf)

-	{

-		{

-			char buf[255];    

-			int fntSize=0;

-			BOOL fntBold=FALSE, fntItalic=FALSE, fntUnderline=FALSE;

-			LOGFONTA logfont={0};    

-			logfont.lfCharSet=DEFAULT_CHARSET;

-			logfont.lfOutPrecision=OUT_DEFAULT_PRECIS;

-			logfont.lfClipPrecision=CLIP_DEFAULT_PRECIS;

-			logfont.lfQuality=DEFAULT_QUALITY;

-			logfont.lfPitchAndFamily=DEFAULT_PITCH|FF_DONTCARE;    

-

-			strncpy(logfont.lfFaceName,GetParamN(szDefineString,buf,sizeof(buf),0,',',TRUE),32);

-			logfont.lfHeight=atoi(GetParamN(szDefineString,buf,sizeof(buf),1,',',TRUE));

-			if (logfont.lfHeight<0)

-			{

-				HDC hdc=CreateCompatibleDC(NULL);        

-				logfont.lfHeight=(long)-MulDiv(logfont.lfHeight, GetDeviceCaps(hdc, LOGPIXELSY), 72);

-				mod_DeleteDC(hdc);

-			}

-			logfont.lfHeight=-logfont.lfHeight;

-			GetParamN(szDefineString,buf,sizeof(buf),2,',',TRUE);

-			buf[0]&=95; buf[1]&=95; buf[2]&=95;

-			logfont.lfWeight=(buf[0]=='B')?FW_BOLD:FW_NORMAL;

-			logfont.lfItalic=(buf[1]=='I')?1:0;

-			logfont.lfUnderline=(buf[2]=='U')?1:0;

-

-			sf->hFont=CreateFontIndirectA(&logfont);

-			if (sf->hFont)

-			{

-				sf->szFontID=mir_strdup(szFontID);

-				if (!gl_plSkinFonts)

-					gl_plSkinFonts=li.List_Create(0,1);

-				if (gl_plSkinFonts)

-				{

-					li.List_Insert(gl_plSkinFonts,(void*)sf,gl_plSkinFonts->realCount);

-				}

-			}

-

-		}

-	}

-

-}

-

-/*

-HICON ske_CreateJoinedIcon_Old(HICON hBottom, HICON hTop,BYTE alpha)

-{

-HDC tempDC;

-HICON res=NULL;

-HBITMAP oImage,nImage;

-HBITMAP nMask;

-ICONINFO iNew={0};

-ICONINFO iciBottom={0};

-ICONINFO iciTop={0};

-BITMAP bmp={0};

-SIZE sz={0};

-{

-if (!GetIconInfo(hBottom,&iciBottom)) return NULL;

-GetObject(iciBottom.hbmColor,sizeof(BITMAP),&bmp);

-sz.cx=bmp.bmWidth; sz.cy=bmp.bmHeight;

-if(iciBottom.hbmColor) DeleteObject(iciBottom.hbmColor);

-if(iciBottom.hbmMask) DeleteObject(iciBottom.hbmMask);

-}

-if (sz.cx==0 || sz.cy==0) return NULL;

-tempDC=CreateCompatibleDC(NULL);

-nImage=ske_CreateDIB32(sz.cx,sz.cy);

-oImage=SelectObject(tempDC,nImage);

-ske_DrawIconEx(tempDC,0,0,hBottom,sz.cx,sz.cy,0,NULL,DI_NORMAL);

-ske_DrawIconEx(tempDC,0,0,hTop,sz.cx,sz.cy,0,NULL,DI_NORMAL|(alpha<<24));

-SelectObject(tempDC,oImage);

-DeleteDC(tempDC);

-{

-BYTE * p=malloc(sz.cx*sz.cy/8+10);

-nMask=CreateBitmap(sz.cx,sz.cy,1,1,(void*)p);

-iNew.fIcon=TRUE;

-iNew.hbmColor=nImage;

-iNew.hbmMask=nMask;

-res=CreateIconIndirect(&iNew);

-if (!res) 

-TRACE_ERROR();

-DeleteObject(nImage);

-DeleteObject(nMask);

-free(p);

-}

-return res;

-}

-*/

-

-

-/*

-*   ske_CheckHasAlfaChannel - checks if image has at least one BYTE in alpha chennel

-*                  that is not a 0. (is image real 32 bit or just 24 bit)

-*/

-static BOOL ske_CheckHasAlfaChannel(BYTE * from, int widthByte, int height)

-{

-	int i=0,j=0;

-	DWORD * pt=(DWORD*)from;

-	while (j<height)

-	{

-		BYTE * add=(BYTE*)pt+widthByte;

-		while (pt<(DWORD*)add)

-		{

-			if ((*pt&0xFF000000)!=0) return TRUE;

-			pt++;

-		}

-		pt=(DWORD*)(from+widthByte*j);

-		j++;

-	}

-	return FALSE;

-}

-

-/*

-*   ske_CheckIconHasMask - checks if mask image has at least one that is not a 0.

-*                  Not sure is ir required or not

-*/

-static BOOL ske_CheckIconHasMask(BYTE * from)

-{

-	int i=0;

-	for (i=0; i<16*16/8; i++)

-	{

-		if (from[i]!=0) return TRUE;

-	}

-	return FALSE;

-}

-

-/*

-*   ske_GetMaskBit - return value of apropriate mask bit in line at x position

-*/

-static BOOL ske_GetMaskBit(BYTE *line, int x)

-{

-	return ((*(line+(x>>3)))&(0x01<<(7-(x&0x07))))!=0;

-}

-/*

-*    ske_Blend  - alpha ske_Blend ARGB values of 2 pixels. X1 - underlaying,

-*            X2 - overlaying points.

-*/

-

-static DWORD ske_Blend(DWORD X1,DWORD X2, BYTE alpha)

-{

-	BYTE a1=(BYTE)(X1>>24);

-	BYTE a2=(BYTE)(((X2>>24)*alpha)>>8);

-	BYTE r1=(BYTE)(X1>>16);

-	BYTE r2=(BYTE)(X2>>16);

-	BYTE g1=(BYTE)(X1>>8);

-	BYTE g2=(BYTE)(X2>>8);

-	BYTE b1=(BYTE)(X1);

-	BYTE b2=(BYTE)(X2);

-

-	BYTE a_1=~a1;

-	BYTE a_2=~a2;

-	WORD am=(WORD)a1*a_2;

-

-	/*  it is possible to use >>8 instead of /255 but it is require additional

-	*   checking of alphavalues

-	*/

-	WORD ar=a1+(((WORD)a_1*a2)/255);

-	// if a2 more than 0 than result should be more

-	// or equal (if a1==0) to a2, else in combination

-	// with mask we can get here black points

-

-	ar=(a2>ar)?a2:ar;

-

-	if (ar==0) return 0;

-

-	//else

-	{

-		WORD arm=ar*255;

-		WORD rr=(((WORD)r1*am+(WORD)r2*a2*255))/arm;

-		WORD gr=(((WORD)g1*am+(WORD)g2*a2*255))/arm;

-		WORD br=(((WORD)b1*am+(WORD)b2*a2*255))/arm;

-		return (ar<<24)|(rr<<16)|(gr<<8)|br;

-	}

-

-}

-/*

-*    CreateJoinedIcon  - creates new icon by drawing hTop over hBottom.

-*/

-HICON ske_CreateJoinedIcon(HICON hBottom, HICON hTop, BYTE alpha)

-{

-	HDC tempDC;

-	HICON res=NULL;

-	HBITMAP oImage,nImage;

-	HBITMAP nMask;

-	BITMAP bmp={0};

-	BYTE *ptPixels;

-	ICONINFO iNew={0};

-	ICONINFO iciBottom={0};

-	ICONINFO iciTop={0};

-

-	BITMAP bmp_top={0};

-	BITMAP bmp_top_mask={0};

-

-	BITMAP bmp_bottom={0};

-	BITMAP bmp_bottom_mask={0};

-

-	tempDC=CreateCompatibleDC(NULL);

-	nImage=ske_CreateDIB32Point(16,16,(void**)&ptPixels);

-	oImage=(HBITMAP)SelectObject(tempDC,nImage);

-

-	GetIconInfo(hBottom,&iciBottom);

-	GetObject(iciBottom.hbmColor,sizeof(BITMAP),&bmp_bottom);

-	GetObject(iciBottom.hbmMask,sizeof(BITMAP),&bmp_bottom_mask);

-

-	GetIconInfo(hTop,&iciTop);

-	GetObject(iciTop.hbmColor,sizeof(BITMAP),&bmp_top);

-	GetObject(iciTop.hbmMask,sizeof(BITMAP),&bmp_top_mask);

-

-	if (bmp_bottom.bmBitsPixel==32 &&bmp_top.bmBitsPixel==32 && IsWinVerXPPlus())

-	{

-		BYTE * BottomBuffer, * TopBuffer, * BottomMaskBuffer, * TopMaskBuffer;

-		BYTE * bb, * tb, * bmb, * tmb;

-		BYTE * db=ptPixels;

-		int vstep_d=16*4;

-		int vstep_b=bmp_bottom.bmWidthBytes;

-		int vstep_t=bmp_top.bmWidthBytes;

-		int vstep_bm=bmp_bottom_mask.bmWidthBytes;

-		int vstep_tm=bmp_top_mask.bmWidthBytes;

-		alpha=alpha?alpha:255;

-		if (bmp_bottom.bmBits) bb=BottomBuffer=(BYTE*)bmp_bottom.bmBits;

-		else

-		{

-			BottomBuffer=(BYTE*)malloc(bmp_bottom.bmHeight*bmp_bottom.bmWidthBytes);

-			GetBitmapBits(iciBottom.hbmColor,bmp_bottom.bmHeight*bmp_bottom.bmWidthBytes,BottomBuffer);

-			bb=BottomBuffer+vstep_b*(bmp_bottom.bmHeight-1);

-			vstep_b=-vstep_b;

-		}

-		if (bmp_top.bmBits) tb=TopBuffer=(BYTE*)bmp_top.bmBits;

-		else

-		{

-			TopBuffer=(BYTE*)malloc(bmp_top.bmHeight*bmp_top.bmWidthBytes);

-			GetBitmapBits(iciTop.hbmColor,bmp_top.bmHeight*bmp_top.bmWidthBytes,TopBuffer);

-			tb=TopBuffer+vstep_t*(bmp_top.bmHeight-1);

-			vstep_t=-vstep_t;

-		}

-		if (bmp_bottom_mask.bmBits)

-		{

-			BottomMaskBuffer=(BYTE*)bmp_bottom_mask.bmBits;

-			bmb=BottomMaskBuffer;         

-		}

-		else

-		{

-			BottomMaskBuffer=(BYTE*)malloc(bmp_bottom_mask.bmHeight*bmp_bottom_mask.bmWidthBytes);            

-			GetBitmapBits(iciBottom.hbmMask,bmp_bottom_mask.bmHeight*bmp_bottom_mask.bmWidthBytes,BottomMaskBuffer);

-			bmb=BottomMaskBuffer+vstep_bm*(bmp_bottom_mask.bmHeight-1);

-			vstep_bm=-vstep_bm;

-

-		}

-		if (bmp_top_mask.bmBits)

-		{

-			TopMaskBuffer=(BYTE*)bmp_top_mask.bmBits;

-			tmb=TopMaskBuffer;

-

-		}

-		else

-		{

-			TopMaskBuffer=(BYTE*)malloc(bmp_top_mask.bmHeight*bmp_top_mask.bmWidthBytes);

-			GetBitmapBits(iciTop.hbmMask,bmp_top_mask.bmHeight*bmp_top_mask.bmWidthBytes,TopMaskBuffer);

-			tmb=TopMaskBuffer+vstep_tm*(bmp_top_mask.bmHeight-1);

-			vstep_tm=-vstep_tm;

-		}

-		{

-			int x=0; int y=0;

-			BOOL topHasAlpha=ske_CheckHasAlfaChannel(TopBuffer,bmp_top.bmWidthBytes,bmp_top.bmHeight);

-			BOOL bottomHasAlpha=ske_CheckHasAlfaChannel(BottomBuffer,bmp_bottom.bmWidthBytes,bmp_bottom.bmHeight);

-			BOOL topHasMask=ske_CheckIconHasMask(TopMaskBuffer);

-			BOOL bottomHasMask=ske_CheckIconHasMask(BottomMaskBuffer);

-			for (y=0; y<16; y++)

-			{

-				for (x=0; x<16; x++)

-				{

-					BOOL mask_b=ske_GetMaskBit(bmb,x);

-					BOOL mask_t=ske_GetMaskBit(tmb,x);

-					DWORD bottom_d=((DWORD*)bb)[x];

-					DWORD top_d=((DWORD*)tb)[x];

-					if (topHasMask)

-					{

-						if (mask_t==1 && !topHasAlpha )  top_d&=0xFFFFFF;

-						else if (!topHasAlpha) top_d|=0xFF000000;

-					}

-					if (bottomHasMask)

-					{

-						if (mask_b==1 && !bottomHasAlpha) bottom_d&=0xFFFFFF;

-						else if (!bottomHasAlpha) bottom_d|=0xFF000000;

-					}

-					((DWORD*)db)[x]=ske_Blend(bottom_d,top_d,alpha);

-				}

-				bb+=vstep_b;

-				tb+=vstep_t;

-				bmb+=vstep_bm;

-				tmb+=vstep_tm;

-				db+=vstep_d;

-			}

-		}

-		if (!bmp_bottom.bmBits) free(BottomBuffer);

-		if (!bmp_top.bmBits) free(TopBuffer);

-		if (!bmp_bottom_mask.bmBits) free(BottomMaskBuffer);

-		if (!bmp_top_mask.bmBits) free(TopMaskBuffer);

-	}

-	else

-	{

-		ske_DrawIconEx(tempDC,0,0,hBottom,16,16,0,NULL,DI_NORMAL);

-		ske_DrawIconEx(tempDC,0,0,hTop,16,16,0,NULL,DI_NORMAL|(alpha<<24));

-	}

-	DeleteObject(iciBottom.hbmColor);

-	DeleteObject(iciTop.hbmColor);

-	DeleteObject(iciBottom.hbmMask);

-	DeleteObject(iciTop.hbmMask);

-

-	SelectObject(tempDC,oImage);

-	DeleteDC(tempDC);

-	{

-		//BYTE *p=malloc(32);

-		//memset(p,0,32);

-		BYTE p[32] = {0};

-		nMask=CreateBitmap(16,16,1,1,(void*)&p);

-		{

-			HDC tempDC2=CreateCompatibleDC(NULL);

-			HDC tempDC3=CreateCompatibleDC(NULL);

-			HBITMAP hbm=CreateCompatibleBitmap(tempDC3,16,16);

-			HBITMAP obmp=(HBITMAP)SelectObject(tempDC2,nMask);

-			HBITMAP obmp2=(HBITMAP)SelectObject(tempDC3,hbm);

-			DrawIconEx(tempDC2,0,0,hBottom,16,16,0,NULL,DI_MASK);

-			DrawIconEx(tempDC3,0,0,hTop,16,16,0,NULL,DI_MASK);

-			BitBlt(tempDC2,0,0,16,16,tempDC3,0,0,SRCAND);

-			SelectObject(tempDC2,obmp);

-			SelectObject(tempDC3,obmp2);

-			DeleteObject(hbm);

-			DeleteDC(tempDC2);

-			DeleteDC(tempDC3);

-		}

-		iNew.fIcon=TRUE;

-		iNew.hbmColor=nImage;

-		iNew.hbmMask=nMask;

-		res=CreateIconIndirect(&iNew);

-		DeleteObject(nImage);

-		DeleteObject(nMask);

-	}

-	return res;

-}

-

-#define NEWJOINEDSTR( destination, first, separator, last)						\

-	destination=(char*)alloca(strlen(first)+strlen(separator)+strlen(last)+1);	\

-	if (destination) {													\

-	*destination='\0';												\

-	strcat(destination,first);										\

-	strcat(destination,separator);									\

-	strcat(destination,last);										\

-	}													   

-

-#define SKINSETSECTION "SkinnedSettings"

-

-BOOL SkinDBGetContactSetting(HANDLE hContact, const char* szSection, const char*szKey, DBVARIANT * retdbv, BOOL * bSkined )

-{

-	if (!hContact) {  //only for not contact settings

-		char * szSkinKey;

-		NEWJOINEDSTR(szSkinKey,szSection,"@",szKey);

-		if ( !ModernGetSetting(hContact, SKINSETSECTION, szSkinKey, retdbv) )	{

-			if (bSkined) *bSkined=TRUE;

-			return FALSE;

-		}	}

-	// not skinned

-	if (bSkined) bSkined=FALSE;

-	return ModernGetSetting(hContact, szSection, szKey, retdbv);

-}

-

-BYTE SkinDBGetContactSettingByte(HANDLE hContact, const char* szSection, const char*szKey, BYTE bDefault)

-{

-	DBVARIANT dbv={0};

-	BOOL bSkined=FALSE;

-	if ( !SkinDBGetContactSetting(hContact, szSection, szKey, &dbv, &bSkined)) {

-		if (dbv.type==DBVT_BYTE)

-		{

-			BYTE retVal=dbv.bVal;

-			ModernDBFreeVariant(&dbv);

-			return retVal;

-		} else {

-			ModernDBFreeVariant(&dbv);

-			if (!bSkined) return ModernGetSettingByte(hContact, szSection, szKey, bDefault);

-		}

-	}

-	return bDefault;

-}

-

-WORD SkinDBGetContactSettingWord(HANDLE hContact, const char* szSection, const char*szKey, WORD wDefault)

-{

-	BOOL bSkined=FALSE;

-	DBVARIANT dbv={0};

-	if ( !SkinDBGetContactSetting(hContact, szSection, szKey, &dbv, &bSkined)) {

-		if (dbv.type==DBVT_WORD)	{

-			WORD retVal=dbv.wVal;

-			ModernDBFreeVariant(&dbv);

-			return retVal;

-		} else {

-			ModernDBFreeVariant(&dbv);

-			if (!bSkined) return ModernGetSettingWord(hContact, szSection, szKey, wDefault);

-		}	

-	}

-	return wDefault;

-}

-

-DWORD SkinDBGetContactSettingDword(HANDLE hContact, const char* szSection, const char*szKey, DWORD dwDefault)

-{

-	DBVARIANT dbv={0};

-	BOOL bSkined=FALSE;

-	if ( !SkinDBGetContactSetting(hContact, szSection, szKey, &dbv, &bSkined)) {

-		if (dbv.type==DBVT_DWORD)	{

-			DWORD retVal=dbv.dVal;

-			ModernDBFreeVariant(&dbv);

-			return retVal;

-		} else {

-			ModernDBFreeVariant(&dbv);

-			if (!bSkined) return ModernGetSettingDword(hContact, szSection, szKey, dwDefault);

-		}	

-	}

-	return dwDefault;

-}