Added units

diff --git a/bottleclient/SstpBottle.dpr b/bottleclient/SstpBottle.dpr
index 254faea..9121b59 100755 (executable)
--- a/bottleclient/SstpBottle.dpr
+++ b/bottleclient/SstpBottle.dpr
@@ -26,7 +26,14 @@ uses
   HttpThread in 'HttpThread.pas',
   LogDownload in 'LogDownload.pas' {frmLogDownload},
   ColorSettingFrame in 'ColorSettingFrame.pas' {frmColorSetting: TFrame},
-  ScriptConsts in 'ScriptConsts.pas';
+  ScriptConsts in 'ScriptConsts.pas',
+  BottleChainEvent in 'BottleChainEvent.pas',
+  BottleChainRule in 'BottleChainRule.pas',
+  BottleChainListFrame in 'BottleChainListFrame.pas' {frmBottleChainList: TFrame},
+  BottleChainRuleEditor in 'BottleChainRuleEditor.pas' {frmBottleChainRuleEditor},
+  MinMaxEditor in 'MinMaxEditor.pas' {frmMinMaxEditor},
+  StrListEditor in 'StrListEditor.pas' {frmStrListEditor},
+  MultipleChoiceEditor in 'MultipleChoiceEditor.pas' {frmMultipleChoiceEditor};
 
 {$R *.RES}
 {$DEFINE Mani}
@@ -43,6 +50,7 @@ begin
   Application.CreateForm(TfrmChannelList, frmChannelList);
   Application.CreateForm(TfrmMessageBox, frmMessageBox);
   Application.CreateForm(TfrmLogDownload, frmLogDownload);
+  Application.CreateForm(TfrmBottleChainRuleEditor, frmBottleChainRuleEditor);
   if not Application.Terminated then frmSender.Show;
   Application.Run;
 end.