Discussion :

[Arnard]

Bonjour,

je viens de récupérer un code source en delphi, langage que je ne connais aps du tout

Une ligne m'intrigue dans le code :

Code :

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

clsock[nc] := tclientsocket.create(exejbus);

Je suis intéressé de savoir ce que représente exejbus pour déterminer les paramètres transmis à la fonction create, afin de déterminer le paramétrage de la socket, mais je ne parviens pas à le faire. Je trouve dans le code de nombreuses références à exejbus, mais aucun typage, comme si c'était une variable globale implicite ? (j'ai tenté un find exejbus := dans le répertoire de fichier source sans succès...).

De plus, le net produit peu d'infos sur la fonction create, à part indiquer un paramètre 'nil', que peut-on fournir comme paramètre exactement à cette fonction ?

Cordialement.

[ShaiLeTroll]

exejbus est forcément un TComponent, il est passé comme Owner au TClientSocket
La libération de exejbus provoquera la libération du TClientSocket

exejbus est probablement une TForm, utilise une recherche dans "tous les fichiers du répertoire" au lieu "dans le projet", possible que le fichier ne soit pas explicitement inclu dans le projet mais juste dans un chemin de recherche suffisant pour une inclusion implicite
cherche plutôt "exejbus:" ou "exejbus :" sans le égal, faut-il encore qu'il soit déclaré tout seul !

Le TClientSocket est un TComponent, il hérite de son Constructeur

Le paramètrage d'un TClientSocket ne se fait pas via le constructeur qui est plutôt bien documenté contrairement à ce que tu évoques mais cela nécessite évidemment des connaissances Delphi et VCL pour comprendre, et tu vas donc devoir passer par : Guide Pascal et Delphi

Pour comprendre le Create, il faut prendre en compte toutes les redéfinitions entre TComponent et TClientSocket

Ensuite, tu pourras étudier ce code Transfert de fichiers avec TServerSocket/TClientSocket.
Ou Exemple de communication socket pour la réalisation d'un petit chat

Phidels contient ces exemples :
Site de Michel- Utilisation des composants CLIENTSOCKET et SERVERSOCKET ... le Client
Site de Michel- Utilisation des composants CLIENTSOCKET et SERVERSOCKET ... le Serveur

Dans ton code je pense que tu trouveras

Code :

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

1
2
clsock[nc].Host := '...';
clsock[nc].Port := ...;

[Arnard]

en dessous du create, j'ai un

Code :

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

1
2
3
          clsock[nc].Address := ip_adresse;
          clsock[nc].Name := 'Tclientsocket'+ inttostr(nc+100);
          clsock[nc].Port :=  10000;

je recherche surtout si des éléments de configuration particuliers au socket, des éléments un peu plus "exotiques" qui ont/auraient pu être passés via le create.

Si je comprends bien,, on passe en paramètre le owner, ce la n'a donc rien à voir avec un tableau de paramètres propres, juste d'un référencement ?

je vais effectuer les recherches que tu suggères, mais je tiens déjà à te remercier pour la qualité de ta réponse

[Paul TOTH]

en dessous du create, j'ai un

Code :

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

1
2
3
          clsock[nc].Address := ip_adresse;
          clsock[nc].Name := 'Tclientsocket'+ inttostr(nc+100);
          clsock[nc].Port :=  10000;

je recherche surtout si des éléments de configuration particuliers au socket, des éléments un peu plus "exotiques" qui ont/auraient pu être passés via le create.

Si je comprends bien,, on passe en paramètre le owner, ce la n'a donc rien à voir avec un tableau de paramètres propres, juste d'un référencement ?

je vais effectuer les recherches que tu suggères, mais je tiens déjà à te remercier pour la qualité de ta réponse

le Owner est intimement lié au design visuel des applications.
Quand on place un composant sur une fiche, le Owner est la fiche.

là le composant est créé à la main, le Owner est déterminé selon les besoins. Il peut même êter "nil" si on gère soit même la durée de vie du composant.

en tout état de cause cela n'a aucun rapport avec la configuration du socket.

[Arnard]

Ok, donc il n'y a rien de plus à ce niveau.

Merci pour vos retours !