ExamplesWindow: improved i18n and layout of settings frame, regenerated translations and updated Russian translation

This commit is contained in:
Maxim Ganetsky 2022-12-06 02:35:01 +03:00
parent e71aafbc65
commit 0ea7199af9
6 changed files with 50 additions and 21 deletions

View File

@ -1,10 +1,12 @@
object ExWinSettingsFrame: TExWinSettingsFrame object ExWinSettingsFrame: TExWinSettingsFrame
Left = 0 Left = 0
Height = 240 Height = 300
Top = 0 Top = 0
Width = 320 Width = 400
ClientHeight = 240 ClientHeight = 300
ClientWidth = 320 ClientWidth = 400
DesignTimePPI = 120
ParentFont = False
TabOrder = 0 TabOrder = 0
DesignLeft = 567 DesignLeft = 567
DesignTop = 426 DesignTop = 426
@ -12,11 +14,12 @@ object ExWinSettingsFrame: TExWinSettingsFrame
AnchorSideLeft.Control = DirectoryEdit1 AnchorSideLeft.Control = DirectoryEdit1
AnchorSideTop.Control = DirectoryEdit1 AnchorSideTop.Control = DirectoryEdit1
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 8
Height = 25 Height = 30
Top = 56 Top = 70
Width = 75 Width = 75
BorderSpacing.Top = 10 AutoSize = True
BorderSpacing.Top = 12
Caption = 'Default' Caption = 'Default'
OnClick = ButtonDefaultClick OnClick = ButtonDefaultClick
TabOrder = 0 TabOrder = 0
@ -27,18 +30,18 @@ object ExWinSettingsFrame: TExWinSettingsFrame
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 6 Left = 8
Height = 23 Height = 28
Top = 23 Top = 30
Width = 308 Width = 384
Directory = 'DirectoryEdit1' Directory = 'DirectoryEdit1'
ShowHidden = False ShowHidden = False
ButtonWidth = 23 ButtonWidth = 29
NumGlyphs = 1 NumGlyphs = 1
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6 BorderSpacing.Left = 8
BorderSpacing.Top = 2 BorderSpacing.Top = 2
BorderSpacing.Right = 6 BorderSpacing.Right = 8
MaxLength = 0 MaxLength = 0
TabOrder = 1 TabOrder = 1
Text = 'DirectoryEdit1' Text = 'DirectoryEdit1'
@ -46,12 +49,12 @@ object ExWinSettingsFrame: TExWinSettingsFrame
object Label1: TLabel object Label1: TLabel
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner AnchorSideTop.Control = Owner
Left = 6 Left = 8
Height = 15 Height = 20
Top = 6 Top = 8
Width = 188 Width = 239
BorderSpacing.Left = 6 BorderSpacing.Left = 8
BorderSpacing.Top = 6 BorderSpacing.Top = 8
Caption = 'Directory where examples are saved' Caption = 'Directory where examples are saved'
ParentColor = False ParentColor = False
end end

View File

@ -160,6 +160,7 @@ end;
procedure TExWinSettingsFrame.Setup(ADialog: TAbstractOptionsEditorDialog); procedure TExWinSettingsFrame.Setup(ADialog: TAbstractOptionsEditorDialog);
begin begin
Label1.Caption := rsDirWhereExamplesGo; Label1.Caption := rsDirWhereExamplesGo;
ButtonDefault.Caption := rsDefault;
end; end;
class function TExWinSettingsFrame.SupportedOptionsClass: TAbstractIDEOptionsClass; class function TExWinSettingsFrame.SupportedOptionsClass: TAbstractIDEOptionsClass;

View File

@ -1,6 +1,10 @@
msgid "" msgid ""
msgstr "Content-Type: text/plain; charset=UTF-8" msgstr "Content-Type: text/plain; charset=UTF-8"
#: uconst.rsdefault
msgid "Default"
msgstr ""
#: uconst.rsdirwhereexamplesgo #: uconst.rsdirwhereexamplesgo
msgid "Directory where Examples go" msgid "Directory where Examples go"
msgstr "" msgstr ""
@ -86,6 +90,10 @@ msgstr ""
msgid "Found %d Example Projects" msgid "Found %d Example Projects"
msgstr "" msgstr ""
#: uconst.rsgeneral
msgid "General"
msgstr ""
#: uconst.rsgrouphint #: uconst.rsgrouphint
msgid "Double click inverts selection" msgid "Double click inverts selection"
msgstr "" msgstr ""

View File

@ -12,6 +12,10 @@ msgstr ""
"Plural-Forms: nplurals=2; plural=(n > 1);\n" "Plural-Forms: nplurals=2; plural=(n > 1);\n"
"Language: pt_BR\n" "Language: pt_BR\n"
#: uconst.rsdefault
msgid "Default"
msgstr ""
#: uconst.rsdirwhereexamplesgo #: uconst.rsdirwhereexamplesgo
msgid "Directory where Examples go" msgid "Directory where Examples go"
msgstr "Diretório para onde vão os exemplos" msgstr "Diretório para onde vão os exemplos"
@ -97,6 +101,10 @@ msgstr "Falha ao copiar arquivos para"
msgid "Found %d Example Projects" msgid "Found %d Example Projects"
msgstr "Encontrado(s) %d Projeto(s) de exemplo" msgstr "Encontrado(s) %d Projeto(s) de exemplo"
#: uconst.rsgeneral
msgid "General"
msgstr ""
#: uconst.rsgrouphint #: uconst.rsgrouphint
msgid "Double click inverts selection" msgid "Double click inverts selection"
msgstr "Duplo clique inverte a seleção" msgstr "Duplo clique inverte a seleção"

View File

@ -11,6 +11,10 @@ msgstr ""
"Language: ru\n" "Language: ru\n"
"X-Generator: Poedit 2.4.3\n" "X-Generator: Poedit 2.4.3\n"
#: uconst.rsdefault
msgid "Default"
msgstr "По умолчанию"
#: uconst.rsdirwhereexamplesgo #: uconst.rsdirwhereexamplesgo
msgid "Directory where Examples go" msgid "Directory where Examples go"
msgstr "Каталог для помещения примеров" msgstr "Каталог для помещения примеров"
@ -96,6 +100,10 @@ msgstr "Не удалось скопировать файлы в"
msgid "Found %d Example Projects" msgid "Found %d Example Projects"
msgstr "Найдено примеров проектов: %d" msgstr "Найдено примеров проектов: %d"
#: uconst.rsgeneral
msgid "General"
msgstr "Общие"
#: uconst.rsgrouphint #: uconst.rsgrouphint
msgid "Double click inverts selection" msgid "Double click inverts selection"
msgstr "Двойной щелчок обращает выбор" msgstr "Двойной щелчок обращает выбор"

View File

@ -59,6 +59,7 @@ resourcestring
// Settings Frame // Settings Frame
rsGeneral = 'General'; rsGeneral = 'General';
rsDirWhereExamplesGo = 'Directory where Examples go'; rsDirWhereExamplesGo = 'Directory where Examples go';
rsDefault = 'Default';
// ------- rsExampleData // ------- rsExampleData
// Most literals in uExampleData are for debugging only and very unlikely to be // Most literals in uExampleData are for debugging only and very unlikely to be