【Delphi】IDE使用git进行代码托管

特别提示：我的Delphi环境不知道是否有问题，如果使用Pull命令，将会导致：kex_exchange_identification: read: Connection reset by peer 错误，以后就无法连接Git服务器，不知道是我的Delphi环境有问题还是Delphi有bug，大家在使用时注意下。另外出现这个问题后的有不完美解决方案。

本文以Delphi 11.1为蓝本，介绍在Delphi的IDE环境中使用git进行代码托管。关于git的安装就不说了，网上很多教程，既然是git托管，就必须先安装并配置好git环境。本文使用的是群晖NAS上的git环境。

一、delphi IDE 的配置

选择delphi菜单 Tools -> Options -> Version Control -> git ；然后设置好Git执行程序目录以及在Git中注册的用户名及Email，保存即可。

二、在群晖服务器上创建git仓库

打开Git Bash终端，我们在Git_Server目录中创建一个A_APP_BOX_ALL目录（仓库）。

输入如下命令，完成创建目录以及git仓库初始化

序号	命令	说明
1	ssh 192.168.1.208 -l sensor	登录NAS服务器，需要输入密码
2	cd /volume1/Git_Server	进入服务器的目录
3	mkdir A_APP_BOX_ALL	创建一个目录（仓库）
4	cd A_APP_BOX_ALL	进入这个目录
5	git init --bare	初始化git仓库

三、将上一步创建的空仓库克隆到本地

在本地选择需要创建delphi项目的目录，这个根据自己的实际选择。

然后命令克隆上一步创建的 A_APP_BOX_ALL 仓库。

四、在Delphi IDE中新建项目，保存在A_APP_BOX_ALL目录中。

 

 

 至此，Project1项目已经可以在Delphi 的 IDE 中使用git仓库进行管理。Delphi支持5种常用的git命令，分别是：Commit、pull、show log、Clean、push。可在项目文件或者是某个单元文件上按鼠标右键选择Git菜单就可以使用仓库管理了，无需退出Delphi。

 说明：

虽然在Delphi的集成环境使用git很方便，但是经过测试，感觉没有使用外部命令或者第三方的客户端快，而且提示信息没有过程，只有结果，等待的时候无所适从！