X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=bottleclient%2FStrReplace.pas;h=f90b75998e7138427d505196d11147bc452b9bac;hb=7c3c3d450115058fb7ac641160b279527f3033dd;hp=b19744a54fae51b7f4fdaf2fcc957c04a4e4fac8;hpb=54e53011aedefba3da2474d7924cb287de2715f1;p=winbottle%2Fwinbottle.git

diff --git a/bottleclient/StrReplace.pas b/bottleclient/StrReplace.pas
index b19744a..f90b759 100644
--- a/bottleclient/StrReplace.pas
+++ b/bottleclient/StrReplace.pas
@@ -64,9 +64,11 @@ type
     FTitle: string;
     FPairs: TReplacePairCollection;
     FShortCut: TShortCut;
+    FConfirmAfterReplace: Boolean;
     procedure SetPairs(const Value: TReplacePairCollection);
     procedure SetShortCut(const Value: TShortCut);
     procedure SetTitle(const Value: string);
+    procedure SetConfirmAfterReplace(const Value: Boolean);
   public
     constructor Create(Collection: TCollection); override;
     destructor Destroy; override;
@@ -75,6 +77,7 @@ type
     property Pairs: TReplacePairCollection read FPairs write SetPairs;
     property Title: string read FTitle write SetTitle;
     property ShortCut: TShortCut read FShortCut write SetShortCut;
+    property ConfirmAfterReplace: Boolean read FConfirmAfterReplace write SetConfirmAfterReplace;
   end;
 
   TReplacePresetCollection = class(TCollection)
@@ -209,6 +212,7 @@ begin
     Pairs.Assign(Src.Pairs);
     Title := Src.Title;
     ShortCut := Src.ShortCut;
+    ConfirmAfterReplace := Src.ConfirmAfterReplace;
   end;
 end;
 
@@ -239,6 +243,11 @@ begin
   FTitle := Value;
 end;
 
+procedure TReplacePreset.SetConfirmAfterReplace(const Value: Boolean);
+begin
+  FConfirmAfterReplace := Value;
+end;
+
 { TReplacePresets }
 
 procedure TReplacePresets.Assign(Source: TPersistent);