ExtPascal嵌入式(内部)Web服务器

ExtPascal嵌入式(内部)Web服务器

原文出处如下：http://code.google.com/p/extpascal/wiki/WebServer_Embedded

       ExtPascal也支持嵌入的（或者内部）Web服务器模式。当ExtPascal应用程序编译成嵌入式Web服务器。您不需要安装或者配置Apache或者IIS这类网络服务器区运行这个应用程序。并且您也失去了使用Apache或者IIS提供模块的简单随意性

步骤

编译一个嵌入式Web Server的应用程序参照如下格式：

1.       第一步请先看下开始指南界面GettingStarted

中文版http://blog.csdn.net/penker_zhao/archive/2010/04/16/5491753.aspx

2.       如果有必要，请下载Indy 10 源码。

Indy project

Delphi source

FPC source

         请注意Delphi 2006已经包含Indy 10了。

3.       通过Delphi打开ExtPascalSamples.dpr工程文件，或者通过Lazarus打开ExtPascalSamples_embedded.lpi。

·Delphi下，选择Project|Options

a.  在Compiler Tab页，把”Assignable typed constants”打勾

b.       在Direcotries/Conditionals Tab页，在”Search Path”输入Indy的源码路径(如果Delphi已经包含Indy 10不需要做此步)

c.       在”Conditional Defines”敲入WEBSERVER

·Lazarus，选择Project|Compiler选项

a.  在Paths Tab页，修改Other Unit Files指向Indy源码路径。

b.       在Other Tab页，保证在Custom Opitions敲入-dWEBSERVER。

4.       在Delphi下，选择Project|Compile。在Lazarus，选择Run|Build。

5.       拷贝ExtJS目录到ExtPascalSamples执行文件所在的目录，并保证ExtJS目录重命名为ext，在这里例子使用ext目录。

6.       开始ExtPascalSamples从命令行开始或者双击他，如果是在Delphi或者Lazarus下，请注意嵌入式服务器不显示出来。

7.       在浏览器敲入http://localhost/Home。

在这个例子用端口80，其他的Web服务器需要设置成80端口，你也可以改变这个端口。在调用TIdExtApplication.Create的时候，举例说明，你可以把80端口改成8080。在浏览器敲入http://localhost:8080/Home。

8.       您可以通过任务管理器(Windows)或者Activity Monitor(OS X)关闭。