TFileOp est la classe de base de TExtFileOp.
TFileOp permet une manipulation facile des fichiers/repertoires, basé sur la fonction SHFileOperation de l'unité ShellApi.
Copier, Deplacer, Effacer et Renomer les fichiers ou des repertoires et leurs sous-repertoires ne serat plus un probleme et
vous perdrez moins de temps a developper ce genre de routines.
Vous pouvez installer ExtFileOp via l'installation de composant de delphi pour voir apparaitre la classe TExtFileOp dans la palette
Extend Delphi.
ou l'utiliser en standalone dans vos projets en invalidant la directive de compilation {$DEFINE RegTExtFileOp}.
vous avez egalement accés a 4 fonctions rapide qui se chargeront de créer et liberer un composant TFileOp,
ces fonctions sont :
FastFileOp, FastCopy, FastMove et FastDelete.
vous devez preciser quelques parametres a ces fonctions tel que la fiche principale, la liste des fichiers (TStrings), le repertoire de destination,
les options ...
l'utilisation du composant TFileOp / TExtFileOp est simple, deposez le composant (TExtFileOp) sur votre fiche principale ou créer le dynamiquement (TFileOp) definissez les parametres, la listes des fichiers ect et appelez tout simplement la fonction "Execute" du composant.
Des evenements sont egalement present pour suivre chaque etapes de la fonction "execute".
Source / Exemple :
{exemple d'utilisation en dynamique }
procedure TForm1.Button1Click(Sender : TObject);
begin
with TFileOp.Create(Self) do
try
Files.Assign(OpenDialog1.Files);
Destination := Edit1.Text;
FileOperation := fcCopy;
Title := 'Copie des fichiers';
Execute;
finally
Free;
end;
end;
{ ou avec les fonctions Fast*** }
procedure TForm1.Button1Click(Sender : TObject);
begin
FastCopy(Self, OpenDialog1.Files, Edit1.Text);
end;
Conclusion :
version final release 1, commentée.
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.