2.44 du 17 Août 2013: ajout fonction ExtractIconFromFile

Nouvelle version:
V2.44 du 17/08/2013

Nouveauté:
nouvelle fonction:
res% = dll_call3("ExtractIconFromFile",adr(fil$),adr(out$),size%)

Modules modifiés:
KGF.dll
KGF_SUB.bas

La doc suivra.

Le paramètre size% peut prendre une des valeurs 256,128,64,48,32,16. Si une icône de la taille spécifiée est présente dans le fichier, elle sera extraite et la fonction retourne la valeur 0. Sinon, ou en cas d'erreur quelconque, la fonction retourne la valeur 1.

As tu mis à jours de partout ?
J' ai beau lancer mon utilitaire de mise à jour de KGF.dll et autres,
je reste à la version 2.43...

Oups... Tout était à jour, sauf le fichier versions.txt. C'est corrigé.

Merci Klaus...

heu...je suis toujours avec 2.43.2...mouep y' a un truc qui cloche...

Je pense que j'ai récupéré la dernière version, mais j'ai un petit problème:

Code:

DIM res%, f$, out$, size%
out$ = "C:\TEMP\Icotest.ico"
f$ = "C:\Windows\System32\Notepad.exe"
size% = 32

picture 1
DLL_ON "C:\PANORAMIC\KLAUS\DLLs\KGF.dll"

res% = DLL_CALL3("ExtractIconFromFile",ADR(f$),ADR(out$),size%)
res% = DLL_CALL1("LoadAnyImageFile",ADR(out$))
CLIPBOARD_PASTE 1
end

De plus, c'est embêtant d'avoir à préciser la taille de l'icône à extraire, alors qu'on n'est pas censé la connaître à l'avance...

Klaus tu pourrais faire des petits articles sur l'usage de ta DLL dans ses divers champs d'applications en reprenant les exemples que tu as déjà publiés (et peut être en les mettant à jour par la même occasion)
Enfin c'est une idée. En tout cas merci pour JL35 (entre autre) pour cette nouvelle fonction

J'ai remis en ligne, et j'ai bien vérifié que la version est 2.44. Aussi bien sur monsite funpic que sur mon webdav.

J'ai corrigé le problème que tu as soulevé, JL35. Il n'y a plus d'erreur maintenant. Et pour l'usage de la fonction, regarde ton code modifié comme suit:

Code:

DIM res%, f$, out$, size%, ind%
dim taille%(6)
taille%(1) = 16
taille%(2) = 32
taille%(3) = 48
taille%(4) = 64
taille%(5) = 128
taille%(6) = 256
out$ = "C:\TEMP\Icotest.ico"
f$ = "C:\Windows\System32\Notepad.exe"
size% = 32

picture 1
DLL_ON "KGF.dll"
ind% = 1
while ind%<6
  ind% = ind% + 1
  res% = DLL_CALL3("ExtractIconFromFile",ADR(f$),ADR(out$),taille%(ind%))
  if res%=0
    res% = DLL_CALL1("LoadAnyImageFile",ADR(out$))
    exit_while
  end_if
end_while
CLIPBOARD_PASTE 1
end

Le programme charge la première icône trouvée, en commençant par 16x16 jusqu'au 256x256. Tu peux bien sûr le modifier pour qu'il charge toutes les icônes, dans les picture séparés...

Ok Klaus, je n'ai plus d'erreur avec la nouvelle version, mais si je reprends ton exemple en affichant tous les résultats, je n'obtiens quand même que des portions d'image de 32x32 (le Notepad.exe semble contenir un ensemble d'icônes de différentes tailles, je dirais 13 d'après ce que je vois dans le binaire, et qui sont apparemment toutes contenues dans le fichier notepad.ico que je t'ai communiqué):

Code:

DIM res%, f$, out$, size%, ind%
out$ = "C:\TEMP\Icotest.ico"
f$ = "C:\Windows\System32\Notepad.exe"

width 0,680: color 0,164,255,255
picture 1: top 1,100: left 1,2: height 1,20: width 1,20
picture 2: top 2,100: left 2,30: height 2,40: width 2,40
picture 3: top 3,100: left 3,80: height 3,60: width 3,60
picture 4: top 4,100: left 4,150: height 4,70: width 4,70
picture 5: top 5,100: left 5,230: height 5,130: width 5,130
picture 6: top 6,100: left 6,370: height 6,260: width 6,260

DLL_ON "C:\PANORAMIC\KLAUS\DLLs\KGF.dll"

dim taille%(6)
taille%(1) = 16
taille%(2) = 32
taille%(3) = 48
taille%(4) = 64
taille%(5) = 128
taille%(6) = 256

ind% = 0
while ind%<6
  ind% = ind% + 1
  res% = DLL_CALL3("ExtractIconFromFile",ADR(f$),ADR(out$),taille%(ind%))
  if res%=0
    res% = DLL_CALL1("LoadAnyImageFile",ADR(out$))
    CLIPBOARD_PASTE ind%
    print str$(taille%(ind%))
  end_if
end_while
end

Si tu fais une pause après la définition des pictures, on voit bien les objets générés, de différentes tailles, mais après c'est tronqué, je ne vois pas pourquoi.

Ce que je comprends pas, non plus, c'est pourquoi chaque picture se redimensionne au moment du clipboard_paste aux dimensions de l'image du clip (manifestement toujours 32x32, sauf pour 16x16) -> en fait c'est visuel, mais ils gardent bien leurs dimensions...

PS j'ai essayé d'étudier la structure d'un fichier .ico, mais c'est bien plus compliqué que le bmp...

Oui, c'est ce que je constate aussi. Je suis en train de pister le problème.