Changeset 21


Ignore:
Timestamp:
May 4, 2016, 9:51:49 PM (8 years ago)
Author:
chronos
Message:
  • Added: About application information form.
Location:
trunk
Files:
3 added
7 edited

Legend:

Unmodified
Added
Removed

  • trunk/AcronymDecoder.lpi

    r20 r21  
    9292      </Item5>
    9393    </RequiredPackages>
    94     <Units Count="11">
     94    <Units Count="12">
    9595      <Unit0>
    9696        <Filename Value="AcronymDecoder.lpr"/>
    … …  
    158158        <ResourceBaseClass Value="Form"/>
    159159      </Unit10>
     160      <Unit11>
     161        <Filename Value="Forms\UFormAbout.pas"/>
     162        <IsPartOfProject Value="True"/>
     163        <ComponentName Value="FormAbout"/>
     164        <HasResources Value="True"/>
     165        <ResourceBaseClass Value="Form"/>
     166      </Unit11>
    160167    </Units>
    161168  </ProjectOptions>

  • trunk/AcronymDecoder.lpr

    r20 r21  
    1010  Forms, UAcronym, synapse, Common, SysUtils, TemplateGenerics, UFormImport,
    1111  CoolTranslator, UFormCategorySelect, UFormMain, UFormAcronym, UFormSettings,
    12   UFormCategories, UFormAcronyms, UFormImportSource, UFormImportSources
     12  UFormCategories, UFormAcronyms, UFormImportSource, UFormImportSources,
     13UFormAbout
    1314  { you can add units after this };
    1415
    … …  
    4041  Application.CreateForm(TFormImportSource, FormImportSource);
    4142  Application.CreateForm(TFormImportSources, FormImportSources);
     43  Application.CreateForm(TFormAbout, FormAbout);
    4244  Application.Run;
    4345end.

  • trunk/Forms/UFormMain.lfm

    r20 r21  
    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 ListViewAcronyms: TListView
    1717    Left = 8
    18     Height = 340
    19     Top = 72
     18    Height = 333
     19    Top = 64
    2020    Width = 613
    2121    Anchors = [akTop, akLeft, akRight, akBottom]
    … …  
    5151  object CheckBoxExactMath: TCheckBox
    5252    Left = 8
    53     Height = 24
     53    Height = 28
    5454    Top = 3
    55     Width = 104
     55    Width = 129
    5656    Caption = 'Exact match'
    5757    OnChange = CheckBoxExactMathChange
    … …  
    44204420      OnExecute = AShowImportSourcesExecute
    44214421    end
     4422    object AShowAbout: TAction
     4423      Caption = 'About'
     4424      OnExecute = AShowAboutExecute
     4425    end
    44224426  end
    44234427  object PersistentForm1: TPersistentForm
    … …  
    44304434    Images = ImageList1
    44314435    left = 464
    4432     top = 80
     4436    top = 96
    44334437    object MenuItem8: TMenuItem
    44344438      Caption = 'File'
    … …  
    44794483      end
    44804484    end
     4485    object MenuItem5: TMenuItem
     4486      Caption = 'Help'
     4487      object MenuItem6: TMenuItem
     4488        Action = AShowAbout
     4489      end
     4490    end
    44814491  end
    44824492  object OpenDialog1: TOpenDialog
    … …  
    45034513    OnCompareItem = ListViewSort1CompareItem
    45044514    OnFilter = ListViewSort1Filter
    4505     Column = 0
    4506     Order = soDown
     4515    Column = 2
     4516    Order = soUp
    45074517    left = 464
    45084518    top = 208

  • trunk/Forms/UFormMain.lrt

    r20 r21  
    1616TFORMMAIN.ASHOWACRONYMS.CAPTION=Acronyms
    1717TFORMMAIN.ASHOWIMPORTSOURCES.CAPTION=Import sources
     18TFORMMAIN.ASHOWABOUT.CAPTION=About
    1819TFORMMAIN.MENUITEM8.CAPTION=File
    1920TFORMMAIN.MENUITEMOPENRECENT.CAPTION=Open recent
    … …  
    2122TFORMMAIN.MENUITEM20.CAPTION=View
    2223TFORMMAIN.MENUITEM16.CAPTION=Tools
     24TFORMMAIN.MENUITEM5.CAPTION=Help

  • trunk/Forms/UFormMain.pas

    r20 r21  
    1616
    1717  TFormMain = class(TForm)
     18    AShowAbout: TAction;
    1819    AShowImportSources: TAction;
    1920    AShowAcronyms: TAction;
    … …  
    5253    MenuItem22: TMenuItem;
    5354    MenuItem4: TMenuItem;
     55    MenuItem5: TMenuItem;
     56    MenuItem6: TMenuItem;
    5457    MenuItemOpenRecent: TMenuItem;
    5558    MenuItem2: TMenuItem;
    … …  
    7073    procedure AImportExecute(Sender: TObject);
    7174    procedure ASettingsExecute(Sender: TObject);
     75    procedure AShowAboutExecute(Sender: TObject);
    7276    procedure AShowAcronymsExecute(Sender: TObject);
    7377    procedure AShowCategoriesExecute(Sender: TObject);
    … …  
    115119uses
    116120  UFormImport, UFormAcronym, UFormSettings, UFormCategories, UFormAcronyms,
    117   UFormImportSource, UFormImportSources;
     121  UFormImportSource, UFormImportSources, UFormAbout;
    118122
    119123resourcestring
    … …  
    244248  if FormSettings.ShowModal = mrOk then
    245249    FormSettings.Save;
     250end;
     251
     252procedure TFormMain.AShowAboutExecute(Sender: TObject);
     253begin
     254  FormAbout.ShowModal;
    246255end;
    247256

  • trunk/Languages/AcronymDecoder.cs.po

    r20 r21  
    1212"X-Generator: Poedit 1.8.7.1\n"
    1313
     14#: tformabout.buttonclose.caption
     15msgctxt "tformabout.buttonclose.caption"
     16msgid "Close"
     17msgstr "Zavřít"
     18
     19#: tformabout.buttonhomepage.caption
     20msgid "Home page"
     21msgstr "Domovská stránka"
     22
     23#: tformabout.labelappname.caption
     24msgctxt "tformabout.labelappname.caption"
     25msgid "Acronym Decoder"
     26msgstr "Acronym Decoder"
     27
     28#: tformabout.labelcontent.caption
     29msgctxt "tformabout.labelcontent.caption"
     30msgid "   "
     31msgstr "   "
     32
     33#: tformabout.labeldescription.caption
     34msgctxt "tformabout.labeldescription.caption"
     35msgid "Simple tool for quick search and find meaning for various acronyms and abbreviations."
     36msgstr "Jednoduchý nástroj pro hledání významu různých zkratek a zkrácení."
     37
    1438#: tformacronym.acategoryadd.caption
    1539msgctxt "tformacronym.acategoryadd.caption"
    … …  
    5478
    5579#: tformacronyms.aadd.caption
    56 #, fuzzy
    5780msgctxt "tformacronyms.aadd.caption"
    5881msgid "Add"
    … …  
    6083
    6184#: tformacronyms.amodify.caption
    62 #, fuzzy
    6385msgctxt "tformacronyms.amodify.caption"
    6486msgid "Modify"
    … …  
    6688
    6789#: tformacronyms.aremove.caption
    68 #, fuzzy
    6990msgctxt "tformacronyms.aremove.caption"
    7091msgid "Remove"
    … …  
    81102
    82103#: tformacronyms.listviewacronyms.columns[0].caption
    83 #, fuzzy
    84104msgctxt "tformacronyms.listviewacronyms.columns[0].caption"
    85105msgid "Name"
    … …  
    87107
    88108#: tformacronyms.listviewacronyms.columns[1].caption
    89 #, fuzzy
    90109msgctxt "tformacronyms.listviewacronyms.columns[1].caption"
    91110msgid "Description"
    … …  
    161180
    162181#: tformimportsource.buttoncancel.caption
    163 #, fuzzy
    164182msgctxt "tformimportsource.buttoncancel.caption"
    165183msgid "Cancel"
    … …  
    167185
    168186#: tformimportsource.buttonok.caption
    169 #, fuzzy
    170187msgctxt "tformimportsource.buttonok.caption"
    171188msgid "Ok"
    … …  
    175192msgctxt "tformimportsource.caption"
    176193msgid "Import source"
    177 msgstr ""
     194msgstr "Zdroj importu"
    178195
    179196#: tformimportsource.label1.caption
    180 #, fuzzy
    181197msgctxt "tformimportsource.label1.caption"
    182198msgid "Name:"
    … …  
    185201#: tformimportsource.label2.caption
    186202msgid "Source URL:"
    187 msgstr ""
     203msgstr "Zdrojové URL:"
    188204
    189205#: tformimportsources.aadd.caption
    190 #, fuzzy
    191206msgctxt "tformimportsources.aadd.caption"
    192207msgid "Add"
    … …  
    194209
    195210#: tformimportsources.amodify.caption
    196 #, fuzzy
    197211msgctxt "tformimportsources.amodify.caption"
    198212msgid "Modify"
    … …  
    200214
    201215#: tformimportsources.aremove.caption
    202 #, fuzzy
    203216msgctxt "tformimportsources.aremove.caption"
    204217msgid "Remove"
    … …  
    208221msgctxt "tformimportsources.caption"
    209222msgid "Import sources"
    210 msgstr ""
     223msgstr "Zdroje importu"
    211224
    212225#: tformimportsources.listview1.columns[0].caption
    213 #, fuzzy
    214226msgctxt "tformimportsources.listview1.columns[0].caption"
    215227msgid "Name"
    … …  
    218230#: tformimportsources.listview1.columns[1].caption
    219231msgid "URL"
    220 msgstr ""
     232msgstr "URL"
    221233
    222234#: tformmain.aexit.caption
    … …  
    225237
    226238#: tformmain.afileclose.caption
     239msgctxt "tformmain.afileclose.caption"
    227240msgid "Close"
    228241msgstr "Zavřít"
    … …  
    271284msgctxt "tformmain.ashowimportsources.caption"
    272285msgid "Import sources"
    273 msgstr ""
     286msgstr "Zdroje importu"
    274287
    275288#: tformmain.caption
     289msgctxt "tformmain.caption"
    276290msgid "Acronym Decoder"
    277291msgstr "Acronym Decoder"
    … …  
    308322msgstr "Zobrazení"
    309323
     324#: tformmain.menuitem5.caption
     325msgid "Help"
     326msgstr "Nápověda"
     327
    310328#: tformmain.menuitem8.caption
    311329msgid "File"
    … …  
    343361msgstr "Špatný formát souboru"
    344362
     363#: uformabout.slicense
     364msgid "License"
     365msgstr "Licence"
     366
     367#: uformabout.sreleasedate
     368msgid "Release date:"
     369msgstr "Datum uvolnění:"
     370
     371#: uformabout.sversion
     372msgid "Version"
     373msgstr "Verze"
     374
    345375#: uformacronym.scategory
    346376msgctxt "uformacronym.scategory"
    … …  
    359389
    360390#: uformacronyms.sremoveacronym
    361 #, fuzzy
    362391msgctxt "uformacronyms.sremoveacronym"
    363392msgid "Remove acronym"
    … …  
    365394
    366395#: uformacronyms.sremoveacronymquery
    367 #, fuzzy
    368396msgctxt "uformacronyms.sremoveacronymquery"
    369397msgid "Do you want to remove selected acronym?"
    … …  
    371399
    372400#: uformacronyms.sremoveallacronyms
    373 #, fuzzy
    374401msgctxt "uformacronyms.sremoveallacronyms"
    375402msgid "Remove all acronyms"
    … …  
    377404
    378405#: uformacronyms.sremoveallacronymsquery
    379 #, fuzzy
    380406msgctxt "uformacronyms.sremoveallacronymsquery"
    381407msgid "Do you want to remove all acronyms?"
    … …  
    396422
    397423#: uformcategories.sremovecategory
    398 #, fuzzy
    399 #| msgid "Remove category"
    400424msgctxt "uformcategories.sremovecategory"
    401425msgid "Remove categories"
    402 msgstr "Odebrat kategorii"
     426msgstr "Odebrat kategorie"
    403427
    404428#: uformcategories.sremovecategoryquery
    405 #, fuzzy
    406 #| msgid "Do you really want to remove category?"
    407429msgctxt "uformcategories.sremovecategoryquery"
    408430msgid "Do you really want to remove selected categories?"
    409 msgstr "Opravdu chcete odebrat kategorii?"
     431msgstr "Opravdu chcete odebrat vybrabé kategorie?"
    410432
    411433#: uformimport.simportednewacronyms
    … …  
    416438msgctxt "uformimportsources.simportsource"
    417439msgid "Import source"
    418 msgstr ""
     440msgstr "Zdroje importu"
    419441
    420442#: uformimportsources.simportsourcealreadyexists
    421443msgid "Import source %s already exists!"
    422 msgstr ""
     444msgstr "Zdroj importu %s již existuje!"
    423445
    424446#: uformimportsources.simportsourcequery
    425447msgid "Enter name of import source"
    426 msgstr ""
     448msgstr "Zadejte jméno zdroje importu"
    427449
    428450#: uformimportsources.sremoveimportsource
    429451msgid "Remove import sources"
    430 msgstr ""
     452msgstr "Odstranit zdroje importu"
    431453
    432454#: uformimportsources.sremoveimportsourcequery
    433455msgid "Do you really want to remove selected import sources?"
    434 msgstr ""
     456msgstr "Opravdu chcete odebrat vybrané zdroje importu?"
    435457
    436458#: uformmain.sappexit
    … …  
    445467msgid "modified"
    446468msgstr "upraveno"
    447 

  • trunk/Languages/AcronymDecoder.po

    r20 r21  
    11msgid ""
    22msgstr "Content-Type: text/plain; charset=UTF-8"
     3
     4#: tform1.buttonclose.caption
     5msgctxt "TFORM1.BUTTONCLOSE.CAPTION"
     6msgid "Close"
     7msgstr ""
     8
     9#: tform1.caption
     10msgid "Form1"
     11msgstr ""
     12
     13#: tform1.label1.caption
     14msgctxt "TFORM1.LABEL1.CAPTION"
     15msgid "Acronym Decoder"
     16msgstr ""
     17
     18#: tform1.label2.caption
     19msgctxt "tform1.label2.caption"
     20msgid "Tool for quick search and find meaning for various acronyms and abbreviations"
     21msgstr ""
     22
     23#: tform1.labelcontent.caption
     24msgctxt "tform1.labelcontent.caption"
     25msgid "   "
     26msgstr ""
     27
     28#: tformabout.buttonclose.caption
     29msgctxt "TFORMABOUT.BUTTONCLOSE.CAPTION"
     30msgid "Close"
     31msgstr ""
     32
     33#: tformabout.buttonhomepage.caption
     34msgid "Home page"
     35msgstr ""
     36
     37#: tformabout.caption
     38msgid "About"
     39msgstr ""
     40
     41#: tformabout.labelappname.caption
     42msgctxt "TFORMABOUT.LABELAPPNAME.CAPTION"
     43msgid "Acronym Decoder"
     44msgstr ""
     45
     46#: tformabout.labelcontent.caption
     47msgctxt "TFORMABOUT.LABELCONTENT.CAPTION"
     48msgid "   "
     49msgstr ""
     50
     51#: tformabout.labeldescription.caption
     52msgctxt "TFORMABOUT.LABELDESCRIPTION.CAPTION"
     53msgid "Simple tool for quick search and find meaning for various acronyms and abbreviations."
     54msgstr ""
    355
    456#: tformacronym.acategoryadd.caption
    … …  
    203255
    204256#: tformmain.afileclose.caption
     257msgctxt "tformmain.afileclose.caption"
    205258msgid "Close"
    206259msgstr ""
    … …  
    236289msgstr ""
    237290
     291#: tformmain.ashowabout.caption
     292msgid "About"
     293msgstr ""
     294
    238295#: tformmain.ashowacronyms.caption
    239296msgctxt "TFORMMAIN.ASHOWACRONYMS.CAPTION"
    … …  
    252309
    253310#: tformmain.caption
     311msgctxt "tformmain.caption"
    254312msgid "Acronym Decoder"
    255313msgstr ""
    … …  
    286344msgstr ""
    287345
     346#: tformmain.menuitem5.caption
     347msgid "Help"
     348msgstr ""
     349
    288350#: tformmain.menuitem8.caption
    289351msgid "File"
    … …  
    321383msgstr ""
    322384
     385#: uformabout.slicense
     386msgid "License"
     387msgstr ""
     388
     389#: uformabout.sreleasedate
     390msgid "Release date:"
     391msgstr ""
     392
     393#: uformabout.sversion
     394msgid "Version"
     395msgstr ""
     396
    323397#: uformacronym.scategory
    324398msgctxt "uformacronym.scategory"
Note: See TracChangeset for help on using the changeset viewer.