Ukrywanie kursora

Aby ukryć kursor myszy wywołujemy funkcję Windows API ShowCursor() podając jako argument wartość logiczną false:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   ShowCursor(false);
}

aby ponownie włączyć wyświetlanie kursora wywołujemy ponownie funkcję ShowCursor() podając jako argument wartość logiczną true:

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   ShowCursor(true);
}