Определение цвета пикселя под курсором

int x = Mouse->CursorPos.x;
int y = Mouse->CursorPos.y;
HDC WINAPI hdc = CreateDCA("DISPLAY", NULL, NULL, NULL);
TColor color = GetPixel(hdc, x, y);
DeleteDC(hdc);

ClientToScreen();
ScreenToClient();

PostMessage(FindWindow(класс,NULL), WM_KEYDOWN, VK_F1,0);

//---------------------------------------------------------------------------
int wj_GetPix(HANDLE h, int x, int y) // h - хендл нужного окна
{
    return GetPixel(GetWindowDC(h), x, y); //!!!
}
//---------------------------------------------------------------------------

//---------------------------------------------------------------------------
void wj_MouseClickToWindow(HANDLE h, int x, int y, bool true_left____false_right)
{
    if(IsWindow(h))
    {
        if(true_left____false_right)
        {
            Application->ProcessMessages();
            SendMessage(h, WM_LBUTTONDOWN, NULL, MAKELPARAM(x, y));
            Application->ProcessMessages();
            SendMessage(h, WM_LBUTTONUP, NULL, MAKELPARAM(x, y));
            Application->ProcessMessages();
        }
        else
        {
            Application->ProcessMessages();
            SendMessage(h, WM_RBUTTONDOWN, NULL, MAKELPARAM(x, y));
            Application->ProcessMessages();
            SendMessage(h, WM_RBUTTONUP, NULL, MAKELPARAM(x, y));
            Application->ProcessMessages();
        }
    }
}
//---------------------------------------------------------------------------