Как плавно поменять цвет формы

[гера]

При перемещении указателя мыши по форме она должна плавно менять свой цвет от значений в углах: лев.верхн. - черный, лев.нижн. - голубой, прав.верхн. - красный, прав.нижн. - белый .
это через rgb, но как указать что цвет в таком углу- такой и потом перетекает?????

и с кнопками у меня не получается (компилируется но они ничего не делают!). делаю другие наподобие :

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
     if (key=VK_F10) or (key={здесь X})and (ssALT in shift)then  showmessage('Выйти?');
   close; end;

Нажатием Ctrl-Alt-C этот режим можно включать-выключать.

[Shuraken]

Форма вся должна менять свой окрас или только в области курсора?