Hallo, weiß jemand, ob es möglich ist, dem Taskbar-Button der eigenen Applikation zur Laufzeit ein neues Icon zuzuweisen - evtl. mit Hilfe von TTaskbar?

Application.Icon ?

bzw. das Icon der Form, welche dort ihren TaskButton hat, da Application.MainFormOnTaskBar (weil das FormIcon oft leer ist, wird halt Application.Icon genutzt)
TForm.Icon

Danke, du hast mich auf die Lösung gebracht:

Application.Icon.LoadFromFile('C:\DELPHI\Icons\mein.ico'); Und schon hat mein Taskbar-Button ein neues Icon! )

Leider ist es mir nicht gelungen, das Icon aus einer Projekt-Resource zu laden:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.LoadTaskbarIcon(const AResName: string);
var
  NewIcon: Vcl.Graphics.TIcon;
begin
  NewIcon := Vcl.Graphics.TIcon.Create;
  try
    NewIcon.LoadFromResourceName(HInstance, AResName);
    Application.Icon.Assign(NewIcon);
  finally
    NewIcon.Free;
  end;
end;

Das heißt, laden aus der Resource funktioniert schon, da ich es im CodeSite Live Viewer anzeigen kann:

markieren

Delphi-Quellcode:

Application.Icon.LoadFromResourceName(HInstance, AResName);
CodeSite.Send('TForm1.LoadTaskbarIcon: NewIcon', NewIcon);
Application.Icon.Assign(NewIcon);

Nur die Zuweisung an Application.Icon funktioniert nicht.

Der Form ist aber kein Icon zugewiesen?
Wenn doch, dann überdeckt sie ja das Application.Icon.

Mal versuchen das Icon in die Form der laden?


Der Code liegt aber nicht in einem Package oder DLL?
HInstance ist das Handle des Moduls (EXE/DLL/BPL), in welchem der Code liegt.
MainInstance ist immer das der EXE, aber auch 0 entspricht der EXE.

Delphi selbst lädt so das Icon ins Application, beim Programmstart (TApplication.Create).
Application.Icon.Handle := LoadIcon(MainInstance, 'MAINICON');

Und falls bei Abfrage in Application und Form kein Icon-Handle vorhanden ist, dann wird dort via LoadIcon(0, IDI_APPLICATION) versucht Eines zu laden, aber das dürfte vom Ergebnis her dem Ersten entsprechen.


Versuch es mal so

markieren

Delphi-Quellcode:

NewIcon.LoadFromResourceName(HInstance, AResName);
Application.Icon := NewIcon; // macht aber intern eigentlich auch nur ein Assign
NewIcon.Free;
// oder
Application.Icon.LoadFromResourceName(HInstance, AResName);
// oder
var Stream := TResourceStream.Create(HInstance, AResName, RT_ICON);
Application.Icon.LoadFromStream(Stream);
Stream.Free;

aber ich hätte jetzt keinen Unterschied erwartet, egal ob es über das Handle oder direkt in die VCL-Komponente geladen oder über ein zusätzliches TIcon übergeben wird.