Hey danke für den Code ! =)
Aber ich kann noch immer das Icon nicht ändern ...
Was ist denn nur falsch an dem Code
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var fIcon: TIcon;
Begin
ficon.LoadFromFile(extractfilepath(application.exename) + '63.ico');
icondata.hIcon := ficon.Handle;
Shell_NotifyIcon(NIM_MODIFY, @icondata);
end;
Ich bekomme immer eine
Access violation ...