Changeset 149 for trunk


Ignore:
Timestamp:
Feb 6, 2017, 2:14:14 PM (8 years ago)
Author:
chronos
Message:
  • Added: Main window switchable acronym filter by enabled categories.
Location:
trunk
Files:
1 added
6 edited

Legend:

Unmodified
Added
Removed

  • trunk/Forms/UFormMain.lfm

    r146 r149  
    8888      Action = AFilterSameLetterCase
    8989      TabOrder = 1
     90    end
     91    object CheckBoxEnabledCategories: TCheckBox
     92      Left = 360
     93      Height = 24
     94      Top = 3
     95      Width = 151
     96      Action = AFilterEnabledCategories
     97      TabOrder = 2
    9098    end
    9199  end
    … …  
    244252      Height = 22
    245253      Top = 5
    246       Width = 47
     254      Width = 70
    247255      Align = alNone
    248256      AutoSize = True
    … …  
    269277        Style = tbsCheck
    270278      end
     279      object ToolButton8: TToolButton
     280        Left = 47
     281        Top = 0
     282        Action = AFilterEnabledCategories
     283        Style = tbsCheck
     284      end
    271285    end
    272286  end
    … …  
    377391      ImageIndex = 17
    378392      OnExecute = AFilterSameLetterCaseExecute
     393    end
     394    object AFilterEnabledCategories: TAction
     395      AutoCheck = True
     396      Caption = 'Enabled categories'
     397      ImageIndex = 19
     398      OnExecute = AFilterEnabledCategoriesExecute
    379399    end
    380400    object AManageAcronym: TAction

  • trunk/Forms/UFormMain.lrt

    r146 r149  
    2222TFORMMAIN.AFILTERSAMELENGTH.CAPTION=Same length
    2323TFORMMAIN.AFILTERSAMELETTERCASE.CAPTION=Same letter case
     24TFORMMAIN.AFILTERENABLEDCATEGORIES.CAPTION=Enabled categories
    2425TFORMMAIN.AMANAGEACRONYM.CAPTION=Manage acronym
    2526TFORMMAIN.MENUITEM8.CAPTION=File

  • trunk/Forms/UFormMain.pas

    r148 r149  
    1616
    1717  TFormMain = class(TForm)
     18    AFilterEnabledCategories: TAction;
    1819    AManageAcronym: TAction;
    1920    AFilterSameLetterCase: TAction;
    … …  
    3738    AExit: TAction;
    3839    ActionList1: TActionList;
     40    CheckBoxEnabledCategories: TCheckBox;
    3941    CheckBoxExactLength: TCheckBox;
    4042    CheckBoxCaseSensitive: TCheckBox;
    … …  
    9193    ToolButton6: TToolButton;
    9294    ToolButton7: TToolButton;
     95    ToolButton8: TToolButton;
    9396    ToolButton9: TToolButton;
    9497    procedure AExitExecute(Sender: TObject);
    … …  
    99102    procedure AFileSaveAsExecute(Sender: TObject);
    100103    procedure AFileSaveExecute(Sender: TObject);
     104    procedure AFilterEnabledCategoriesExecute(Sender: TObject);
    101105    procedure AFilterSameLetterCaseExecute(Sender: TObject);
    102106    procedure AFilterSameLengthExecute(Sender: TObject);
    … …  
    299303end;
    300304
     305procedure TFormMain.AFilterEnabledCategoriesExecute(Sender: TObject);
     306begin
     307  UpdateAcronymsList;
     308end;
     309
    301310procedure TFormMain.AFilterSameLetterCaseExecute(Sender: TObject);
    302311begin
    … …  
    519528procedure TFormMain.ListViewSort1Filter(ListViewSort: TListViewSort);
    520529begin
    521   Core.AcronymDb.AssignToList(ListViewSort1.List, True);
     530  Core.AcronymDb.AssignToList(ListViewSort1.List, AFilterEnabledCategories.Checked);
    522531  FilterList(ListViewSort1.List);
    523532end;
    … …  
    687696    AFilterSameLength.Checked := ReadBoolWithDefault('SameLength', False);
    688697    AFilterSameLetterCase.Checked := ReadBoolWithDefault('SameLetterCase', False);
     698    AFilterEnabledCategories.Checked := ReadBoolWithDefault('EnabledCategories', False);
    689699    MenuItemToolbar.Checked := ReadBoolWithDefault('ToolBarVisible', True);
    690700    MenuItemParam.Checked := ReadBoolWithDefault('FilterParamVisible', True);
    … …  
    719729    WriteBool('SameLength', AFilterSameLength.Checked);
    720730    WriteBool('SameLetterCase', AFilterSameLetterCase.Checked);
     731    WriteBool('EnabledCategories', AFilterEnabledCategories.Checked);
    721732    WriteBool('ToolBarVisible', MenuItemToolbar.Checked);
    722733    WriteBool('FilterParamVisible', MenuItemParam.Checked);

  • trunk/Languages/AcronymDecoder.cs.po

    r148 r149  
    549549msgstr "Uložit jako..."
    550550
     551#: tformmain.afilterenabledcategories.caption
     552msgid "Enabled categories"
     553msgstr "Povolené kategorie"
     554
    551555#: tformmain.afiltersamelength.caption
    552556msgid "Same length"
    … …  
    919923msgid "Process import sources"
    920924msgstr "Zpracovat zdroje importu"
    921 

  • trunk/Languages/AcronymDecoder.po

    r146 r149  
    539539msgstr ""
    540540
     541#: tformmain.afilterenabledcategories.caption
     542msgid "Enabled categories"
     543msgstr ""
     544
    541545#: tformmain.afiltersamelength.caption
    542546msgid "Same length"

  • trunk/UCore.lfm

    r142 r149  
    3535    top = 336
    3636    Bitmap = {
    37       4C69130000001000000010000000000000000000000000000000000000000000
     37      4C69140000001000000010000000000000000000000000000000000000000000
    3838      000070A970FF006400FF006200FF70A670FF0000000000000000000000000000
    3939      0000000000000000000000000000000000000000000000000000000000000000
    … …  
    643643      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
    644644      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
    645       FF00FFFFFF00FFFFFF00FFFFFF00
     645      FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
     646      0000000000000000000000000000000000000000000000000000000000000000
     647      000000000000000000000000000000000000000000000000000000000000F4F9
     648      FFFF4195EFFF2F8AF1FF000000FF2F8DF3FF2F8DF3FF2F8BF1FF2F8BEFFFE9F2
     649      FEFF00000000000000000000000000000000000000000000000000000000F0F6
     650      FEFF239AFCFF000000FF000000FF24CCFFFF24CCFFFF23D1FFFF1C9FFFFFE2EE
     651      FDFF00000000000000000000000000000000000000FF0000000000000000F1F7
     652      FEFF000000FF000000FF000000FF39D8FFFF39D8FFFF3ADEFFFF26A5FFFFE3EE
     653      FDFF00000000000000000000000000000000000000FF000000FF000000000000
     654      00FF000000FF000000FF59F1FFFF58F1FFFF59F1FFFF5CF9FFFF35B2FFFFE2ED
     655      FDFF00000000000000000000000000000000000000FF000000FF000000FF0000
     656      00FF000000FF3ECBFFFF3BC7FFFF36C5FFFF3BC6FFFF40CEFFFF299EF9FFE4EF
     657      FEFF0000000000000000000000000000000000000000000000FF000000FF0000
     658      00FFB8D3F4FFA9BFEFFF9FC0EEFF567BACFF91B9EAFFA9BFEFFFADCCF3FFFCFC
     659      FDFF000000000000000000000000000000000000000000000000000000FFFAFA
     660      FAFFFDFDFDFFFDFDFDFFF5F5F6FF9F978EFFE9EAEAFFFDFDFDFFFDFDFDFFFAFA
     661      FAFFFEFEFEFF0000000000000000000000000000000000000000EDF2F8FF7A7E
     662      83FF979694FF9A9896FF8D8D8FFF7E7F80FF8F8E8AFF999796FF989795FF8282
     663      7DFFE9EBE9FF000000000000000000000000FFF3DCFFFFEED0FFE7D2AEFFC0AB
     664      88FFFAECD3FFFBEDD5FFFCFAF6FF00000000F9F9FBFFD8D7EDFFD5D4EBFF9492
     665      B8FFA4A4C7FFD3D2EEFFDADAF1FF00000000FCB02CFFFFBC35FFFFB72BFFFFB8
     666      2DFFFFC035FFFFB726FFFFE2A5FF00000000C2C2EBFF000FC6FF0013D6FF0005
     667      CCFF0004C9FF0021D9FF0C20C0FF00000000FEB12FFFFFDA6AFFFFD862FFFFD8
     668      64FFFFDA69FFFFC748FFFFD9A6FF00000000C3C3E7FF001CE2FF003AFFFF003F
     669      FFFF003BFFFF0034FFFF1018CCFF00000000FFB93BFFFFEB89FFFFE782FFFFE7
     670      82FFFFEB88FFFFD561FFFFDAA6FF00000000C3C3E7FF0029E2FF0B5DFFFF0E61
     671      FFFF0B5CFFFF044CFFFF111CCDFF00000000FFC34CFFFFFFCEFFFFFFC3FFFFFF
     672      C3FFFFFFCBFFFFF094FFFFD8A4FF00000000C2C2E7FF003EE9FF1E8CFFFF2190
     673      FFFF1D88FFFF136FFFFF0D23CFFF00000000FBB73DFFFFCE5BFFFFCB58FFFFCB
     674      58FFFFCD5AFFFFC044FFFFE0ACFF00000000C7C7EBFF1123C2FF1143D3FF1149
     675      D6FF1143D1FF1133D2FF2121B5FF000000000000000000000000000000000000
     676      0000000000000000000000000000000000000000000000000000000000000000
     677      0000000000000000000000000000
    646678    }
    647679  end
Note: See TracChangeset for help on using the changeset viewer.