从 Rad Studio 10.2 Tokyo 开始,可以编译和运行 Linux 服务器应用程序(无用户界面)。我们将使用 Ubuntu 准备一个 docker 映像,以及通过 PAServer 在 Linux 上运行 Delphi 应用程序所需的一切。使用 Docker,我们可以将这些应用程序在 Linux 容器中部署到我们的生产系统中。
从建立一系列互连的微服务以实现高可用性和容错到单体应用程序,可能性是巨大的。使用 Docker 的优点之一是我们可以准备一个基础镜像(比使用虚拟机轻得多)并根据需要进行部署。
更新!:如果您使用的是 10.3.3 (Rio),请阅读 如何使用 RadStudio 10.3.3 在 Docker Linux 上运行 Delphi 应用程序
我们开始做吧............................
快速途径
打开安装了 Docker 的控制台。在我的例子中,我使用 Docker Toolbox for Windows 并启动 Docker Quickstart Terminal。
docker pull jaruzafa/ubuntupaserverdocker run -p 64211:64211 -t -i jaruzafa/ubuntupaserver
恭喜!你已经完成了,现在去阅读下面的 RadStudio 部分。
缓慢的途径
我们的镜像将基于 Ubuntu 16.04。创建一个名为 Dockerfile的文本文件,其中包含以下内容:
#Imagen base FROM ubuntu # Everything you need for RadStudio plus some utilities that may come in handy RUN \ apt-get -y update && \ apt-get -y upgrade && \ apt-get -y dist-upgrade && \ apt-get -y install joe wget p7zip-full curl unzip build-essential zlib1g-dev libcurl4-gnutls-dev && \ apt-get -y install mysecureshell && \ apt-get -y autoremove && \ apt-get -y autoclean # Copy PAServer to container and unzip it COPY LinuxPAServer19.0.tar.gz /root/LinuxPAServer19.0.tar.gz RUN \ cd /root && \ tar xzvf LinuxPAServer19.0.tar.gz && \ cd PAServer-19.0 && \ mkdir scratch-dir # Working directory WORKDIR /root/PAServer-19.0 # Start PAServer CMD ["/root/PAServer-19.0/paserver","-password=1234"] # Publish PAServer default port EXPOSE 64211
请记住将 C:\Program Files\Embarcadero\RADStudio\19.0\PAServer\LinuxPAServer19.0.tar.gz 复制到您拥有 Dockerfile 的同一文件夹中。
运行 Docker 快速入门终端并输入:
docker build -t mirepo/mimagen 。
现在您已经创建了图像。只需启动容器:
docker run -p 64211:64211 -t -i mirepo/miimagen
现在 RADStudio 方面
Hello world….
在 Rad Studio 中单击新建项目->控制台应用程序
完成代码:
program Project1; {$APPTYPE CONSOLE} {$R *.res} uses System.SysUtils; begin try Writeln('Hello world Docker/Linux '); except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; end.