Hallo,
ich komme jetzt endlich wieder zu weiteren Tests.
Ich habe in meinen DataSnap/Webbroker Code weitere Logmeldungen eingebaut und
mal beide Teile die einen Socket erzeugen können sollen getestet:
a) das Rest
API um welches es eigentlich geht. Es erzeugt auch auf meinem PC
den eingestellten Port nicht, auch nicht wenn man einstellt, dass der ohne HTTPS
erzeugt werden soll.
b) eine einfache Statuswebseite, in keinem Fall auf Port 80.
Der Port 80 aus b) wird in meinem Fall erzeugt, der Port aus a) nie, sagt jedenfalls
netstat -p
TCP auf einer Admin Konsole.
Nur komme ich auf Port 80 nicht mit dem Webbrowser drauf, egal ob ich HTTPS an oder aus habe.
Die Anwendung ist mit 10.3.3 erstellt und der Teil hatte schon mal funktioniert.
Als OpenSSL DLLs sind die libeay32.dll und ssleay32.dll im ANwendungsverzeichnis.
Beide in V1.0.2j. Ja, das sind nicht mehr die neuesten, sollten aber doch TLS 1.2 unterstützen.
Mir gehen gerade die Ideen aus.
Hier mal der zum Starten benutzte Code:
Delphi-Quellcode:
if FMyServiceEnabled and (not FRESTServer.Active) then
begin
FRESTServer.Bindings.Clear;
FRESTServer.DefaultPort := FMyServicePort;
FRESTServer.Active := True;
log.Send(LevelBlue, cCategory, 'REST Server gestartet. Port: ' + FMyServicePort.ToString);
end;
if FStatusWebsite and (not FWebServer.Active) then
begin
FWebServer.Bindings.Clear;
FWebServer.DefaultPort := FStatusPort;
FWebServer.Active := True;
log.Send(LevelBlue, cCategory, 'Web Server gestartet. Port: ' + FStatusPort.ToString);
end;
FRestServer und FWebServer sind jeweils: TIdHTTPWebBrokerBridge