11
Potrzebuję prostego przykładowego kodu dla Serwera Http Indy 10 Kiedy żądanie (wpis) po prostu wyświetla go Czy jest tam próbka Indy 9? DziękiPróbka serwera Indy 10 Http
A
Odpowiedz
6
Modele Indy 9 samples są nadal dostępne w witrynie IndyProject i zawierają projekt demonstracyjny HTTPServer. The Indy 10 Demo Playground również.
W poleceniach IdHTTPServer polecenia Get i Post są zasadniczo traktowane tak samo i obsługiwane w zdarzeniu CommandGet.
14
- rozpocząć nowe formy VCL wystawać
- upuść komponent TidHTTPServer na Formularzu
Kliknij dwukrotnie formularz, aby utworzyć onCreate() zdarzeń i uaktywnić serwer
IdHTTPServer1. Active: = True;
Powrót na formularzu, wybierz komponent serwera HTTP i utworzyć OnCommandGet zdarzenie
W tym OnCommandGet imprezy (co nazywa się w wątku dziecko ilekroć wystąpi GET/POST), obsłużyć żądania, przez wypełnianie odpowiedź ..
AResponseInfo.ContentText := '<html><head><title>My First Response</title></head>' +
'<body>Command: ' + ARequestInfo.Command +
'<br />Host: ' + ARequestInfo.Host +
'<br />URI: ' + ARequestInfo.URI +
'<br />UserAgent: ' + ARequestInfo.UserAgent +
'</body></html>';
zależności od wersji Delphi, może mieć także dodać IDC KONTEKST do swojej Używa klauzula
Uruchom aplikację demonstracyjną, a następnie uruchom przeglądarkę do http://localhost i powinieneś dostać odpowiedź. (Jeśli nie masz jeszcze czegoś słuchającego na porcie 80, w którym to przypadku aplikacja demo wygeneruje wyjątek)
co to jest? Indy 10 lub Indy 9? –
Można to sprawdzić na źródłach ExtPascal – TheHorse