Comment utiliser les sockets réseau en Pascal? Sockets en Pascal
Répondre
Voici un exemple tiré de http://www.bastisoft.de/programmierung/pascal/pasinet.html
program daytime;
{ Simple client program }
uses
sockets, inetaux, myerror;
const
RemotePort : Word = 13;
var
Sock : LongInt;
sAddr : TInetSockAddr;
sin, sout : Text;
Line : String;
begin
if ParamCount = 0 then GenError('Supply IP address as parameter.');
with sAddr do
begin
Family := af_inet;
Port := htons(RemotePort);
Addr := StrToAddr(ParamStr(1));
if Addr = 0 then GenError('Not a valid IP address.');
end;
Sock := Socket(af_inet, sock_stream, 0);
if Sock = -1 then SockError('Socket: ');
if not Connect(Sock, sAddr, sizeof(sAddr)) then SockError('Connect: ');
Sock2Text(Sock, sin, sout);
Reset(sin);
Rewrite(sout);
while not eof(sin) do
begin
Readln(sin, Line);
Writeln(Line);
end;
Close(sin);
Close(sout);
Shutdown(Sock, 2);
end.
Si vous utilisez Delphi, je recommande fortement Indy prises, un ensemble de classes pour une manipulation aisée des prises de courant et de nombreux autres protocoles Internet (HTTP, FTP, NTP , POP3, etc.)
Et puis spécialement la version -10.x. –
Vous ne pouvez pas utiliser OpenSSL avec la version Indy 10.5 qui shippes avec Delphi 2007. Vous devez télécharger la version de http://www.indyproject.org/ et 10,6 installer int o l'IDE. Notez que d'autres paquets peuvent utiliser Indy, comme RemObjects, et qu'ils doivent donc être recompilés aussi, ce qui peut être difficile en raison de références croisées.
Si vous utilisez FPC ou Lazarus (qui est essentiellement un EDI rad pour FPC et un clone de Delphi), vous pouvez utiliser la bibliothèque de socket Synapse. C'est incroyable.
- 1. Pascal - Re: Utilise
- 2. PHP Sockets ou Python, Perl, Bash Sockets?
- 3. pascal gratuit, tdbgrid, ligne actuelle
- 4. Comment utiliser des ensembles de chaînes en Pascal?
- 5. sockets sniffer
- 6. Comment créer des sockets en javascript
- 7. Problème avec les sockets en C#
- 8. Problème avec les sockets d'interrogation en python
- 9. Recherche d'une syntaxe Delphi complète (objet pascal)
- 10. Rejoindre 2 sockets?
- 11. C Sockets Commande Ping?
- 12. Sockets - envoyer et recevoir
- 13. PHP Networking Sockets
- 14. Firefox plugin - sockets
- 15. Sockets Java et tuning TCP
- 16. Sockets Adobe Air et SSL
- 17. HTTPS avec des sockets Linux?
- 18. Java Sockets: InputStream.read() vs BufferedReader.read()
- 19. Optimisation des sockets dans Symbian
- 20. Exclusion mutuelle et Sockets C
- 21. Programmation de sockets pour téléphones mobiles en Python
- 22. Bonne introduction à la programmation des sockets TCP en Java?
- 23. HTTP 1.1 Connexions persistantes utilisant des sockets en Java
- 24. C# Raw Sockets Port Forwarding
- 25. Sockets TCP avec Zend Framework
- 26. Théorème de Pascal pour les ensembles non-uniques?
- 27. Questions faciles pour l'enseignement de Pascal à un enfant
- 28. Fractionner une chaîne de cas Pascal en un ensemble logique de mots
- 29. Problèmes avec des pointeurs lors de la construction d'un compilateur Pascal en C
- 30. Convertit le setter Pascal en un nom de variable séparé par un trait de soulignement
Pourriez-vous corriger votre lien s'il vous plaît: http://www.bastisoft.de/programmierung/pascal/pasinet.html? –