当前位置: 首页 > 工具软件 > ExtPascal > 使用案例 >

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

萧韬
2023-12-01

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)关闭。

 类似资料: