Как скрыть курсор мышки.
Компилятор: Delphi
Поместите в событие OnClick в button1 и button2 следующие
коды.Если курсор мышки скрыт, то выбрать button2
можно клавишей Tab.
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowCursor(False);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
ShowCursor(True);
end;
|