Discussion :

[kuranes]

Bonjour

J'ai actuellement un logiciel qui peut switcher entre deux versions : gestion de stock pharmaceutique, et gestion de stock plus global, selon la configuration dans l'ini.

J'ai deux icones différentes.

Comment faire pour modifier l'icone d'une fenêtre par programmation ?

Merci d'avance

[Louis Griffont]

Je ne sais pas pour la 14, mais en 10 c'est impossible !

[kuranes]

Bon un collègue a trouvé la solution, la voila :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
PROCEDURE ChangerIcone(sIcon)
 
Icon est un entier = 0x80 
 
hIcon est un entier = AppelDLL32("user32","LoadImageA" ,Null, sIcon,1,0,0,16) 
 
SI hIcon ALORS 
	SendMessage(Handle(),Icon ,1,hIcon) // icône 32*32 (alt-tab) 
	SendMessage(Handle(),Icon ,0,hIcon) // icône 16*16 (fenêtre) 
SINON 
	//Traitement en cas d icone non trouve
FIN

Ca marche nickel

[Louis Griffont]

Interressant,

Je teste en 10, pour voir.

Merci