cs_dk
Messages postés20Date d'inscriptionmardi 16 décembre 2003StatutMembreDernière intervention19 mai 2006
-
26 janv. 2004 à 20:57
Filipe35
Messages postés470Date d'inscriptionvendredi 14 novembre 2003StatutMembreDernière intervention23 octobre 2007
-
5 août 2005 à 13:43
voila ben je sais que la question a deja ete posée sur le forum et que la reponse indiquait l'aide de delphi comme un bon debut mais voila g la version anglaise et je capte po des massedonc je me permet de vous demander de me remettre sur la bonne voie...
je desire simple faire ub ptit prog qui va juste ouvrir un socket sur l'ip et le port que je lui preciserait...
j'ai donc:
mais apres j'aimerais voir ce ke le serveur va repondre dans un memo mais je vois po trop comment recuperer ce ke le serveur envoie et puis aussi si vous pouviez me mettre sur la piste quant a comment envoyer des commandes et recevoir le resultat....
tout ca dans le but p-e un jour (dans tres longtemps a mon avis lol)de faire un client msn comme a tenter de le faire psyjc avec son premier projet que g dl mais qui malheureusement ne fonctionne po et evidement il est clair que g po encore les capacite de le modifier pour kil fonctionne...
cs_dk
Messages postés20Date d'inscriptionmardi 16 décembre 2003StatutMembreDernière intervention19 mai 2006 26 janv. 2004 à 22:06
g essayer comme ceci, le programme ne plante po c deja dca mais ca ne marche po rien ne se passe, g essayer ca avec l'ip de google.fr sur le port 80
//bouton connect
procedure TForm1.Button1Click(Sender: TObject);
var port : integer;
var recv : string;
begin
TcpClient1.RemoteHost:=edit1.Text;
TcpClient1.RemotePort:=edit2.Text;
TcpClient1.Open;
while TcpClient1.WaitForData(1000) do
begin
TcpClient1.ReceiveBuf(recv, sizeof(recv));
showmessage(recv);
end;
end;