Кнопки-картинки

[amator_roma]

Вместо кнопок в програмке использовал изображения в онклик вписал действия но при нажатии нету визуального нажатия такого как в button єто можна както исправить ?

[ArtGrek]

используи 2 картинки, и меняи их по очереди

[asmodey1]

Сообщение от amator_roma

Вместо кнопок в програмке использовал изображения в онклик вписал действия но при нажатии нету визуального нажатия такого как в button єто можна както исправить ?

Элементарно, Ватсон:

procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
Image1.Left:=Image1.Left+2;
Image1.Top:=Image1.Top-2;
end;

procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
Image1.Left:=Image1.Left-2;
Image1.Top:=Image1.Top+2;
end;

Дальше развивайте самостоятельно.