Hello
Je cherche à injecter à un exe une icone extraite d'un autre exe, mais j'ai du mal avec les API. Voici mon code
Mais UpdateResource me renvoie toujours false.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Dim SourceFile As String = "C:\source.exe" Dim Targetfile As String = "C:\target.exe" Dim h_source As IntPtr = LoadLibrary(SourceFile) Dim h_icon As IntPtr = FindResource(h_source, "#0", RT_ICON) Dim h_resload As IntPtr = LoadResource(h_source, h_icon) Dim h_lockres As IntPtr = LockResource(h_resload) Dim handle As IntPtr = BeginUpdateResource(Targetfile, False) Dim bool As Boolean = _ UpdateResource(handle, RT_ICON, "#0", LANG_NEUTRAL, h_lockres, SizeofResource(h_source, h_icon)) EndUpdateResource(handle, False)
Aussi je ne comprends pas tres bien le second parametre de FIndResource, sur msdn ca dit que ca doit etre le nom de la ressource : comment je suis sensé le savoir ?
De meme pour le 3eme et le 4eme parametres de UpdateResource , je ne sais pas trop quoi y mettre
Quelqu'un pourrait il m'expliquer merci.
Partager