faire la sauvegarde et la restauration

salut, dans le menu de mon application il y'a le module sauvegarde et restauration voila le code en delphi5:

---

procedure TMain.Sauvegarde1Click(Sender: TObject);
var
  instruction,
  fichier : string;
  rep : string;
begin
try
  if Application.MessageBox(
          'Insérer une disquette dans le lecteur A:'+#13+#13+
          'et appuyer sur OK pour continuer',
          'Sauvegarde des données',
          MB_ICONINFORMATION + MB_OKCANCEL + MB_DEFBUTTON1) = IDOK then
  begin
    instruction := 'a a:save *.db';
    executefile('arj', instruction,'',1);
  end;
finally
end;

end;

procedure TMain.Restauration1Click(Sender: TObject);
var
instruction : string;
begin
if Application.MessageBox(
        'Attention, les données actuelles seront ecraser.'+#13+#13+
        'Appuyer sur OK pour continuer',
        'Restauration des données',
         MB_ICONINFORMATION + MB_OKCANCEL + MB_DEFBUTTON1) = IDOK then
 begin
   instruction := 'e a:save -jyo';
   executefile('arj', instruction,'', 1);
 end;

end;

---

et je voudrais avoir son équivalent si c'est possible en D7  en utilisant le winrar au lieu de ARJ  et merci d'avance.

C'est quoi cette procédure ExecuteFile() ??
Sinon, tu devrais regarder dans la documentation de WinRar, c'est surement précisé.

++

Si tu ne te plantes pas ......
tu ne pousseras jamais

Ou tu utilise une DLL de winrar ce que je te conseille, soit tu remplace ton ExecuteFile par un ShellExecute (mais perso c'est crade !)

Bon courage ++

regarde unrar.dll et rar.dll ... :-)

Salut Liza, Winrar n'est pas un bon choix (Bizarre que tu ne saches pas ca pour quelqu'un qui est en 5ième année d'ingénerie informatique ;) ) : tout le monde ne l'a pas. Tu devrais zipper ton programme. Tu peux utiliser les composants fournient avec Delphi ou Abbrevia. A+

Merci à vous tous je vais prendre vos conseils en considération @+

essaye l'execution silenscieuse d'un programme de compression.