[Winny]

Люди, читайте правила. Ты нарушил два пункта правила: написал в одной теме больше одного вопроса и не искал в поисковике Яндекс по ключевым словам ответ на вопрос №3. Простой запрос: "как программно двигать курсор delphi". Вот ссылка: http://itby.ru/content/view/1924/40/. Вот код:

Код:

var 
  pt : TPoint; 
begin 
   Application.ProcessMessages; 
   Screen.Cursor := CrHourglass; 
   GetCursorPos(pt); 
   SetCursorPos(pt.x + 1, pt.y + 1); 
   Application.ProcessMessages; 
   SetCursorPos(pt.x - 1, pt.y - 1);