Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi problem mit extracticon (https://www.delphipraxis.net/154286-problem-mit-extracticon.html)

SplinterCell 4. Sep 2010 11:02

problem mit extracticon
 
Crosspost hier

ich will von jedem prozess das dazugehörende icon in einem lsitview anzeigen und habe das so versucht:


Code:
var
i:Integer;
Process:Tprocessitem;
ico:HICON;
icon:Ticon;
begin
for i := 0 to Listview1.items.Count - 1 do begin
Process := ProcessInfo1.RunningProcesses.FindByName(ListView1.Items[i].Caption);
      if ExtractIcon(process.ExeFile, ico, 1, false, 16, 16, LR_DEFAULTCOLOR) then
       begin
         icon:= TIcon.Create;
         icon.Handle:= ico;
         imagelist3.AddIcon(icon);
         icon.Free;
              ListView1.Items[i].ImageIndex:= Imagelist3.Count - 1;
end;
end;

aber leider wird nur dasselbe icon angezeigt und außerdem wird das anwendungsicon geändert


woran kann das liegen?



mfg
SplinterCell

Luckie 4. Sep 2010 11:21

AW: problem mit extracticon
 
Also die API-Funktion, die ich kenne hat nur drei Parameter: http://msdn.microsoft.com/en-us/libr...8VS.85%29.aspx
Wo kommt deine Funktion her und was liefert sie im Fehlerfall zurück? Kann man einen Fehlercode abfragen, um den Grund des Fehlschlagens zu erfahren?

Dann: Was steht ihn process.ExeFile?

SplinterCell 4. Sep 2010 12:49

AW: problem mit extracticon
 
problem gelöst,
hab vergessen das ich vorher selber eine function mit dem namen extarcticon definiert hab:)

process.exefile gibt den pfad vom prozess an


mfg
Splinter Cell

Luckie 4. Sep 2010 13:19

AW: problem mit extracticon
 
Zitat:

Zitat von SplinterCell (Beitrag 1047487)
process.exefile gibt den pfad vom prozess an

Davon bin ich ausgegangen, aber ich wollte wissen, ob auch der korrekte Pfad jeweils da drin steht.

SplinterCell 4. Sep 2010 13:26

AW: problem mit extracticon
 
Zitat:

Zitat von Luckie (Beitrag 1047491)
Zitat:

Zitat von SplinterCell (Beitrag 1047487)
process.exefile gibt den pfad vom prozess an

Davon bin ich ausgegangen, aber ich wollte wissen, ob auch der korrekte Pfad jeweils da drin steht.

wie meinst du das mit dem korrekten pfad?

Luckie 4. Sep 2010 13:36

AW: problem mit extracticon
 
OK, noch mal zum Mitschreiben. Du hast gesagt, dass du immer das gleiche Icon bekommen hast. Was wäre da nahe liegender mal zu gucken, ob der Pfad den dir die Klasse liefert mal zu kontrollieren?

SplinterCell 4. Sep 2010 13:42

AW: problem mit extracticon
 
Zitat:

Zitat von Luckie (Beitrag 1047494)
OK, noch mal zum Mitschreiben. Du hast gesagt, dass du immer das gleiche Icon bekommen hast. Was wäre da nahe liegender mal zu gucken, ob der Pfad den dir die Klasse liefert mal zu kontrollieren?



aso,
ja die kalsse funktioniert
problem war ja die funktion die ich selber definiert habe


mfg
SplinterCell


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:37 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz