|
Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: IdHTTPServer ohne Form
1. Mär 2013, 11:38
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Server := TIdHTTPServer.Create();
server.DefaultPort := 80;
server.OnCommandGet := ServerCommandGet; // <<<
server.Active := true;
end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|