Discussion :

[DR]

J'essaie en vain de charger l'icone principal d'un exe 16 bits dans un TImage.
Le LoadIcon me renvoie toujours un Handle invalide.

[CGi]

Utilise ExtractIcon

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
     #include <shellapi.h> 
 
    //..........
 
     HICON IconApp;
     IconApp = ExtractIcon(HInstance, "App.exe", 0);
     DrawIcon(Image1->Canvas->Handle,1,1,IconApp);

J'ai testé avec des App 16 et 32 bits ça fonctionne sous les deux.

[DR]

Ca fonctionne bien merci.