Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi kleiner Apache Server programmieren (https://www.delphipraxis.net/51880-kleiner-apache-server-programmieren.html)

bixi400 21. Aug 2005 11:12


kleiner Apache Server programmieren
 
Hi,
ich habe vor so was ähnliches wie ein Apache Server zu programmieren.
Nun habe ich folgendes Problem:
Ich empfange die anfrage auf dem Port 80.
Aber auf welchem Port schicke ich die Antwort zurück?

SirThornberry 21. Aug 2005 11:15

Re: kleiner Apache Server programmieren
 
welche Komponenten verwendest du? Desweiteren kannst du keinen eigenen Apache programmieren sondern nur einen eigenen Webserver (Apache ist der Name eines sehr bekannten und diesen Namen darfst du nicht für deinen eigenen Verwenden).

bixi400 21. Aug 2005 11:16

Re: kleiner Apache Server programmieren
 
Ich verwende TClientSocket und TServerSocket

SirThornberry 21. Aug 2005 11:20

Re: kleiner Apache Server programmieren
 
wenn du mit client uns serversocket arbeitest antwortest du genau auf dem port auf dem auch die anfrage reinkommt. Du musst also über die Servercomponente der entsprechenden Connection antworten.

(Es macht irgendwie den Anschein das du dich damit noch nicht so auskennst, denn ein Server antwortet in aller Regel auf der Verbindung die der Client zu ihm aufgebaut hat, daher würde ich dir eher die Indy-Komponenten und darin TIdHTTpServer empfehlen)

bixi400 21. Aug 2005 11:23

Re: kleiner Apache Server programmieren
 
Ich kenne micht noch nicht so gut aus, aber ich wollte es einfach mal versuchen.
Danke für die Antworten!

SirThornberry 21. Aug 2005 11:35

Re: kleiner Apache Server programmieren
 
Wie gesagt, für den Anfang würde ich TIdHTTPServer empfehlen. Dort gibt es dann auch eine Methode OnCommandGet wo du einfach nur noch die anzuzeigende Seite/Bilder zurück liefern musst

flossinger 22. Aug 2005 17:21

Re: kleiner Apache Server programmieren
 
Hi bixi,

einen kleinen http - server kann man durchaus mit tserversocket basteln. Der wird halt ein bisschen kleiner als der grosse Indianer. Intressant ist das immer.

Du hast ohnehin nur eine Port - Eigenschaft, die wird für hin und zurück verwendet.
In der onread Routine wertest du die Funktion Socket.ReceiveText aus und
übergibst die Antwort an die Funktion Socket.SendText('hier die Antwort').


viel Spass,
flossinger


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:38 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz