ファイルを比較

提供: MeryWiki
移動先: 案内検索

WinMerge にファイルのパスを渡すだけです。

// -----------------------------------------------------------------------------
// ファイルを比較
//
// Copyright (c) Kuro. All Rights Reserved.
// www:    http://www.haijin-boys.com/
// -----------------------------------------------------------------------------
 
var path = "C:\\Program Files\\WinMerge\\WinMergeU.exe";
if (editor.documents.Count < 2) {
    status = "比較するファイルがありません";
    Quit();
}
status = document.Name + " と比較するファイルを選択します";
var m = CreatePopupMenu();
var d = editor.documents;
for (i = 0; i < d.Count; i++) {
    var item = d.item(i);
    if (item.FullName == document.FullName)
        continue;
    var s;
    s = "\"" + document.Name + "\"\"" + item.Name + "\" を比較する";
    if (!item.Saved)
        s = s + " *";
    m.Add(s, i + 1);
}
var r = m.Track(1);
if (r > 0) {
    var item = d.Item(r - 1);
    if (!item.Saved)
        item.Save(item.FullName);
    if (!document.Saved)
        document.Save(document.FullName);
    var s = "\"" + path + "\" \"" + document.FullName + "\" \"" + item.FullName + "\"";
    status = s;
    var ws = new ActiveXObject("WScript.Shell");
    ws.Run(s);
}