「フォーカスを移動できない」というエラーが出る問題を修正。

表示周りの微修正。

diff --git a/bottleclient/ReplacePresetEditor.pas b/bottleclient/ReplacePresetEditor.pas
index be2a339..ae2761f 100644 (file)
--- a/bottleclient/ReplacePresetEditor.pas
+++ b/bottleclient/ReplacePresetEditor.pas
@@ -124,11 +124,11 @@ begin
       if Pair.UseRegExp then
         SubItems.Add('Y')
       else
-        SubItems.Add('');
+        SubItems.Add('-');
       if not Pair.IgnoreCase then
         SubItems.Add('Y')
       else
-        SubItems.Add('');
+        SubItems.Add('-');
     finally
       lvwPairs.Items.EndUpdate;
     end;
@@ -181,7 +181,6 @@ begin
   if lvwPairs.Items.Count > 0 then
   begin
     lvwPairs.Items[0].Selected := true;
-    StrReplaceFrame.edtOldPattern.SetFocus;
   end;
   Result := ShowModal = mrOk;
 end;