Question

所以，我们有这个程序，我们的'版本控制'至少在过去的三四年中，每次我们进行更改时都只是标记了项目的另存为版本。显然，这是不可持续的。最近，我们已经开始向Github转移我们所有的项目了，我想对此做同样的事情。

不幸的是，保存的代码/项目版本最终导致xml文件的压缩版本没有换行符。比较不容易。我找到了一种基于命令行进行比较的方法，使用gitconfig和gitattribute更新以及一些外部脚本，并且在该环境中它可以很好地工作。

但我们主要使用（企业）网站和Github Desktop来满足我们的需求。这个过程似乎不适用于那些环境。

所以问题是 - 有没有办法在GitHub网页或GitHub桌面环境中设置脚本进行比较？

作为参考，我发现Windows格式的命令行/ git的页面是https://www.theorycrafter.org/quipu/order-to-chaos-version-control-and-transformations/，程序是Kofax Transformation Modules。

Answer 1

使用Github Desktop修改二进制差异

Github Desktop似乎没有能力直接从界面执行此操作。你要做的是另外安装git，按照文章中的说明，然后从Github Desktop，你可以点击Repository＆gt;在资源管理器中显示，然后右键单击该文件夹并选择Git GUI Here，您可以使用它来查看差异。

KTM项目中粒度变化的外部文件

当您查看KTM项目文件（.fpr）的xml内容时，您会看到项目中的脚本，但也会看到项目定义的所有内部。有些可能像字段一样可以理解，但许多其他可能不是。无论哪种方式，您都无法有选择地合并更改（如文章所述）。因此，在每个变更的基础上，您仍然可以检查整个项目。如果您希望能够更细化，您可以考虑使用不同的方法来代替，或者甚至是文章建议的内容。

脚本你可以将你的脚本复制到单独的文本文件中，这些文件会被检入然后能够对它们进行正常的差异和合并，因为你知道你可以将合并的脚本复制回来该项目。更新：KTM 6.1 Service Pack 1（6.1.1）在代码窗口中引入了一个菜单选项，以便轻松完成此操作（工具＆gt;保存所有脚本）。

定位器：Project Builder允许您将特定定位器的配置导出/导入到文件中。您无法对这些进行差异或合并，但是，如果您确定定位器在某次更改后产生了更糟糕的结果，则可以从先前的签入中导入特定定位器，而不是还原整个项目

编程方法：可以调用下面的脚本函数来导出包含类的脚本的每个类的文件，以及每个定位器的导出无法导出脚本定位器，但他们也没有太多配置：他们背后的脚本包含在他们的类脚本中。您可以根据需要运行该功能，但为了简化我的建议，每次在Project Builder中测试文档时都要运行它。因此，每当您测试提取文档时，这些外部文件都是最新的，并且可以提交任何更改。

Public Sub Design_ExportScriptAndLocators()
   Dim ClassIndex As Long
   Dim Path As String
   ' You could hard code a path if you did not want to use script variables
   Path=Project.ScriptVariables("Dev_ExportPath")

   ' Make sure you've added the Microsoft Scripting Runtime reference
   Dim fso As New Scripting.FileSystemObject
   If Not fso.FolderExists(Path) Then Exit Sub

   ' Here we use class index -1 to represent the special case of the project class
   For ClassIndex=-1 To Project.ClassCount-1
      Dim KTMClass As CscClass, ClassName As String, ScriptCode As String

      ' Get the script of this class
      If ClassIndex=-1 Then
         Set KTMClass=Project.RootClass
         ScriptCodPe=Project.ScriptCode
      Else
         Set KTMClass=Project.ClassByIndex(ClassIndex)
         ScriptCode=KTMClass.ScriptCode
      End If

      ' Get the name of the class
      ClassName=IIf(ClassIndex=-1,"Project",KTMClass.Name)

      ' Export script to file
      Dim ScriptFile As TextStream
      Set ScriptFile=fso.CreateTextFile(Path & "\Script-" & ClassName & ".txt",True,False)
      ScriptFile.Write(ScriptCode)
      ScriptFile.Close()

      ' Export locators (same as from Project Builder menus)
      Dim FileName As String
      Dim LocatorIndex As Integer
      For LocatorIndex=0 To KTMClass.Locators.Count-1
         If Not KTMClass.Locators.ItemByIndex(LocatorIndex).LocatorMethod Is Nothing Then
            FileName="\" & ClassName & "-" & KTMClass.Locators.ItemByIndex(LocatorIndex).Name & ".loc"
            KTMClass.Locators.ItemByIndex(LocatorIndex).ExportLocatorMethod(Path & FileName,Path)
         End If
      Next
   Next
End Sub

在项目构建器中测试文档提取时的示例调用：

Private Sub Document_AfterExtract(ByVal pXDoc As CASCADELib.CscXDocument)
   ' Only when run in Project Builder...
   If Project.ScriptExecutionMode=CscScriptExecutionMode.CscScriptModeServerDesign Then
      ' Update external script and locator files added to source control
      Design_ExportScriptAndLocators()
   End If
End Sub

没有完美的解决方案来将源代码管理中的KTM项目或KC批处理类存储为简单代码，但这至少可以让您更加精确地查看已检入的更改并能够使用更多内容还原更改粒度

Github桌面比较脚本

1 个答案:

使用Github Desktop修改二进制差异

KTM项目中粒度变化的外部文件