I use a vbs script which I attach to a keyboard shortcut. I have attached the
vbs script, simply modify it for your configured areas (I'm assuming an
identical directory structure). The compare open files function will not work
for you out of the box, because it utilises a simple autohotkey script to
display a list of the open files, you would then simply select the two that you
wished to compare.
The aforementioned script is as attached below: -
'Interface with Beyond Compare RMG 11/5/6
const module_name = "BeyondCompare" 'this name must be unique !!!
const module_ver = "1" 'version
sub CompareOpenFiles
Dim ModPath
Dim wshShell,obj,i
set obj = NewEditor()
for i = 0 to editorsCount-1
obj.assignEditorByIndex(i)
ModPath = ModPath & obj.fileName & vbTab
next
Set WshShell = WScript.CreateObject("WScript.Shell")
wshShell.Run """J:\DOORS\rmgworkingarea\Auto HotKey
Scripts\BeyondCompare.exe"" """ & ModPath & """"
end sub
Sub CompareToConfigArea(ConfigDir)
Dim wshShell, obj
Dim FileName, TargetFile
set obj = NewEditor()
obj.assignActiveEditor
FileName = obj.fileName
TargetFile = Replace(FileName, "J:\DOORS\rmgworkingarea", ConfigDir)
Set WshShell = WScript.CreateObject("WScript.Shell")
wshShell.Run """H:\Beyond Compare\BC2.EXE"" """ & FileName & """ """ &
TargetFile & """"
End Sub
Sub JOfficialCompare()
CompareToConfigArea("J:\Official\Template\Doors")
End Sub
Sub KDoorsCompare()
CompareToConfigArea("K:\Doors")
End Sub
' name "Init" is required, its called automatically during initialization to
create menu items
sub Init
addMenuItem "Compare Open Files","Beyond Compare",
"CompareOpenFiles","CTRL+ALT+H"
addMenuItem "Compare to J Official File","Beyond Compare",
"JOfficialCompare","CTRL+ALT+J"
addMenuItem "Compare to K Doors File","Beyond Compare",
"KDoorsCompare","CTRL+ALT+K"
end sub
--
<http://forum.pspad.com/read.php?2,33044,33099>
PSPad freeware editor http://www.pspad.com
