Открываем delphi, кидаем на форму Button из вкладки стандарт, кликаем двойной щелчёк мыши по кнопке. Появится процедура в неё вставляем код:
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
Sleep(3000); // ждём 3 сек.
keybd_event(VK_F1, 0, 0, 0); //нажимаем F1
keybd_event(VK_F1, 0, KEYEVENTF_KEYUP, 0); // отпускаем F1
end;
Запускаем прогу, нажимаем на кнопку и через 3 сек прога нажмёт F1.
Как проверить нажатие F1 думаю догадаетесь.
Для второго вопроса: получение цвета пикселя, надо изучить основы Delphi (Canvas, пару API ф-нц). Код конечно можно скинуть но вряд ли вы чтото там поймёте.
И цвет с: TColor; а не Real;