Webservice Kommunikation loggen

[nahpets]

In meinem Webserver mit der Komponente TIdHTTPServer nutze ich die Ereignisse OnCommandGet und OnCommandOther u. a. zum Loggen der Anfragen an den Server.

Ausgehend von den Quelltexten müsste TidHTTPWebBrokerBridge ein Nachfahre von TIdCustomHTTPServer sein. Und die beiden Ereignisse sind dort vorhanden und auch published, müssten von daher eigentlich nutzbar sein.

[mjustin]

Zitat von nahpets:

In meinem Webserver mit der Komponente TIdHTTPServer nutze ich die Ereignisse OnCommandGet und OnCommandOther u. a. zum Loggen der Anfragen an den Server.

Ausgehend von den Quelltexten müsste TidHTTPWebBrokerBridge ein Nachfahre von TIdCustomHTTPServer sein. Und die beiden Ereignisse sind dort vorhanden und auch published, müssten von daher eigentlich nutzbar sein.

TidHTTPWebBrokerBridge nutzt diese Ereignisse sehr wahrscheinlich bereits, weist ihnen eigene Handler zu. Damit wären sie nicht mehr für eigenes Logging nutzbar.

[nahpets]

Man müsste halt prüfen, ob dem OnCommandGet von TidHTTPWebBrokerBridge schon was zugewiesen ist.

Könnte sowas nicht eventuell funktionieren?

Delphi-Quellcode:

...
 FSaveOnCommandGet: TIdHTTPCommandEvent;
...

// an geeigneter Stelle vor dem Aktivieren ...
 FSaveOnCommandGet := MyWebBrokerBridge.OnCommandGet;

procedure TMyWebBrokerBridge.CommandGet(AContext: TIdContext;
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
begin
  // und hier dann loggen?
  if Assigned(FSaveOnCommandGet) then begin
    FSaveOnCommandGet(AContext, ARequestInfo, AResponseInfo);
  end;
  // oder hier dann loggen?
end;