[Денис]

Я устанавливаю на кнопку Пуск картинку но при наведении на неё мышью она опять становица прежней!
Вот мой код что тута нужно поменять?

Код:

 
procedure TForm1.Button1Click(Sender: TObject);
begin
BitBlt(DC, 0, 0, R.Right - R.Left, R.Bottom - R.Top, image1.Canvas.Handle, 0, 0, SRCCOPY);
end;
 
procedure TForm1.FormCreate(Sender: TObject);
begin
HW := FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button', nil);
GetWindowRect(HW, R);
DC := GetWindowDC(HW);
end;

[4kusNick]

Можешь по таймеру обновлять пробовать или при входе (выходе, перемещении) мыши в (по) область (ти) кнопки...

[Денис]

а нельзя как нить не делая это действие многа раз? может где в реестре мона изменить адрес картинки или что-нить в этом роде?