Mensaje    Asunto: Activar monitor con movimiento raton Responder citando

Mi pregunta es,tengo una aplicacion con un serversocket y he intentado activar el monitor cuando esta en reposo o con el salvapantalla cuando se conecta un cliente la aplicacion la tengo minimizada lo he hecho emulando el movimiento del raton pero no se entera esta es la rutina que he usado.

Código:
void __fastcall TServer::Server1ClientConnect(TObject *Sender,
      TCustomWinSocket *Socket)
{
Application->Restore();
ShowWindow(Application->Handle, SW_RESTORE);
SetForegroundWindow(Application->Handle);

 mouse_event(NULL
        | MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE,
        MulDiv(25, 65535, Screen->Width - 1),
        MulDiv(25, 65535, Screen->Height - 1),
        0, 0);

 mouse_event(NULL
        | MOUSEEVENTF_MOVE | MOUSEEVENTF_ABSOLUTE,
        MulDiv(250, 65535, Screen->Width - 1),
        MulDiv(250, 65535, Screen->Height - 1),
        0, 0);
}


admito sugerencias,gracias