// Kennen Sie das: Sie geben Ihrer Anwendung ein neues
// Icon, aber der Explorer zeigt immer noch das alte
// an? Dann muss der IconCache geleert werden:


// Getestet mit D2010 unter Win7

program IconCache; 
 
uses Windows, Classes, ShellApi; 
 
var 
  sl: TStringlist; 
  temp: string; 
 
begin 
  sl := TStringlist.Create; 
  setlength(temp, max_path); 
  setlength(temp, GetTempPath(max_path, pchar(temp))); 
  temp := concat(temp, 'Clear.bat'); 
  sl.Add('@echo off'); 
  sl.Add('taskkill /f /IM explorer.exe'); 
  sl.Add('CD /d %userprofile%\AppData\Local'); 
  sl.Add('DEL IconCache.db /a'); 
  sl.Add('Start explorer.exe'); 
  sl.Add('cd\'); 
  sl.savetofile(temp); 
  ShellExeCute(0, 'open', pchar(temp), nil, nil, sw_hide); 
  sl.Free; 
 
end.