Changeset 45 for trunk


Ignore:
Timestamp:
Jul 15, 2016, 12:38:46 AM (8 years ago)
Author:
chronos
Message:
  • Modified: More translated strings.
Location:
trunk
Files:
10 edited

Legend:

Unmodified
Added
Removed
  • trunk/Forms/UFormAcronyms.lfm

    r34 r45  
    88  ClientWidth = 740
    99  OnShow = FormShow
    10   LCLVersion = '1.6.0.4'
     10  LCLVersion = '1.7'
    1111  object ListViewAcronyms: TListView
    1212    Left = 8
     
    2121      end   
    2222      item
    23         Caption = 'Description'
     23        Caption = 'Meaning'
    2424        Width = 300
    2525      end   
  • trunk/Forms/UFormAcronyms.lrt

    r27 r45  
    11TFORMACRONYMS.CAPTION=Acronyms
    22TFORMACRONYMS.LISTVIEWACRONYMS.COLUMNS[0].CAPTION=Name
    3 TFORMACRONYMS.LISTVIEWACRONYMS.COLUMNS[1].CAPTION=Description
     3TFORMACRONYMS.LISTVIEWACRONYMS.COLUMNS[1].CAPTION=Meaning
    44TFORMACRONYMS.LISTVIEWACRONYMS.COLUMNS[2].CAPTION=Categories
    55TFORMACRONYMS.AADD.CAPTION=Add
  • trunk/Forms/UFormAcronyms.pas

    r34 r45  
    6262  SRemoveAcronym = 'Remove acronym';
    6363  SRemoveAcronymQuery = 'Do you want to remove selected acronym?';
     64  STotal = 'Total';
     65  SFiltered = 'Filtered';
    6466
    6567
     
    248250  ListViewSort1.Refresh;
    249251  UpdateInterface;
    250   StatusBar1.Panels[0].Text := 'Total: ' + IntToStr(MeaningCount);
    251   StatusBar1.Panels[1].Text := 'Filtered: ' + IntToStr(ListViewAcronyms.Items.Count);
     252  StatusBar1.Panels[0].Text := STotal + ': ' + IntToStr(MeaningCount);
     253  StatusBar1.Panels[1].Text := SFiltered + ': ' + IntToStr(ListViewAcronyms.Items.Count);
    252254end;
    253255
  • trunk/Forms/UFormImportPattern.lfm

    r28 r45  
    99  OnCreate = FormCreate
    1010  OnShow = FormShow
    11   LCLVersion = '1.6.0.4'
     11  LCLVersion = '1.7'
    1212  object Label8: TLabel
    1313    Left = 24
    14     Height = 20
     14    Height = 24
    1515    Top = 13
    16     Width = 75
     16    Width = 101
    1717    Caption = 'Start string:'
    1818    ParentColor = False
     
    2020  object Label9: TLabel
    2121    Left = 24
    22     Height = 20
     22    Height = 24
    2323    Top = 53
    24     Width = 69
     24    Width = 92
    2525    Caption = 'End string:'
    2626    ParentColor = False
     
    2828  object EditBlockEnd: TEdit
    2929    Left = 183
    30     Height = 28
     30    Height = 34
    3131    Top = 48
    3232    Width = 461
     
    3636  object EditBlockStart: TEdit
    3737    Left = 183
    38     Height = 28
     38    Height = 34
    3939    Top = 8
    4040    Width = 461
     
    6464  object Label10: TLabel
    6565    Left = 24
    66     Height = 20
     66    Height = 24
    6767    Top = 88
    68     Width = 46
     68    Width = 60
    6969    Caption = 'Action:'
    7070    ParentColor = False
     
    7272  object Label11: TLabel
    7373    Left = 24
    74     Height = 20
     74    Height = 24
    7575    Top = 120
    76     Width = 58
     76    Width = 74
    7777    Caption = 'Variable:'
    7878    ParentColor = False
     
    8080  object ComboBoxAction: TComboBox
    8181    Left = 183
    82     Height = 28
     82    Height = 38
    8383    Top = 87
    8484    Width = 461
    8585    Anchors = [akTop, akLeft, akRight]
    86     ItemHeight = 20
     86    ItemHeight = 0
    8787    Style = csDropDownList
    8888    TabOrder = 4
     
    9090  object ComboBoxVariable: TComboBox
    9191    Left = 183
    92     Height = 28
     92    Height = 38
    9393    Top = 120
    9494    Width = 461
    9595    Anchors = [akTop, akLeft, akRight]
    96     ItemHeight = 20
     96    ItemHeight = 0
    9797    Items.Strings = (
    9898      ''
     
    103103  object CheckBoxRepetition: TCheckBox
    104104    Left = 24
    105     Height = 24
     105    Height = 28
    106106    Top = 160
    107     Width = 93
     107    Width = 112
    108108    Caption = 'Repetition'
    109109    TabOrder = 6
  • trunk/Forms/UFormImportPattern.pas

    r28 r45  
    4545procedure TFormImportPattern.FormShow(Sender: TObject);
    4646begin
     47  InitControls;
    4748end;
    4849
     
    5657  I: TImportPatternFlag;
    5758  J: TImportVariable;
     59  Index: Integer;
    5860begin
     61  Index := ComboBoxAction.ItemIndex;
    5962  while ComboBoxAction.Items.Count > 0 do
    6063    ComboBoxAction.Items.Delete(ComboBoxAction.Items.Count - 1);
     
    6366  for I := Low(TImportPatternFlag) to High(TImportPatternFlag) do
    6467    ComboBoxAction.Items[Integer(I)] := ImportPatternFlagString[I];
     68  ComboBoxAction.ItemIndex := Index;
    6569
     70  Index := ComboBoxVariable.ItemIndex;
    6671  ComboBoxVariable.Items.Clear;
    6772  while ComboBoxVariable.Items.Count > 0 do
     
    7176  for J := Low(TImportVariable) to High(TImportVariable) do
    7277    ComboBoxVariable.Items[Integer(J)] := ImportVariableString[J];
     78  ComboBoxVariable.ItemIndex := Index;
    7379end;
    7480
  • trunk/Forms/UFormMain.lfm

    r39 r45  
    55  Width = 631
    66  Caption = 'Acronym Decoder'
    7   ClientHeight = 421
     7  ClientHeight = 414
    88  ClientWidth = 631
    99  Menu = MainMenu1
     
    1313  OnDestroy = FormDestroy
    1414  OnShow = FormShow
    15   LCLVersion = '1.6.0.4'
     15  LCLVersion = '1.7'
    1616  object Panel1: TPanel
    1717    Left = 0
    18     Height = 395
     18    Height = 388
    1919    Top = 26
    2020    Width = 631
    2121    Align = alClient
    2222    BevelOuter = bvNone
    23     ClientHeight = 395
     23    ClientHeight = 388
    2424    ClientWidth = 631
    2525    TabOrder = 0
    2626    object CheckBoxExactMath: TCheckBox
    2727      Left = 8
    28       Height = 24
     28      Height = 28
    2929      Top = 3
    30       Width = 104
     30      Width = 129
    3131      Caption = 'Exact match'
    3232      OnChange = CheckBoxExactMathChange
     
    4343    object ListViewAcronyms: TListView
    4444      Left = 8
    45       Height = 323
     45      Height = 316
    4646      Top = 64
    4747      Width = 616
     
    13981398  object CoolTranslator1: TCoolTranslator
    13991399    POFilesFolder = 'Languages'
     1400    OnTranslate = CoolTranslator1Translate
    14001401    left = 264
    14011402    top = 176
  • trunk/Forms/UFormMain.pas

    r41 r45  
    9999    procedure AShowImportSourcesExecute(Sender: TObject);
    100100    procedure CheckBoxExactMathChange(Sender: TObject);
     101    procedure CoolTranslator1Translate(Sender: TObject);
    101102    procedure EditSearchChange(Sender: TObject);
    102103    procedure FormShow(Sender: TObject);
     
    345346end;
    346347
     348procedure TFormMain.CoolTranslator1Translate(Sender: TObject);
     349begin
     350  UAcronym.Translate;
     351end;
     352
    347353procedure TFormMain.FormDestroy(Sender: TObject);
    348354begin
  • trunk/Languages/AcronymDecoder.cs.po

    r35 r45  
    6262
    6363#: tformacronym.caption
     64msgctxt "tformacronym.caption"
    6465msgid "Acronym"
    6566msgstr "Zkratka"
     
    108109
    109110#: tformacronyms.listviewacronyms.columns[0].caption
    110 #, fuzzy
    111 #| msgid "Id"
    112111msgctxt "tformacronyms.listviewacronyms.columns[0].caption"
    113112msgid "Name"
     
    115114
    116115#: tformacronyms.listviewacronyms.columns[1].caption
    117 #, fuzzy
    118 #| msgid "Name"
    119116msgctxt "tformacronyms.listviewacronyms.columns[1].caption"
    120 msgid "Description"
    121 msgstr "Popis"
     117msgid "Meaning"
     118msgstr "Význam"
    122119
    123120#: tformacronyms.listviewacronyms.columns[2].caption
    124 #, fuzzy
    125 #| msgid "Description"
    126121msgctxt "tformacronyms.listviewacronyms.columns[2].caption"
    127122msgid "Categories"
     
    194189
    195190#: tformimportformat.aadd.caption
    196 #, fuzzy
    197191msgctxt "tformimportformat.aadd.caption"
    198192msgid "Add"
     
    200194
    201195#: tformimportformat.amodify.caption
    202 #, fuzzy
    203196msgctxt "tformimportformat.amodify.caption"
    204197msgid "Modify"
     
    214207
    215208#: tformimportformat.aremove.caption
    216 #, fuzzy
    217209msgctxt "tformimportformat.aremove.caption"
    218210msgid "Remove"
     
    239231
    240232#: tformimportformat.label2.caption
    241 #, fuzzy
    242 #| msgid "Acronym start:"
    243233msgid "Item rules:"
    244 msgstr "Začátek zkratky:"
     234msgstr "Pravidla položky:"
    245235
    246236#: tformimportformat.label3.caption
     
    303293
    304294#: tformimportpattern.buttoncancel.caption
    305 #, fuzzy
    306295msgctxt "tformimportpattern.buttoncancel.caption"
    307296msgid "Cancel"
     
    309298
    310299#: tformimportpattern.buttonok.caption
    311 #, fuzzy
    312300msgctxt "tformimportpattern.buttonok.caption"
    313301msgid "Ok"
     
    340328
    341329#: tformimportsource.acategoryadd.caption
    342 #, fuzzy
    343330msgctxt "tformimportsource.acategoryadd.caption"
    344331msgid "Add"
     
    346333
    347334#: tformimportsource.acategoryremove.caption
    348 #, fuzzy
    349335msgctxt "tformimportsource.acategoryremove.caption"
    350336msgid "Remove"
     
    389375
    390376#: tformimportsource.label4.caption
    391 #, fuzzy
    392377msgctxt "tformimportsource.label4.caption"
    393378msgid "Categories:"
     
    433418
    434419#: tformimportsources.listview1.columns[3].caption
    435 #, fuzzy
    436420msgctxt "tformimportsources.listview1.columns[3].caption"
    437421msgid "Categories"
     
    542526
    543527#: tformmain.menuitem24.caption
    544 #, fuzzy
    545528msgctxt "tformmain.menuitem24.caption"
    546529msgid "-"
     
    594577msgstr "Jazyk:"
    595578
     579#: uacronym.sacronym
     580msgctxt "uacronym.sacronym"
     581msgid "Acronym"
     582msgstr "Zkratka"
     583
     584#: uacronym.sdescription
     585msgctxt "uacronym.sdescription"
     586msgid "Description"
     587msgstr "Popis"
     588
     589#: uacronym.smeaning
     590msgctxt "uacronym.smeaning"
     591msgid "Meaning"
     592msgstr "Význam"
     593
     594#: uacronym.snewitem
     595msgid "New item"
     596msgstr "Nová položka"
     597
     598#: uacronym.snone
     599msgid "None"
     600msgstr "Žádný"
     601
     602#: uacronym.sskip
     603msgid "Skip"
     604msgstr "Přeskočit"
     605
    596606#: uacronym.swrongfileformat
    597607msgid "Wrong file format"
     
    625635msgstr "Opravdu chcete odebrat vybrané kategorie?"
    626636
     637#: uformacronyms.sfiltered
     638msgid "Filtered"
     639msgstr "Filtrováno"
     640
    627641#: uformacronyms.sremoveacronym
    628642msgctxt "uformacronyms.sremoveacronym"
     
    635649msgstr "Chcete odebrat vybranou zkratku?"
    636650
     651#: uformacronyms.stotal
     652msgid "Total"
     653msgstr "Celkem"
     654
    637655#: uformcategories.scategory
    638656msgctxt "uformcategories.scategory"
     
    659677
    660678#: uformcategoryselect.scategory
    661 #, fuzzy
    662679msgctxt "uformcategoryselect.scategory"
    663680msgid "Category"
     
    665682
    666683#: uformcategoryselect.sremovecategory
    667 #, fuzzy
    668684msgctxt "uformcategoryselect.sremovecategory"
    669685msgid "Remove categories"
     
    671687
    672688#: uformcategoryselect.sremovecategoryquery
    673 #, fuzzy
    674689msgctxt "uformcategoryselect.sremovecategoryquery"
    675690msgid "Do you really want to remove selected categories?"
    676 msgstr "Opravdu chcete odebrat vybrabé kategorie?"
     691msgstr "Opravdu chcete odebrat vybrané kategorie?"
    677692
    678693#: uformimport.simportednewacronyms
  • trunk/Languages/AcronymDecoder.po

    r34 r45  
    5252
    5353#: tformacronym.caption
     54msgctxt "tformacronym.caption"
    5455msgid "Acronym"
    5556msgstr ""
     
    104105#: tformacronyms.listviewacronyms.columns[1].caption
    105106msgctxt "TFORMACRONYMS.LISTVIEWACRONYMS.COLUMNS[1].CAPTION"
    106 msgid "Description"
     107msgid "Meaning"
    107108msgstr ""
    108109
     
    566567msgstr ""
    567568
     569#: uacronym.sacronym
     570msgctxt "uacronym.sacronym"
     571msgid "Acronym"
     572msgstr ""
     573
     574#: uacronym.sdescription
     575msgctxt "uacronym.sdescription"
     576msgid "Description"
     577msgstr ""
     578
     579#: uacronym.smeaning
     580msgctxt "uacronym.smeaning"
     581msgid "Meaning"
     582msgstr ""
     583
     584#: uacronym.snewitem
     585msgid "New item"
     586msgstr ""
     587
     588#: uacronym.snone
     589msgid "None"
     590msgstr ""
     591
     592#: uacronym.sskip
     593msgid "Skip"
     594msgstr ""
     595
    568596#: uacronym.swrongfileformat
    569597msgid "Wrong file format"
     
    597625msgstr ""
    598626
     627#: uformacronyms.sfiltered
     628msgid "Filtered"
     629msgstr ""
     630
    599631#: uformacronyms.sremoveacronym
    600632msgctxt "uformacronyms.sremoveacronym"
     
    607639msgstr ""
    608640
     641#: uformacronyms.stotal
     642msgid "Total"
     643msgstr ""
     644
    609645#: uformcategories.scategory
    610646msgctxt "uformcategories.scategory"
  • trunk/UAcronym.pas

    r34 r45  
    225225function AcronymComparer(Item1, Item2: Pointer): Integer;
    226226
    227 const
    228   ImportVariableString: array [TImportVariable] of string = ('None', 'Acronym',
    229     'Meaning', 'Description');
    230   ImportPatternFlagString: array [TImportPatternFlag] of string = ('None', 'New item',
    231     'Skip');
    232 
     227var
     228  ImportVariableString: array [TImportVariable] of string;
     229  ImportPatternFlagString: array [TImportPatternFlag] of string;
     230
     231procedure Translate;
    233232
    234233implementation
     
    236235resourcestring
    237236  SWrongFileFormat = 'Wrong file format';
    238 
     237  SDescription = 'Description';
     238  SMeaning = 'Meaning';
     239  SAcronym = 'Acronym';
     240  SNone = 'None';
     241  SNewItem = 'New item';
     242  SSkip = 'Skip';
     243
     244
     245procedure Translate;
     246begin
     247  ImportVariableString[ivAcronym] := SAcronym;
     248  ImportVariableString[ivNone] := SNone;
     249  ImportVariableString[ivMeaning] := SMeaning;
     250  ImportVariableString[ivDescription] := SDescription;
     251  ImportPatternFlagString[ipfNone] := SNone;
     252  ImportPatternFlagString[ipfNewItem] := SNewItem;
     253  ImportPatternFlagString[ipfSkip] := SSkip;
     254end;
    239255
    240256function AcronymComparer(Item1, Item2: Pointer): Integer;
Note: See TracChangeset for help on using the changeset viewer.