exe vers service

Salut,
J'ai développé une appli pour laquelle j'ai utilisé quelques composants visuels pour le déboguage.
Maintenant j'ai supprimé tout ces composants et la form est complètement vide.
Est-il possible de démarrer cette application en temps que service sans limitations? La form doit-elle être supprimée? Faut-il repartir à l'étape de création d'un service et y importer mon code?
Détail, je suis en Delphi XE2.
Merci pour vos conseils!!!:ccool:
PhilLu

Question annexe:
quand je lance l'exe, il réalise certaines tâches puis ne fais plus rien quand elles sont achevées (normal)
Dans le cas du service, comment le redémarrer pour répéter les tâches à effectuer?
(Dans l'exe, j'avais un bouton start ;-)

ça ne serait pas plutôt une tâche planifiée ?

De fait, j'utilise plusieurs applications l'une à la suite de l'autre.
Dès que la première a terminé, elle devrait lancer la suivante et ainsi de suite pour les suivantes. (Et elle même se mettre en pause si service et si nécessaire?)
La dernière application fait une pause de (par exemple) 5 minutes puis relance la première et ainsi de suite...
Merci pour tes idées!!!:ccool:
PhilLu

Yep !

Citation:

---

Envoyé par PhilLU

De fait, j'utilise plusieurs applications l'une à la suite de l'autre.
Dès que la première a terminé, elle devrait lancer la suivante et ainsi de suite pour les suivantes. (Et elle même se mettre en pause si service et si nécessaire?)
La dernière application fait une pause de (par exemple) 5 minutes puis relance la première et ainsi de suite...
Merci pour tes idées!!!:ccool:
PhilLu

---

j'utilise plusieurs applications l'une à la suite de l'autre.

Et ça ne serait pas plus simple de faire une application principale style scheduler (ordonnanceur, en bon français) qui se chargerait de lancer les applis l'une à la suite de l'autre, qui pourrait insérer des délais, les relancer si nécessaire, etc. ?

Perso c'est comme ça que je ferais dans un tel cas.

Oui, peut-être. Comme chaque tâche dure un temps imprévisible, il faut détecter la fin de la,tâche pour démarrer la suivante...
...donc dialoguer entre exe!

Pas utile de dialoguer entre les exe.
Tu utilises un CreateProcess et tu as la possibilité d'attendre que l'application s'arrete et tu passes à la suivante (Voir dans la :faq: pour le createprocess)

Ben oui, via un shellexecute, mais comment savoir quand l'exe a fini?
Il faut faire un application.terminate dans l'application même puis quoi dans le scheduller?
8O

Je n'ai pas parlé de ShellExecute mais de CreateProcess

en cherchant dans la :faq:

http://delphi.developpez.com/faq/?pa...oleapplication

C'est possible aussi avec ShellExecuteEx en spécifiant le masque SEE_MASK_NOCLOSEPROCESS ;)

Bon, de retour de vacances, je m'y suis mis!
Bien sûr pas ok dès le premier essai! :(
J'ai été obligé (pour Delphi XE2) de changer CreateProcess en CreateProcessA:

Code:

---

1 2 3

StartInfo : TStartupInfoa; // et plus TStartupInfo If CreateProcessa(Nil, processus, Nil, Nil, False,0, Nil, Nil, StartInfo,ProcessInfo) Then ...

---

Puis pour ne pas afficher la fenêtre noire durant le processus, j'avais essayé:

Code:

---

1 2	try ShowWindow(GetConsoleWindow, SW_MINIMIZE);{ou HIDE}

---

mais un flash disgracieux apparaissant malgré tout :calim2:, j'ai supprimé la ligne:

Code:

---

{$APPTYPE CONSOLE}

---

Là, ça marche!!! :D

Maintenant, j'ai des applications qui doivent encore être transformées en application console. Elles contiennent une form mais aucun composant visuels.
Toutefois sont déposé sur la form TSQLQuery et TSQLConnection.
Comment supprimer la form et garder les composants??? 8O
Merci pour vos conseils!!! :ccool:
Et très bon week-end !!!!!!! :yaisse1:

Et quel rapport entre un service et une application console :koi:

Ben, comme l'a suggéré Jipété:

Citation:

---

Et ça ne serait pas plus simple de faire une application principale style scheduler (ordonnanceur, en bon français) qui se chargerait de lancer les applis l'une à la suite de l'autre, qui pourrait insérer des délais, les relancer si nécessaire, etc. ?

---

J'ai donc abandonné l'idée de transformer mes codes en services mais plutôt en apps console(pas d'interfaces graphiques; les seules ont servi au déboggage, maintenant virées) J'ai aussi viré le

Code:

---

{$APPTYPE CONSOLE}

---

pour éviter l'ouverture de la fenêtre noire...
L'ordonnanceur fonctionne parfaitement avec plusieurs apps mais:

Citation:

---

Maintenant, j'ai des applications qui doivent encore être transformées en application console. Elles contiennent une form mais aucun composant visuels.
Toutefois sont déposé sur la form TSQLQuery et TSQLConnection.
Comment supprimer la form et garder les composants???

---

J'espère que c'est plus clair!?! :roll:
Merci pour vos réponses!!! :ccool:

Citation:

---

Envoyé par PhilLU

(...) Toutefois sont déposé sur la form TSQLQuery et TSQLConnection.
Comment supprimer la form et garder les composants??? 8O

---

Ben, en créant dynamiquement au lancement de l'appli les composants qui t'intéressent. Doit y avoir des milliers (millions ?) de tutos pour ça.

ok, merci Jipété!
Est-il possible de récupérer le code des propriétés d'un objet créé via interface graphique? (pour l'utiliser dans mon code de création dynamique)

Bon dimanche!!!:java:

Tu cherches beaucoup trop loin ;)
Garde simplement ton application originale (GUI) et ajoute dans la source du projet:

Code:

---

Application.ShowMainForm := FALSE;

---

Merci 1000x Andnotor!!!!!!!
Comme quoi ma question n'état pas trop stupide!:pastaper:
Pourquoi faire compliqué quand on peut faire simple!
Avec celle là, tu bats les records :ccool:

(Donc au lieu de faire des apps console qui m'affiche un écran noir (ou quand j'ajoute un 'Hide', un flash) c'est aussi la voie royale pour éviter ça!)
Je ne comprend pas d'ailleurs pourquoi le code:

Code:

---

1 2 3

procedure TForm1.FormCreate(Sender: TObject); begin Application.ShowMainForm := FALSE;

---

ne me renvoie pas un flash à l'écran comme le flash observé avec une apps console!?!
Développer avec options visuelles de debuggage est très confortable, puis quand ok, désactiver ShowMainForm prend 1 seconde max.:yaisse:
Et si ensuite il faut apporter des modif au code, il suffit de la réactiver!!!

:plusser::plusser::plusser:

:resolu:

Très bonne fin de week-end!!!
:chin:

Citation:

---

Envoyé par PhilLU

Je ne comprend pas d'ailleurs pourquoi le code:

Code:

---

1 2 3

procedure TForm1.FormCreate(Sender: TObject); begin Application.ShowMainForm := FALSE;

---

ne me renvoie pas un flash à l'écran comme le flash observé avec une apps console!?!

---

Parce que la propriété Visible d'une fiche est FALSE par défaut. C'est dans Application.Run que la fiche principale est éventuellement affichée.
ps: j'aurais plutôt mis ShowMainForm dans la source du projet puisqu'il doit obligatoirement être fixé avant Run (Regrouper l'initialisation de TApplication).

Citation:

---

Envoyé par PhilLU

Développer avec options visuelles de debuggage est très confortable, puis quand ok, désactiver ShowMainForm prend 1 seconde max.:yaisse:
Et si ensuite il faut apporter des modif au code, il suffit de la réactiver!!!

---

Ajoute la gestion d'un paramètre pour conditionner l'affichage : MonApp.exe /Show

Code:

---

Application.ShowMainForm := FindCmdLineSwitch('Show');

---

Tu peux ainsi toujours avoir le visuel en debug sous Delphi en l'ajoutant dans les paramètres d'exécution (Menu Exécuter/Paramètres...) et créer des liens sur le bureau avec ou sans affichage.

Merci pour ces détails riches en enseignements!!!
C'est plus clair pour moi maintenant!
L'idée du paramètre d'exécution est géniale:ccool:

Merci encore Andnotor:yaisse: