Discussion :

[nou366]

Bonjour,

est ce quelqu'un saurait me dire comment il faut faire pour que ma procedure fasse l'enregistrement d'un fichier et le renomme juste après . Je crois savoir qu'il faut utiliser un timer, mais j'y arrive pas

voilà mon code

form2.QuickRep1.Print;// j'utilise pdfCreator ou il enregistre le fichier automatiquement avec le nom commande
timer1.Enabled:=false ;
timer1.Interval:=100000;
RenameFile('C:\commande.pdf','C:\facture.pdf');

Quand je compile, il crée 'Commande' mais ne le renomme pas
merci à tous

[rbh]

Salut
pour ce que tu veux faire, je vois 2 solutions :
sans timer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
form2.QuickRep1.Print;// j'utilise pdfCreator ou il enregistre le fichier  automatiquement avec le nom commande
Sleep(100000);
RenameFile('C:\commande.pdf','C:\facture.pdf');

la commande sleep "pause" l'exécution de ton programme.

Avec timer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
form2.QuickRep1.Print;// j'utilise pdfCreator ou il enregistre le fichier  automatiquement avec le nom commande
timer1.Interval:=100000;
timer1.Enabled:=True;
...
procedure Timer1Timer(Sender: TObject);
begin
RenameFile('C:\commande.pdf','C:\facture.pdf');
Timer1.enabled := False;
end;

Le composant timer a un évènement OnTimer qui se déclenche à l'intervalle spécifié à partir du moment ou le timer est "Enabled := True;"
Attention, comme je l'ai mis dans mon exemple, pense à arrêter ton timer.

[nou366]

merci ca marche super bien