ты уж извини, покажу концепцию на си...

void __fastcall TFormMain::Timer1Timer(TObject *Sender)
{
POINT ptCur;

GetCursorPos(&ptCur);

ClientSocket1->Socket->SendBuf(&ptCur, sizeof(POINT))
}

где ClientSocket1 - стандартный компонент ( имеется в виду что сокет уже законнекчен )

__________________


snow white world wide