啟動(dòng) Delphi 11

Delphi 11 安裝略過(guò)，啟動(dòng)后選 new project ，如圖所示創(chuàng)建新工程。

Delphi 11編譯器選項(xiàng)

Delphi 11配帶了x32和x64位的安卓、IOS、macOS和Windows編譯器，可使用 Delphi 語(yǔ)言(pascal)編寫(xiě)并編譯成不同操作系統(tǒng)平臺(tái)的應(yīng)用程序。

編寫(xiě)TCPClient程序

以編寫(xiě)TCPClient為例，在form上放上indy的tcpclient，將它屬性的 host 和 port 寫(xiě)上欲連接的 tcpserver的IP地址和port端口號(hào)。再放一個(gè) Button1

雙擊 Button1， 在代碼編輯器中寫(xiě)上如下代碼。

編譯為 android 的 app

在手機(jī)開(kāi)發(fā)者選項(xiàng)上打開(kāi)調(diào)試功能，通過(guò) usb 線連接計(jì)算機(jī)，對(duì)上述代碼進(jìn)行編譯后 apk 自動(dòng)上載并安裝到手機(jī)上。 安裝后運(yùn)行是下面的樣子，很簡(jiǎn)單，就一個(gè) Button1 鈕。

用HyperTerminal作tcpserver

進(jìn)入后隨便起個(gè)連接名稱(chēng) tcpserver

配置tcpserver，本機(jī) IP， 端口 2000

為了測(cè)試方便，hyperterminal的PC和手機(jī)在同一Wifi下，這樣它們就在同一IP地址段。PC是192.168.100.158， 華為mate9手機(jī)是 192.168.100.178，端口是 2000

選擇 wait for call， 將 hyperterminal 設(shè)置成 tcpserver

TcpClient與TcpServer通訊

手機(jī)TcpClient上每按 Button1一次，PC上運(yùn)行的 TcpServer 上顯示一次 Hello World!

后記：

用同樣的方法，可以編譯IOS手機(jī)app，也可編寫(xiě) windows, linux, macOS程序。