Setzt andere Programme in die TNA

[Alexander]

Hi,
ich habe gestern auch mal wieder was programmiert.
Nur weiß ich einfach nicht wie ich es nennen soll...Deswegen habe ich bisher auch noch nichts am ayout gemacht.
Also das Programm entfernt fremde Programme/FEnster aus der Taskbar und setzt sie in ein PopUp-Menü in die TNA (links neben der Uhr).
Zusätzlich gibt es einen Fenster-Manager, mit dem man die Fenster verstecken und wieder in die Taskbar einfügen kann.
Manchmal kommt es allerdings mit dem Fenstermanager zu einer Zugriffsverletzung. Bisher weiß ich nicht woran es liegt. Vielleicht könnt ihr mir helfen?
Vielen Dank schon mal für eure konstruktive Kritik!

[Alexander]

Hi Assarbad,
habe jetzt schon einen neuen Thread aufgemacht...
http://www.delphipraxis.net/viewtopi...e397585e98994a
Danke schon mal!!

[Alexander]

so neue Version (0.9.3).
es wurden nun auch die kleineren Sachen sowie beide Bugs, von denen Tom berichtet hat, behoben, sowie noch ein paar kleinere Sachen...
Download diesmal hier: www.alexander-franz.de/downloads/datei/tbm.zip
Danke schon mal für's weitere Testen

[Alexander]

und wieder eine neue Version (V 1.02)
es wurde wieder Bugs entfernt, ein paar kleinere Mängel entfernt und und und...
Unter anderem werden jetzt im PopUpMenü die Bildchen der einzelnen Fenster angezeigt. (sehen aber teilweise etwas schrarz aus. Liegt irgendwie an der ImageList. Wisst ihr wieso?)
Wäre toll wenn ihr es euch nochmals ankucken könntet.
Danke schon mal!!
Download
PS: Was könnte man noch ergänzen?

[Uncle Cracker]

Hi alexander,

Eine kleine Änderung wer gut, nämlich man sollte den Fenstermanager aktualiesieren können.

Sonst eigentlich ganz gut

[Alexander]

Hi Uncle Cracker,
super Idee, Danke!!
neue Version: Klick
In der neuen Verison wurde nur die Akutalisierung mit F5 mit eingebaut.
Habt ihr weitere Ideen?

[FriFra]

Zitat von alexander:

und wieder eine neue Version (V 1.02)
es wurde wieder Bugs entfernt, ein paar kleinere Mängel entfernt und und und...
Unter anderem werden jetzt im PopUpMenü die Bildchen der einzelnen Fenster angezeigt. (sehen aber teilweise etwas schrarz aus. Liegt irgendwie an der ImageList. Wisst ihr wieso?)
Wäre toll wenn ihr es euch nochmals ankucken könntet.
Danke schon mal!!
Download
PS: Was könnte man noch ergänzen?

Das schwarz liegt am Alpha-Blending (WinXP) und ist wohl ein kleiner Bug in der Komponente...
Das Problem kann man aber wie folgt lösen:

Delphi-Quellcode:

var
  SHFileInfo: TSHFileInfo;
  SysIcons: THandle;
  SystemIcons: TImageList;
begin
  SysIcons := SHGetFileInfo('', 0, SHFileInfo, SizeOf(SHFileInfo),
    SHGFI_SYSICONINDEX or SHGFI_SMALLICON);

  SystemIcon := TImageList.Create;
  SystemIcons.Handle := SysIcons; //SystemImagelist zuweisen...
  SystemIcons.ShareImages := True;

  {Wenn ImageList1 einmal der Inhalt der SystemImageList zugewiesen wurde
  unterstützt diese fortan 32Bit Icons mit Alphablending}
  ImageList1.Assign(SystemIcons);
  ImageList1.Clear;

  SystemIcons.Free;

Falls Du 32x32 Icons verwenden willst, musst Du natürlich SHGFI_SMALLICON gegen SHGFI_LARGEICON tauschen.

[Alexander]

Super, Danke!!!
neue Version ist dank FriFra wieder unter der gleichen Adresse wie zu vor erreichbar
Habt irh noch Erweiterungsideen?