Discussion :

[Estats]

Bonjour,
j'ai un programme qui se compose de 2 unités
- main.pas avec un TForm
- metier.pas

main ne sert qu'à lancer le programme, il n'y a aucun code

metier contient des routines de communications
- creation de sockets serveurs
- attente de connexions
- traitement et réponse

Je voudrais me débarasser de main et de sa TForm, mais je ne veux pas créer de service (ca devra aussi tourner sous Kylix), et arriver avec une bete application console.

Comment organiser mon prog?
J'ai pensé à une boucle while true begin end dans le programme principal, mais je pense que ca va consommer beaucoup de ressources pour simplement attendre.

Des idées, des conseils ??
En vous remerciant
PHC

[qi130]

Peut-être que si tu postais sur le forum Kylix ......

[Jer']

Tu fait : Fichier -> Nouveau -> Autres -> Application console

Tu obtient un truc de ce style :

Code :

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

1
2
3
4
5
6
7
8
9
10
program Project1;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
 
begin
  { TODO -oUser -cConsole Main : Insert code here }
end.

Tu ajoute ton unité Metier.pas au projet, et entre le begin et le end. du dpr, tu ajoute le point d'entrée de ton programme qui, je suppose, se trouve dans Metier.pas.

Et voila !

[Clorish]

1- Supprime ta fiche (Icone "-" dans la toolbar)
2- Projet/Options : Defini l'application comme application console ou rajoute la directive de compilation {$APPTYPE CONSOLE}

3- Pour etre compatible Kylix, utilise un maximul les librairies CLX mais j'ai peur qu'au niveau des services et gestion des sockets ca soit un peu plus complexe ....

Ligne de conduite a suivre : Eviter un maximum d'appels direct aux API Windows, et verifier la compatibilite des API et composants sous Kylix (le mieux etant d'avoir une version de Kylix installé chez soit).
Et bien sur, encadrer d'une directive de compilation conditionnelle {$IDEF Kylix} ... {$ENDIF} et {$IFDEF Delphi} ... {$ENDIF} les instructions specifiques.

[Reisubar]

Dans le cas des sockets Indy, qui tournent sous Kylix sans problème, tu peux résumer main.pas à 2 lignes :

Code :

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

1
2
3
 
UniteMetier.CréerEtInitialiserSockets();
ReadLn();

Je suppose que dans CréerEtInitialiserSockets tu fais tout ce qu'il faut pour créer les sockets, les configurer, etc. Ceux-ci s'éxécutant dans des threads séparés, tant que l'utilisateur ne pressera pas une touche (i.e. le programme sera bloqué à ReadLn), ton soft récupérera les connexions et pourra y répondre.

[Estats]

Merci Reisubar,
c'est exactement ce que je cherchais.

Cordialement