ソート関数でのコンパイラの警告が出ないように変数の初期化を追加

diff --git a/FavoriteArrange.pas b/FavoriteArrange.pas
index 8b2e8ac..dfb234e 100644 (file)
--- a/FavoriteArrange.pas
+++ b/FavoriteArrange.pas
@@ -249,6 +249,7 @@ begin
     if (folder1 = nil) and (folder2 <> nil) then begin
         Result := -1;
     end else begin
+        Result := 0;
         if (folder1 <> nil) and (folder2 <> nil) then begin
             Result := CompareStr(Node1.Text, Node2.Text);
         end else