[delphi] création de WSAstartup, socket, bind etc... help
création de WSAstartup, socket, bind etc... help [delphi] - Programmation
MarshPosté le 16-02-2002 à 16:59:49
Salut bonjour !
Voilà j'ai un cours de client-serveur où on fait joujou avec socket et tout ça... le problème c'est que moi et le C++ c'est pas le grand amour alors hop: Delphi que j'aime mais voilà la question : (code)
begin if (WSAStartup(WS_VERSION,wsimpl) <> 0) then begin desc_sock := socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP); box1.items.Add('SOCKET : ' + IntToStr(desc_sock)); end else box1.items.add('ERREUR DE CREATION DE SOCKET' end;
Dans mon cours, le WS_VERSION est déclaré nul part je pense que c'est donc une variable ou une structure de windows mais delphi gueule quand je le met... alors bon je l'ai déclaré. Mais ça marche pas, le socket n'est pas créé
qqn peut me renseigner ? ou qqn a t'il UN COURS EN FRANCAIS MIEUX QUE LA CROUTE QUE JE ME TAPPE ??? merci !
a+
Darx
[jfdsdjhfuetppo]--Message édité par darxmurf--[/jfdsdjhfuetppo]
Marsh Posté le 16-02-2002 à 16:59:49
Salut bonjour !
Voilà j'ai un cours de client-serveur où on fait joujou avec socket et tout ça... le problème c'est que moi et le C++ c'est pas le grand amour alors hop: Delphi que j'aime mais voilà la question : (code)
procedure TForm1.Button1Click(Sender: TObject);
var desc_sock : integer;
wsimpl : WSADATA;
WS_VERSION : word;
begin
if (WSAStartup(WS_VERSION,wsimpl) <> 0) then
begin
desc_sock := socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP);
box1.items.Add('SOCKET : ' + IntToStr(desc_sock));
end
else box1.items.add('ERREUR DE CREATION DE SOCKET'
end;
Dans mon cours, le WS_VERSION est déclaré nul part je pense que c'est donc une variable ou une structure de windows mais delphi gueule quand je le met... alors bon je l'ai déclaré. Mais ça marche pas, le socket n'est pas créé
qqn peut me renseigner ? ou qqn a t'il UN COURS EN FRANCAIS MIEUX QUE LA CROUTE QUE JE ME TAPPE ??? merci !
a+
Darx
[jfdsdjhfuetppo]--Message édité par darxmurf--[/jfdsdjhfuetppo]
---------------
Des trucs - flickr - Instagram