Copier fichier de "Temporary Internet Files" [Résolu]
cs_d4M13N
- Messages postés
- 27
- Date d'inscription
- dimanche 19 août 2007
- Dernière intervention
- 13 juillet 2009
- Messages postés
- 27
- Date d'inscription
- dimanche 19 août 2007
- Dernière intervention
- 13 juillet 2009
A voir également:
- Copier fichier de "temporary internet files"
- Impossible de copier le dossier "Temporary Internet Files" dans un autre réperto ✓ - Forum - VB.NET
- Supprimer un fichier dans Temporary Internet Files ✓ - Forum - Visual Basic 6
- Visual Basic / VB.NET : Effacer une url du cache (temporary internet file) - CodeS SourceS - Guide
- Afficher Temporary Internet Files à partir de la base de registre ✓ - Forum - Visual Basic 6
- Temporary Internet Files ✓ - Forum - Visual Basic 6
4 réponses
Meilleure réponse
- Messages postés
- 4307
- Date d'inscription
- samedi 16 octobre 2004
- Dernière intervention
- 2 janvier 2019
Temporary Internet Files n'est pas un repertoire ... c'est pour cela que ça marche pas.
<hr size="2" width="100%" />
<hr size="2" width="100%" />
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
87 internautes nous ont dit merci ce mois-ci
- Messages postés
- 4229
- Date d'inscription
- vendredi 23 juillet 2004
- Dernière intervention
- 3 août 2018
Salut,
F0xi serais tu fatigué
parce que ça fonctionne et même très bien
et le plus drôle dans l'histoire c'est que j'ai fait le teste avec ton code ^^
http://www.delphifr.com/codes/TFILEOP-TEXTFILEOP-COMPOSANT-VISUEL-COPIER-DEPLACER-EFFACER-FICHIERS_41219.aspx
tu dépose sur une fiche :
1 TOpenDialog
1 TButton
et tu complète comme ceci:
Uses ExtFileOp;
Procedure TForm1.Button1Click(Sender: TObject);
Begin
If OpenDialog1.Execute Then
With TFileOp.Create(Self) Do
Try
Files.Assign(OpenDialog1.Files);
Destination :=
'F:\Test'; // ici ton répertoire de destination
FileOperation : = fcCopy;
Title := 'Copie des fichiers';
Execute;
Finally
Free;
End ;
End;
en cliquant sur "Temporary Internet Files" la copie commence de suite
@+
Cirec
<hr siz ="" />
F0xi serais tu fatigué
parce que ça fonctionne et même très bien
et le plus drôle dans l'histoire c'est que j'ai fait le teste avec ton code ^^
http://www.delphifr.com/codes/TFILEOP-TEXTFILEOP-COMPOSANT-VISUEL-COPIER-DEPLACER-EFFACER-FICHIERS_41219.aspx
tu dépose sur une fiche :
1 TOpenDialog
1 TButton
et tu complète comme ceci:
Uses ExtFileOp;
Procedure TForm1.Button1Click(Sender: TObject);
Begin
If OpenDialog1.Execute Then
With TFileOp.Create(Self) Do
Try
Files.Assign(OpenDialog1.Files);
Destination :=
'F:\Test'; // ici ton répertoire de destination
FileOperation : = fcCopy;
Title := 'Copie des fichiers';
Execute;
Finally
Free;
End ;
End;
en cliquant sur "Temporary Internet Files" la copie commence de suite
@+
Cirec
<hr siz ="" />
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
87 internautes nous ont dit merci ce mois-ci
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.