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 源码。
请注意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)关闭。