#include <windows.h>

#define LWA_COLORKEY            0x00000001
#define LWA_ALPHA               0x00000002
#define WS_EX_LAYERED           0x00080000
.......

{

BOOL  (*SetLayeredWindowAttributes)(HWND hwnd,
                    COLORREF pcrKey,
                    BYTE pbAlpha,
                    DWORD pdwFlags);

HMODULE lib = LoadLibrary("user32.dll");

SetLayeredWindowAttributes =
          (BOOL
           (*)(HWND hwnd, COLORREF , BYTE , DWORD ))
          GetProcAddress(lib, "SetLayeredWindowAttributes");



HWND hwnd;
char lpszZagolovok[4096];

strcpy(lpszZagolovok, "continent");


hwnd = FindWindowEx(NULL, NULL, NULL, lpszZagolovok);



LONG L = GetWindowLong(hwnd, GWL_EXSTYLE);
L |= WS_EX_LAYERED;
SetWindowLong(hwnd, GWL_EXSTYLE, L);

BYTE alpha = 100;
SetLayeredWindowAttributes(hwnd, 0, alpha, LWA_ALPHA);

}

unsigned int size, cbTranslate, dwBytes;
char *pBlock, *lpBuffer;
char path[256], SubBlock[512];

struct LANGANDCODEPAGE {
  WORD wLanguage;
  WORD wCodePage;
} *lpTranslate;


strcpy(path,"C:\\windows\\explorer.exe");


if(size = GetFileVersionInfoSize(path,0))
{
  pBlock = new char[size];

  GetFileVersionInfo(path,0,size,pBlock);

  // получаем список языков и кодовых страниц.

  VerQueryValue(pBlock,
              "\\VarFileInfo\\Translation",
              (LPVOID*)&lpTranslate,
              &cbTranslate);

  //поехали по каждой кодовой странице
  for(DWORD i=0; i < (cbTranslate/sizeof(struct LANGANDCODEPAGE)); i++ )
  {
    sprintf(SubBlock,
            "\\StringFileInfo\\%04x%04x\\FileDescription",

    /*
    тут может быть вместо FileDescription:

    Comments, InternalName, ProductName,
    CompanyName, LegalCopyright, ProductVersion,
    FileDescription, LegalTrademarks, PrivateBuild,
    FileVersion, OriginalFilename, SpecialBuild */

    lpTranslate[i].wLanguage,
    lpTranslate[i].wCodePage);


    VerQueryValue(pBlock,
                SubBlock,
                (LPVOID*)&lpBuffer,
                &dwBytes);

    ShowMessage(lpBuffer);  // в lpBuffer — результат
  }

  delete[] pBlock;
  if(lpBuffer) delete[] lpBuffer;
}

LRESULT CALLBACK MouseHook(int nCode, WPARAM wParam, LPARAM lParam)
{
...
SendMessage(win_handle,WM_USER,wParam, lParam);
...
}

void __fastcall TfMain::GetMMsg(TMessage& Message)
{
 ...
 MOUSEHOOKSTRUCT *ctas;
 ctas=(MOUSEHOOKSTRUCT*)(Message.LParam);
 HWND win_handle=ctas->hwnd;
 ...
}

HWND awin=GetActiveWindow();

Cardinal teax,tebx,tecx,tedx,level;
// te?x = cpuid reg. values
// level = cpuid level
asm
  {
   pushad
   mov eax,level
   cpuid
   mov teax,eax
   mov tebx,ebx
   mov tecx,ecx
   mov tedx,edx
   popad
  }