Hallo,
bei
Indy 10 gibt es unter Bubbles\Boxtests\ eine HTTPServer.pas. In der ist eine
Delphi-Quellcode:
procedure THTTPServer.HTTPServerCommandGet(AContext:TIdContext;
RequestInfo: TIdHTTPRequestInfo; ResponseInfo: TIdHTTPResponseInfo);
und dort wir die Anmeldung per
Delphi-Quellcode:
if FUseAuthenticaiton
and
((RequestInfo.AuthUsername <> '
Indy')
or (RequestInfo.AuthPassword <> '
rocks'))
then
begin
AuthFailed;
exit;
end;
abgefragt. Hilft Dir das weiter?