Copier fichier de "Temporary Internet Files" [Résolu]
cs_d4M13N
27
Messages postés
dimanche 19 août 2007Date d'inscription
13 juillet 2009
Dernière intervention
-
24 juin 2008 à 19:36 - Dernière réponse :
cs_d4M13N
27
Messages postés
dimanche 19 août 2007Date d'inscription
13 juillet 2009
Dernière intervention
- 25 juin 2008 à 16:46
- Copier fichier de "Temporary Internet Files"
- Impossible de copier le dossier "Temporary Internet Files" dans un autre réperto [Résolu] (Résolu) » Forum - VB.NET
- Supprimer un fichier dans Temporary Internet Files [Résolu] (Résolu) » Forum - Visual Basic 6
- Afficher Temporary Internet Files à partir de la base de registre [Résolu] (Résolu) » Forum - Visual Basic 6
- Temporary Internet Files [Résolu] (Résolu) » Forum - Visual Basic 6
- Temporary internet files » Forum - Delphi / Pascal
4 réponses
Meilleure réponse
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%" />
Avec quelques mots c'est encore mieux Ajouter un commentaire
a aidé 97 internautes ce mois-ci
Meilleure réponse
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 ="" />
Avec quelques mots c'est encore mieux Ajouter un commentaire
a aidé 97 internautes 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.