[martonbarbosa]

La verdad Newtron que te agradesco muchisimo!!!

Lo pude hacer funcionar ja... y simplemente use el primer codigo que me diste y lo adapte a ambas situaciones y funciono de marabilla!!!

te adjunto el code para que veas como quedo y que funciona!

Código Delphi [-]
//Limpia Rastros Firefox
if ChFi.Checked then
 begin
  FindFirst(Raiz + Usu + Ruta + 'Datos de programa\Mozilla\Firefox\Profiles\' + '*.default', faDirectory, Fichero);
  If Fichero.Name = '' then exit;
   FileInfo.Wnd := Handle;
   FileInfo.wFunc := FO_DELETE;
   FileInfo.pFrom := PAnsiChar(Raiz + Usu + Ruta + 'Datos de programa\Mozilla\Firefox\Profiles\' + Fichero.Name + '\Cache\*.*' + #0#0);
   FileInfo.pTo := nil;
   FileInfo.fFlags := FOF_SILENT or FOF_NOCONFIRMATION;
   ShFileOperation(FileInfo);
  while FindNext(Fichero) = 0 do begin
   FileInfo.Wnd := Handle;
   FileInfo.wFunc := FO_DELETE;
   FileInfo.pFrom := PAnsiChar(Raiz + Usu + Ruta + 'Datos de programa\Mozilla\Firefox\Profiles\' + Fichero.Name + '\Cache\*.*' + #0#0);
   FileInfo.pTo := nil;
   FileInfo.fFlags := FOF_SILENT or FOF_NOCONFIRMATION;
   ShFileOperation(FileInfo);
  end;
 end;

Con este codigo lo que haceos es borrar la cache de Mozilla Firefox

Nuevamente muchisima gracias!!!

Salu2

4n71chr157