RAFRAICHIR LE BUREAU
cs_grandvizir
Messages postés
1106
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
3 septembre 2006
-
28 déc. 2004 à 22:49
cs_pepitto Messages postés 22 Date d'inscription jeudi 13 novembre 2003 Statut Membre Dernière intervention 25 juin 2008 - 12 juin 2006 à 19:22
cs_pepitto Messages postés 22 Date d'inscription jeudi 13 novembre 2003 Statut Membre Dernière intervention 25 juin 2008 - 12 juin 2006 à 19:22
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/11611-rafraichir-le-bureau
https://codes-sources.commentcamarche.net/source/11611-rafraichir-le-bureau
12 juin 2006 à 19:22
- en regardant le fichier << shlobj.pas >> j'ai vu que la déclaration de
CLSID est inutile puisque elle est déjà faite.
- La 2ème chose est destiné à GrandVizir : à quoi sert "CoInitialize(nil)"
je suis assez novice.
28 déc. 2004 à 22:49
program Project1;
uses ShlObj, ActiveX, ComObj;
const CLSID_ActiveDesktop : TGUID= '{75048700-EF1F-11D0-9888-006097DEACF9}';
var ActiveDesktop: IActiveDesktop;
{$APPTYPE Gui}{$R-}
begin
CoInitialize(nil);
ActiveDesktop:=CreateComObject(CLSID_ActiveDesktop) as IActiveDesktop;
ActiveDesktop.ApplyChanges(AD_APPLY_ALL or AD_APPLY_FORCE);
//CoUninitialize;
end.