begin process at 2012 02 11 08:30:23
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Delphi

 > 

Divers

 > 

Aide et documentation

 > 

Redemmarer mon application automatiquement


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Redemmarer mon application automatiquement

vendredi 11 avril 2008 à 14:22:23 | Redemmarer mon application automatiquement

BernieNoel68

Bonjour a tous,

Je suis a la recherche d'une solution permettant à mon application de s'arreter et de se relancer automatiquement.
En gros j'ai une application qui dois tourner en permanance, mais je souhaiterais qu'elle s'arrete et se relance toute les 24H.

Pour l'arreter au moment voulu c'est pas un soucis. Par contre pour redemarrer je ne vois pas coment faire. Toutes les solutions que j'ai envisager sont pas très propres et ressemble plus a de la "magouille" qu'autre chose.

Je pensais à la fermeture de mon appli lancer un fichier bat qui la relance, mais comment faire pour que le fichier bat attende que l'appli soit fermée avant de la relancer? (mon appli n'autorise qu'une seule instance a la fois).

Avez vous déja été confronté à ce problème, et avez vous une solution?

Si jamais je ne suis pas très clair dans mes explications, je peux essayé d'approfondir.

Merci d'avance.

vendredi 11 avril 2008 à 14:54:00 | Re : Redemmarer mon application automatiquement

f0xi

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !

Application.exe
-> global / implementation :
  uses ShellApi;
  var
    TimeH : integer = 96; {(24h * 60min)/15 = 96 quart d'heure / jours }
    AppPath : string;
  

-> MainForm.Create() :
  AppPath := IncludeThrailingBackslash(ExtractFilePath(ParamStr(0)));

-> timer (900000) {15 minutes):
  TimeH = TimeH - 1;
  if TimeH = 0 then
  begin
    ShellExecute(0, PChar(AppPath+'ReLaunch.exe'),
                    PChar(AppPath+' Application.exe'),
                    PChar(AppPath),
                    SW_SHOW);
    Close;
  end; 

Relaunch.exe (appli console) parametres : Relaunch.exe path programname
  uses ..., ShellApi;
  var
    i : integer;
    t : integer = 10;
  begin
    if ParamCount <> 2 then
    begin
      Writeln('Erreur de parametres...');
      ReadLn;
      Halt(0);
    end;

    Writeln('Redémarrage dans :');
    while t > 0 do
    begin
      Writeln(IntToStr(T)+' secondes');
      t := t - 1;
      Sleep(1000);
    end;
    Writeln('Redémarrage...');
    ShellExecute(0, PChar(ParamStr(1)+ParamStr(2)),
                    {parametres ou nil} nil,
                    PChar(ParamStr(1)),
                    SW_SHOW);
  end;
 





vendredi 11 avril 2008 à 15:55:10 | Re : Redemmarer mon application automatiquement

BernieNoel68

Merci de ta reponse...




Cette discussion est classée dans : solution, appli, application, automatiquement, redemmarer


Répondre à ce message

Sujets en rapport avec ce message

application figée quand boucle [ par crogger ] Salut, g lu qu'il suffisait de mettre Aplication.ProcessMessages;dans une boucle pour ne pas figer l appli, mais je n'arrive quand meme pas a la ferm application en attente invisible perturbe windows. [ par crogger ] Salut, j'ai mon appli qui se lance au demarage de windows qui permet de detecter la presence de connexion internet avec une boucle WHILEex:while monip message : " l'application ne répond pas " sous XP [ par phoenyx ] Salut à tous !dans une appli, je fais une recherche dans une base de données qui affiche les résultats au fur et à mesure qu'ils sont trouvés (utilisa Plusieurs instances d'un même service ? [ par chezrv ] Pourrait-on m'indiquer la solution pour installer plusieurs instances d'un même service sur windows NT (4 ou 2k) sans avoir à modifier et recompiler l associer puis jouer un AVI automatiquement par son appli?? [ par Elran ] Bijour,ben voilà, je cherche à faire en sorte qu'en double cliquant sur un AVI (depuis l'explorateur), que :1, mon appli se lance automatiquement(pas création de mon application [ par herve_wolf ] salut je viens de faire une application de carnet d'adresses pour débuter avec délphi 7 et de ce coté la pas trop de pb.mon pb et de faire fonctionner Pb fermeture d'une appli ouverte à partir d'une autre [ par Sandrine ] Bonjour,J'ai une application qui possède un bouton permettant d'ouvrir une deuxième application (qui ne possède qu'une fenêtre affichant du texte cont Comment restaurer une application du tray ? [ par thonyboy ] Bonjour,J'ai une appli externe qui se met dans la barre de tache (à coté de l'heure) je crois que l'on appelle cela le tray....J'aimerais grace a une bonsoir g un p'tit prob avec mon application... [ par Slander ] Voualà alors j'aimerai, dans mon appli, faire:-ouvrir un exécutable par le biais d'un dialogue... (ca c bon lol !)-l'exécuter...-lui envoyer des messa Fiches au demarrage d'une appli MDI [ par Reynaldd ] Bonjour a tous, Voila, c'est la premiere fois que j'essaie de créer une appli MDI, et au demarrage, l'application crée automatiquement un exemplaire d


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,669 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales