Changeset 29 for trunk/Forms/UFormImportSource.pas

Timestamp:

Jul 12, 2016, 4:41:03 PM (8 years ago)

Author:

chronos

Message:

• Added: New import source state called Enabled to allow to select only currently needed imports for importing from all sources.

File:

• trunk/Forms/UFormImportSource.pas (modified) (3 diffs)

trunk/Forms/UFormImportSource.pas

@@ -17 +17 @@
     ButtonOk: TButton;
     ButtonCancel: TButton;
+    CheckBoxEnabled: TCheckBox;
     ComboBox1: TComboBox;
     EditName: TEdit;
@@ -78 +79 @@
   if (ComboBox1.ItemIndex = -1) and (ComboBox1.Items.Count > 0) then
     ComboBox1.ItemIndex := 0;
+  CheckBoxEnabled.Checked := ImportSource.Enabled;
 end;
 
@@ -85 +87 @@
   ImportSource.URL := EditURL.Text;
   ImportSource.Format := TImportFormat(ComboBox1.Items.Objects[ComboBox1.ItemIndex]);
+  ImportSource.Enabled := CheckBoxEnabled.Checked;
 end;